Oracle FAQ | Your Portal to the Oracle Knowledge Grid |
Home -> Community -> Usenet -> c.d.o.misc -> Using workspace in ADO
I want to convert following DAO code into ADO.
Dim oRS1 As Recordset
Dim oRS2 As Recordset
Dim oWRK As Workspace
Dim i As Long
i = 0
Set oWRK = CreateWorkspace("", "", "", dbUseODBC)
Set oDB = oWRK.OpenDatabase("vgtp", dbDriverComplete, False, "ODBC;DSN=VGTP;UID=ACCFE;DBQ=VGTP; PWD=ACCFE_X") Set oRS1 = oDB.OpenRecordset("SELECT * FROM TESTRC")
Do While Not oRS1.EOF
Set oRS2 = oDB.OpenRecordset("SELECT * FROM TESTRC WHERE VELD01 = ’" & oRS1(1) & "’", dbOpenDynaset)
Can someone please help me with this. I don’t know how to use workspace in ADO.
Enver
-- Posted using the http://www.dbforumz.com interface, at author's request Articles individually checked for conformance to usenet standards Topic URL: http://www.dbforumz.com/Oracle-workspace-ADO-ftopict245245.html Visit Topic URL to contact author (reg. req'd). Report abuse: http://www.dbforumz.com/eform.php?p=851204Received on Thu Aug 04 2005 - 19:42:16 CDT