3 d' importation L'espace de noms ADODB en tapant la ligne de code suivante dans la première ligne de votre module : .
Imports ADODB
4 Type de
le code VB suivant ci-dessous " Sub Main ( ) " pour créer une nouvelle variable :
ADOconnection As New ADODB.Connection
5
copiez et collez le code suivant pour se connecter à une base de données SQL Server :
ADOconnection.ConnectionString = " Provider = SQLNCLI10 ; " _
et " server = NOM DU sERVEUR ; " _
et " Database = nom de la base ; " _
et " Integrated Security = SSPI ; " _
& " DataTypeCompatibility = 80; " _
et «MARS Connection = false; "
ADOconnection.Open
()
6
Modifier " Nom du serveur " et tapez le nom de votre serveur SQL. Modifier " nom de la base " et tapez le nom de la base de données que vous souhaitez vous connecter à
7
Tapez la suivante à fermer votre connexion lorsque vous en avez terminé avec la connexion: .
ADOconnection.Close ()
ADOconnection = Nothing