<%
connstr="DBQ="+server.mappath("database/database.mdb")+";DRIVER={Microsoft Access Driver (*.mdb)}"
Set conn= Server.CreateObject("ADODB.Connection")
conn.open connstr
sql = "select * from ypxxtwo order by date desc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,1
%>
<%sql = "select * from ypaddtwo order by date desc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,1%>