Le 6 ( VB6 ) langage de programmation Visual Basic utilise le Jet Object Linking and Embedding Microsoft Base de données (OLE DB) module du système de fournisseur pour se connecter à une base de données Access. Vous pouvez créer des connexions aux sources de données à partir de votre application en utilisant des objets de connexion de données dans les programmes VB6 . En définissant la propriété ConnectionString de l'objet OleDbConnection , vous pouvez ouvrir la connexion à une base de données Access . Lorsque vous établissez une connexion entre une application et la base de données Access , vous pouvez mettre à jour les données , imprimer ou prévisualiser un rapport d' accès et afficher un formulaire Access dans les applications VB6 . Instructions
1

Cliquez sur " Démarrer" de Windows , puis cliquez sur « Microsoft Visual Studio ».
2

choisissez "Fichier " et "Ouvrir ", puis double-cliquez sur le programme Visual Basic dans lequel vous souhaitez vous connecter à votre base de données Access .
3

Entrez le code suivant après la «Main publics partagés ()" ligne de se connecter à des «ordres» accès base de données et insérer un nouvel ordre :

ConnectToAccess public Sub ()

de conn As New System.Data.OleDb.OleDbConnection ()

insert_rec As SqlCommand

'Modifier la chaîne de connexion

conn.ConnectionString = & _

"Provider = Microsoft.Jet.OLEDB.12.0 ; Data Source = " & _

" C: . \\ Documents and Settings \\ nom d'utilisateur \\ Mes Documents \\ dbFile.mdb "

essayer et

conn.Open () insert instruction SQL

' pour ajouter des données < br >

insert_rec = New SqlCommand ( "INSERT INTO commandes ( plus d'infos Produit

ID, nom du produit , le prix, parts, emplacement) valeurs ( '36127 ' , AB

' essieu circulaire ',' 250.95 ', 50 , ' entrepôt », conn)

« surveiller la connexion des erreurs

Catch ex As Exception

MessageBox.Show (" Impossible de se connecter à une source de données »)

conn.Close ()

Fin essayer et

End Sub