% set conn=server.createobject("adodb.connection") conn.ConnectionString="driver={Microsoft Access Driver (*.mdb)};DBQ=" &server.MapPath("/manage/news/sydt.mdb") conn.open sql="select * from pic1 order by id desc" set rs=conn.execute(sql) %>