用oo4oDim OraSess As Object
Dim OraConn As Object
Dim OraDynaset As Object Set OraSess = CreateObject("OracleInProcServer.XOraSession")
Set OraConn = OraSess.OpenDatabase("yourdb", "username/password", CLng(3)) strSql = "....."
Set OraDynaset = OraConn.CreateDynaset(strSql, CLng(3))
Dim OraConn As Object
Dim OraDynaset As Object Set OraSess = CreateObject("OracleInProcServer.XOraSession")
Set OraConn = OraSess.OpenDatabase("yourdb", "username/password", CLng(3)) strSql = "....."
Set OraDynaset = OraConn.CreateDynaset(strSql, CLng(3))
是oracle的数据库访问组件。