ADODB nicht vorhanden sind in Access 2013 project, wie füge ich einen Verweis darauf

Ich versuche den Neuaufbau einer Access adp-Projekt in Access 2013 und mdb. Die Tabellen sind alle verknüpfte Tabellen in beiden Versionen, so dass ist nicht ein Problem.

Habe ich importiert die Formen aus dem alten Projekt, so dass die Formular-layouts und code ist alles dabei.

Wo ich laufen in Probleme, wenn Sie versuchen, führen Sie den folgenden code:

Dim cmd As New ADODB.Connection, RS As New ADODB.Recordset
cmd.ActiveConnection = connectionString
Debug.Print connectionString
cmd.ActiveConnection.CursorLocation = adUseClient
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "sp_Myproc"
cmd.Parameters.Refresh
cmd(1) = Me.my_id
Set RS = cmd.Execute

'Should be checking if record set is open and explicitly close it. JWS
If RS.State = 1 Then
RS.Close
Set RS = Nothing
End If

cmd.ActiveConnection.Close

Ich bin nicht in der Lage zu erklären, die cmd-und RS-Variablen, da ADODB scheint nicht zu existieren. Wie kann ich einen Verweis auf diese in Access oder was ist der richtige Weg, dies zu erreichen?

In den VBA-Editor, haben Sie sichergestellt, dass die ADODB-Verweis aktiviert ist? (Menü "Extras" > "Verweise...", und stellen Sie sicher, dass "Microsoft ActiveX Data Objects-x.x Library" aktiviert ist). Ein weiterer Verweis hier.
Danke. Ich Leben normalerweise in Visual Studio, so bin ein wenig aus meinem element in den VBA-editor.

InformationsquelleAutor John S | 2014-04-03

Schreibe einen Kommentar