<% lang=request.QueryString("lang")
if lang="" then
id=14
Set con2= Server.CreateObject("ADODB.Connection")
con2.Provider = "Microsoft.Jet.OLEDB.4.0"
con2.ConnectionString = "Data Source=" & Server.MapPath ("db/arshad.mdb")
con2.Open
Set RsCat = Server.CreateObject("adodb.recordset")
SqlCat = "Select * from agri_pages where id ="&id
RsCat.open SqlCat, con2,1,2%>
<%response.write rscat("Title")%>
<%
response.write rscat("des")
else if lang="ar" then%>
مزيج
جديد نسبيا،
بدأ الإنتاج
العادية
لل"هجين"
الحبوب
C9 طويلة في
باكستان
ليس منذ
فترة طويلة
جدا. الحبوب
C9 طويلة تحمل
أوجه شبه
مذهلة مع
IRRI 9-حبة طويلة،
ويرجع ذلك
جزئيا إلى
انها البذور
المهجنة،
ولكن حبات
الأرز هي
أرق نسبيا،
بالمقارنة
مع نطاق
أوسع من
نواة IRRI-6 و
9-IRRI. C9 تكتسب
شعبية سريعة
في السوق
الدولية
للأرز في
حين أن المشترين
وتجار الجملة
ومستوردي
الأرز بدأوا
يفضلون
C9 أكثر من
نظرائه
غير البسمتي
الأخرى.
ولاية
البن |
الأصل |
لا شيء |
رائحة |
الأبيض،
مسلوق،
براون |
متاح
أنواع |
6.8ملم |
متوسط
طول
الحبوب
(عقل) |
<% else if lang="fr" then%>
Un
mélange relativement nouveau, la production
régulière de la «hybride»
C9 à grain long au Pakistan a commencé
a pas très longtemps. Le grain C9 à
long similitudes frappantes avec l'IRRI-9 à
grain long, en partie parce que c'est une semence
hybride, mais les grains de riz sont relativement
plus mince, par opposition à la plus large
du noyau de l'IRRI-6 et l'IRRI-9. C9 gagne rapidement
en popularité dans le marché international
du riz alors que les acheteurs, grossistes et importateurs
de riz commencent à préférer
la mitrailleuse C9 sur ses autres homologues non basmati.
Origine |
Pendjab |
Arôme |
Aucun |
Variétés
disponible |
Blanc,
étuvé |
Longueur
moyenne des grains (AGL) |
6.8mm |
<%else if lang="ch" then%>
一个相对较新的交融,正规企业生产的“混合”C9在巴基斯坦长粒不是很早就开始。
C9长粒承担与国际水稻研究所9长粒惊人的相似之处,部分原因是因为它是一个杂交种子,但米粒相对较薄,而不是更广泛的内核以IRRI-6和IRRI-9。
C9是迅速得到普及,而采购商,批发商和大米进口商也开始喜欢碳九,其他非巴斯马蒂同行在国际大米市场。
原产地 |
旁遮普 |
芳香 |
ÿ没有 |
品种 |
白,蒸谷米 |
粮食平均长度(AGL) |
6.8毫米。 |
<% end if
end if
end if
end if%>
<%
DIM mySQL, objRSm
mySQL = "SELECT * FROM rimages where pid ='"&id&"' "
Set objRSm = Server.CreateObject("ADODB.Recordset")
objRSm.Open mySQL, con2,1,2
DIM recCount
IF Not objRSm.EOF THEN
Response.Write ""
recCount = 0
Do UNTIL objRSm.EOF
IF recCount Mod 3 = 0 THEN
Response.Write ""
Response.Write ""%>
|
<%ELSE%>
|
<%
END IF
recCount = recCount + 1
objRSm.MoveNext
Loop
Response.Write" "
ELSE
'Response.Write "Sorry, there are no records in our database."
END IF
%>
|
|