用数据源
set conn=Server.CreateObject("ADODB.Connection")
conn.open"dsn=hcgl;uid=wy;pwd=yan"
source1="select 姓名,密码 from 密码表 where 姓名='" & uid & "' and 密码='" & pwd & "'"
set myrst=conn.execute(source1)
不用:
dim conn
dim myrst
Set conn = Server.CreateObject("ADODB.Connection")
'使 用 Microsoft OLEDB Provider for ODBC Drivers + SQL Server (Ms SQL 的 ODBC Driver)两 层 接 口 :
conn.Open "Data PROVIDER=MSDASQL.1;Driver=SQL Server;Server=wy;UID=wy;PWD=yan;Database=ggxt"
Set myrst = Server.CreateObject("ADODB.Recordset")
sql="select * from table"
myrst.open sql,conn,3,3