<%
set conn=server.createobject("adodb.connection")
provider="provider=microsoft.jet.oledb.4.0;"
dbpath="data source="&server.mappath("data/031dv.mdb")
conn.open provider&dbpath
set rs=server.createobject("adodb.recordset")
sql="select * from 031dv order by id desc"
rs.open sql,conn,1,1
%>
<%
u=0
do while u<=1
if rs.eof then exit do
%>
