% Set conn= Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") MM_pthy_STRING = "driver={Microsoft Access Driver (*.mdb)};dbq=" &Server.MapPath("db/stone.mdb") conn.open MM_pthy_STRING sql="select * from sys " rs.open sql,conn,1,3 %>