Dim rst As Object
Set rst = CreateObject("ADODB.RecordSet")
rst.ActiveConnection = "DSN=数据源;" & _
"UID=用户名;" & _
"PWD=密码"
rst.CursorType = adOpenKeyset
rst.Source = "select * from tab"
rst.Open
Set rst = Nothing
Set rst = CreateObject("ADODB.RecordSet")
rst.ActiveConnection = "DSN=数据源;" & _
"UID=用户名;" & _
"PWD=密码"
rst.CursorType = adOpenKeyset
rst.Source = "select * from tab"
rst.Open
Set rst = Nothing
string strConnect="Driver={Microsoft ODBC for Oracle};Server=bean;Uid=aaa;pwd=bbb;";Microsoft.Data.Odbc.OdbcConnection odbcConnection1=new Microsoft.Data.Odbc.OdbcConnection(strConnect);odbcConnection1.Open();
Response.Write("OK");
odbcConnection1.Close()