Library " . " Klicken Sie auf " OK", um den Verweis hinzuzufügen
3 Import der ADODB Namespace , indem Sie die folgende Codezeile in der ersten Zeile des Moduls : .
Imports ADODB
4
Geben Sie den folgenden VB-Code unter "Sub Main () ", um eine neue Variable :
Dim As New ADOConnection ADODB.Connection
5
Kopieren Sie den folgenden Code zu einer Datenbank in SQL Server zu verbinden :
ADOconnection.ConnectionString = "Provider = SQLNCLI10 ; " _
& " Server = SERVER NAME; " _
& " Database = DATABASE NAME; " _
& " Integrated Security = SSPI ; " _
& " DataTypeCompatibility = 80; " _
& " MARS Anschluss = false; "
ADOconnection.Open ()
6
Edit" SERVER NAME " und geben Sie den Namen Ihres SQL Servers. Bearbeiten " DATABASE NAME" und geben Sie den Namen der Datenbank, die Sie zu
7
Geben Sie die folgende Verbindung , um die Verbindung zu schließen, wenn Sie mit der Verbindung fertig : .
ADOconnection.Close ()
ADOConnection = Nothing