Library " . " Klik op " OK " om de verwijzing voegen
Import 3 de ADODB namespace door het intikken van de volgende regel code in de eerste regel van uw module : .
Imports
ADODB <
Dim ADOconnection
als Nieuwe ADODB.Connection
5
: br >
Type 4 de volgende VB- code hieronder " Sub Main ( ) " om een nieuwe variabele te maken kopieer en plak de onderstaande code om verbinding met een database in SQL server :
ADOconnection.ConnectionString = " Provider = SQLNCLI10 ; " _
& " server = SERVERNAAM ; " _
& " Database = DATABASE NAAM ; " _
& " Integrated Security = SSPI ; " _
& " DataTypeCompatibility = 80 ; " _
& " MARS aansluiting = False ; "
ADOconnection.Open (
)
6
Edit" SERVERNAAM " en typ de naam van uw SQL -server . Bewerken " DATABASE NAME" en typ de naam van de database die u wilt verbinden
Type 7 de volgende om uw verbinding te sluiten wanneer u klaar bent met de aansluiting : .
ADOconnection.Close ( )
ADOconnection
= Nothing