Ik heb het volgende script geschreven in VB in MS Access:
[script]
Dim cnn As ADODB.Connection
Dim cnn2 As ADODB.Connection
Dim rs As ADODB.Recordset
Dim rs2 As ADODB.Recordset
Set cnn = New ADODB.Connection
Set cnn2 = New ADODB.Connection
Set rs = New ADODB.Recordset
Set rs2 = New ADODB.Recordset
cnn.Open "PROVIDER=SQLOLEDB;DATA SOURCE=ATLET55;UID=jan;PWD=ps1;DATABASE=ScalaTestServer"
rs.Open "select * from [SL010100] where [SL01001] = " & [Forms]![Vergelijk]![SL01001], cnn
cnn2.Open "PROVIDER=SQLOLEDB;DATA SOURCE=ATLET55;UID=jan;PWD=ps2;DATABASE=SuperOffice CRM5"
rs2.Open "select * from [contact] where [number2] = " & [Forms]![Vergelijk]![SL01001], cnn2
MsgBox rs("SL01002") & " - " & rs2("number2")
[/script]
Ik kom er niet meer uit.
De eerste koppeling doet het, maar de tweede geeft de foutmelding: Invalid Object "contact".
Normaal gesproken zou je zeggen: 'de tabel contact bestaat niet', maar die bestaat wel degelijk.
Ik heb al een aantal dingen geprobeerd:
-Andere database geopent m.b.v. de tweede koppeling. WERKT! (het ligt dus niet aan het script)
-De rechten gecontroleerd. Kloppen met twijvel. Ik login met 'jan'. 'jan' heeft alle rechten op die tabel. Dus dit zou moeten werken.
-De Database 'SuperOffice CRM5' wordt wel geopent, maar geeft een fout wanneer ik de tabel 'contact' wil raadplegen.
Heeft iemand hier ervaring mee/oplossing voor?
[script]
Dim cnn As ADODB.Connection
Dim cnn2 As ADODB.Connection
Dim rs As ADODB.Recordset
Dim rs2 As ADODB.Recordset
Set cnn = New ADODB.Connection
Set cnn2 = New ADODB.Connection
Set rs = New ADODB.Recordset
Set rs2 = New ADODB.Recordset
cnn.Open "PROVIDER=SQLOLEDB;DATA SOURCE=ATLET55;UID=jan;PWD=ps1;DATABASE=ScalaTestServer"
rs.Open "select * from [SL010100] where [SL01001] = " & [Forms]![Vergelijk]![SL01001], cnn
cnn2.Open "PROVIDER=SQLOLEDB;DATA SOURCE=ATLET55;UID=jan;PWD=ps2;DATABASE=SuperOffice CRM5"
rs2.Open "select * from [contact] where [number2] = " & [Forms]![Vergelijk]![SL01001], cnn2
MsgBox rs("SL01002") & " - " & rs2("number2")
[/script]
Ik kom er niet meer uit.
De eerste koppeling doet het, maar de tweede geeft de foutmelding: Invalid Object "contact".
Normaal gesproken zou je zeggen: 'de tabel contact bestaat niet', maar die bestaat wel degelijk.
Ik heb al een aantal dingen geprobeerd:
-Andere database geopent m.b.v. de tweede koppeling. WERKT! (het ligt dus niet aan het script)
-De rechten gecontroleerd. Kloppen met twijvel. Ik login met 'jan'. 'jan' heeft alle rechten op die tabel. Dus dit zou moeten werken.
-De Database 'SuperOffice CRM5' wordt wel geopent, maar geeft een fout wanneer ik de tabel 'contact' wil raadplegen.
Heeft iemand hier ervaring mee/oplossing voor?