Library " . " Klik på "OK " for at tilføje referencen
3 Importer ADODB namespace ved at skrive følgende linje kode i den første linje i dit modul : .
Import ADODB < br >
4
Skriv følgende VB -koden nedenfor "Sub Main () " for at oprette en ny variabel : Hej
Dim ADOconnection Som New ADODB.Connection
5
Kopier og indsæt følgende kode til at forbinde til en database i SQL -server : Hej
ADOconnection.ConnectionString = " Provider = SQLNCLI10 , " _
& " server = sERVER NAME , " _
& " Database = databasenavn , " _
& " Integrated Security = SSPI , " _
& " DataTypeCompatibility = 80; " _
& " MARS tilslutning = false; "
ADOconnection.Open ()
6
Edit " sERVER NAME " , og skriv navnet på din SQL server. Edit " DATABASE NAME" , og skriv navnet på den database, du vil oprette forbindelse til
7
Skriv følgende for at lukke din forbindelse, når du er færdig med tilslutning: .
ADOconnection.Close ()
ADOconnection = Nothing