<%
'on error resume next
set conn=server.createobject("ADODB.CONNECTION")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(""&MDBpath&"admin2005/data/"&MDBname&".mdb")
conn.open connstr
%>
<%
set rs=server.createobject("adodb.recordset")
rs.open ("select top 15 id,title,hits from recipe order by hits desc,title"),conn,1,1
if not rs.eof then
numberid=1
do while not rs.eof
artist=artist& ""&numberid&". "&rs("title")&" ("&rs("hits")&" hits) "
numberid=numberid+1
rs.MoveNext
loop
end if
rs.close
%>
<%
set rs=server.createobject("adodb.recordset")
rs.open ("select top 10 id,title,sort from recipe order by tempdate desc,title"),conn,1,1
if not rs.eof then
numberid=1
do while not rs.eof
newest=newest& ""&numberid&". "&rs("title")&" Recipe, "&left(rs("sort"),20)&" category "'[ "&day(rs("tempdate"))&"-"&month(rs("tempdate"))&", "&year(rs("tempdate"))&" ]
numberid=numberid+1
rs.MoveNext
loop
end if
rs.close
%>
Online Cookbooks, More than 50,000 free Food cooking recipes, and healthy eating Ideas
