心情

<%
'use access database example
set conn=server.CreateObject("ADODB.Connection")
set rs=server.CreateObject("ADODB.Recordset")
conn.open("driver={Microsoft Access Driver (*.mdb)};dbp=server.MapPath("person.mdb"))
sql="select * from grade"
rs.open sql,conn,3
while not rs.eof or not rs.bof
response.Write(rs("name"))
......
rs.movenext
wend
'use Sql server database example
set conn=server.CreateObject("ADODB.Connection")
conn.open("driver={SQL Server};database=pubs;server=localhost;uid=sa;pwd=123456")
sql="select * from grade"
'conn.Execute(sql) not return recordset
set rs=conn.Execute(sql)
rs.moverfirst()
while not rs.eof or not rs.bof
response.Write(rs("name"))
......
rs.movenext
wend

%>