<%
id=5
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")
%> |
1. Rice helps feed two-thirds of the world's
population.
2. Rice has been feeding mankind for more than
5,000 years.
3. Rice is used in beer, dog food, baby food,
breakfast cereals, snacks, frozen foods and sauces,
and much more!
4. Rice can germinate and thrive in flooded fields.
5. Three of the world’s four most populous
nations are rice-based societies—China,
India, and Indonesia. Together, they have nearly
2.5 billion people.
6. In Japan, it is believed that soaking rice
before cooking releases the life energy and gives
the eater a more peaceful soul. To encourage Japanese
children to eat all of their rice the grains are
affectionately called little Buddhas.
7. The first documented account of rice was by
a Chinese emperor about 2,800 BC.
8. In China a typical greeting, instead of "How
are you?" is "Have you had your rice
today?” A greeting to which one is expected
always to reply, "Yes.”
9. Two Japanese car brands were named after rice:
Toyota, meaning "Bountiful Rice Field,"
and Honda, meaning "Main Rice Field."
10. One seed of rice yields more than 3,000 grains.
It is the highest yielding cereal grain and can
grow in many kinds of environments and soils,
which is why it is grown on every continent except
Antarctica.
<%
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
%>
|
|
|
|