Il Basic 6 (VB6) linguaggio di programmazione Visual utilizza l'oggetto Microsoft Jet Linking and Embedding Database modulo (OLE DB) fornitore di sistemi per la connessione a un database di Access. È possibile creare connessioni a origini dati dall'interno dell'applicazione utilizzando oggetti di connessione dati in programmi VB6. Impostando la proprietà ConnectionString dell'oggetto OleDbConnection, è possibile aprire la connessione a un database di Access. Quando si stabilisce una connessione tra un'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.

istruzione

1 Fare clic su "Start" di Windows e quindi fare clic su "Microsoft Visual Studio."

2 Scegliere "File" e "Apri", quindi fare doppio clic sul programma Visual Basic in cui si desidera connettersi al database di Access.

3 Inserire il codice seguente dopo la riga "Public Shared Main ()" per la connessione al database di Access "Ordini" e inserire un nuovo ordine:

Public Sub ConnectToAccess ()

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

Dim insert_rec Come SqlCommand

'Modificare la stringa di connessione

conn.ConnectionString = & _

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

"C: \ Documents and Settings \ nomeutente \ Documenti \ dbFile.mdb"

Try

conn.Open ()

'Inserto istruzione SQL per aggiungere dati.

insert_rec = New SqlCommand("INSERT INTO Orders (Product

ID, nome del prodotto, il prezzo, Unità, i valori di localizzazione) ( '36127',

'Asse circolare', '250.95', 50, 'Magazzino', conn)

'Monitorare la connessione di errori

Catch ex As Exception

MessageBox.Show ( "Impossibile connettersi a origine dati")

conn.Close ()

End Try

End Sub