set Rs=Server.CreateObject("ADODB.recordset") Rs.Open Stringa, actconn, cursortyp, locktyp, opt Rs.Open Stringa, 3, 3, 3 <% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open "c:/webdata/northwind.mdb" set rs = Server.CreateObject("ADODB.recordset") rs.Open "Customers", conn %> Oppure <% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open "c:/webdata/northwind.mdb" set rs = Server.CreateObject("ADODB.recordset") rs.Open "Select * from Customers", conn %> set objRecordset=Server.CreateObject("ADODB.recordset") |