In diesem Abschnitt wird eine einfache Visual Basic-Routine beschrieben, die eine Verbindung zu einer Datenbank herstellt.

Beispielcode

Sie können diese Routine ausprobieren, indem Sie eine Befehlsschaltfläche namens Command1 in einer Maske platzieren und die Routine in ihr Klick-Ereignis einfügen. Führen Sie das Programm aus und klicken Sie auf die Schaltfläche, um eine Verbindung herzustellen und trennen Sie die Verbindung dann.

Private Sub cmdTestConnection_Click( _
        ByVal eventSender As System.Object, _
        ByVal eventArgs As System.EventArgs) _
        Handles cmdTestConnection.Click
 
    ' Declare variables
    Dim myConn As New ADODB.Connection
    Dim myCommand As New ADODB.Command
    Dim cAffected As Integer

    On Error GoTo HandleError

    ' Establish the connection
    myConn.Provider = "SAOLEDB"
    myConn.ConnectionString = _
        "Data Source=SQL Anywhere 11 Demo"
    myConn.Open()
    MsgBox("Connection succeeded")
    myConn.Close()
    Exit Sub

HandleError:
    MsgBox(ErrorToString(Err.Number))
    Exit Sub
End Sub

Hinweise

Das Beispiel führt die folgenden Aufgaben aus:

Wenn der SAOLEDB-Provider installiert ist, registriert er sich selbst. Bei diesem Registrierungsprozess werden Registrierungseinträge im COM-Abschnitt der Registrierung vorgenommen, damit ADO die DLL finden kann, wenn der SAOLEDB-Provider aufgerufen wird. Wenn Sie den Speicherort Ihrer DLL ändern, müssen Sie sie neu registrieren.

♦  So registrieren Sie den OLE DB-Provider

1. Öffnen Sie eine Eingabeaufforderung.

2. Wechseln Sie zu dem Verzeichnis, in dem der OLE DB-Provider installiert ist.

3. Geben Sie die folgenden Befehle ein, um den Provider zu registrieren:

   regsvr32 dboledb11.dll regsvr32 dboledba11.dll

Weitere Hinweise, wie Sie mit OLE DB eine Verbindung zu einer Datenbank herstellen, finden Sie unter Mit einer Datenbank über OLE DB verbinden.