August 3rd, 2005, 04:44 PM
|
|
Contributing User
|
|
Join Date: Mar 2005
Posts: 133
Time spent in forums: 3 Days 1 h 43 m 16 sec
Reputation Power: 5
|
|
|
how to use workspace in ado
I don't know how to convert the following DAO code into ADO. Can anyone help me?
PHP Code:
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)
Last edited by CrAzY_J : August 4th, 2005 at 10:03 PM.
|
Dev Shed Forums Sponsor:
Del.icio.us
Digg
Google
Spurl
Blink
Furl
Simpy
Y! MyWeb
Linear Mode
