Il Basic 6 ( VB6 ) linguaggio di programmazione visiva utilizza il getto di oggetti di Microsoft Linking and Embedding Database ( OLE DB ) modulo di sistema di provider per la connessione a un database di Access . È possibile creare connessioni a origini dati dall'interno dell'applicazione utilizzando gli oggetti di connessione dati in programmi di VB6 . Impostando la proprietà ConnectionString dell'oggetto OleDbConnection , è possibile aprire la connessione a un database di Access . Quando si stabilisce una connessione tra l' applicazione e il database di Access , è possibile aggiornare i dati , stampare o visualizzare in anteprima un report di Access e visualizzare una maschera di Access in applicazioni VB6 . Istruzioni 
 1 
 Fare clic su " Start" di Windows e quindi fare clic su "Microsoft Visual Studio ". 
 2 
 Scegliere "File" e "Apri ", quindi fare doppio clic su il programma di Visual Basic in cui si desidera effettuare la connessione al database di Access . 
 3 
 Inserisci il seguente codice dopo il " Public principale condivisa ( ) " linea per la connessione a Access " ordini " del database e inserire un nuovo ordine : 
 
 pubblico ConnectToAccess Sub ( ) per 
 Dim conn As New System.Data.OleDb.OleDbConnection ( ) per 
 Dim insert_rec Come 
 SqlCommand 
 'Modifica la stringa di connessione 
 
 conn.ConnectionString = & _ 
 
 "Provider = Microsoft.Jet.OLEDB.12.0 ; fonte dati = " & _ 
 
 " C: . \\ Documents and Settings \\ nomeutente \\ Documenti \\ dbFile.mdb " 
 
 Prova 
 
 conn.Open ( ) istruzione SQL insert 
 
 ' per aggiungere i dati < br > 
 insert_rec = New SqlCommand ( " INSERT INTO ordini ( 
 prodotto 
 ID , Nome prodotto , prezzo , disponibilità , Località ) valori ( '36127 ' , Stati 
 ' Asse circolare ',' 250,95 ' , 50 , ' Magazzino ' , conn ) per 
 ' monitorare la connessione per gli errori 
 
 Catch ex As Exception 
 
 MessageBox.Show ( "Impossibile connettersi all'origine dati " ) per 
 conn.Close ( ) per 
 End Try End Sub