Hvordan koble til Access i VB6

Visual Basic 6 (VB6) programmeringsspråk bruker Microsoft Jet Object Linking and Embedding Database (OLE DB) leverandør system modul for å koble til en Access-database. Du kan opprette forbindelser til datakilder fra programmet ved hjelp av datatilkoblingsobjekter i VB6 programmer. Ved å sette Connection eiendommen av OleDbConnection objektet, kan du åpne tilkobling til en Access-database. Når du etablere en forbindelse mellom en applikasjon og Access-databasen, kan du oppdatere data, skrive ut eller forhåndsvise en Access-rapport og vise en Access-skjema i VB6 programmer.

Bruksanvisning

1 Klikk "Start" i Windows og deretter "Microsoft Visual Studio."

2 Velg "File" og "Open", og deretter dobbeltklikker du på Visual Basic program der du ønsker å koble til Access database.

3 Skriv inn følgende kode etter "Public Shared main ()" linje for å koble til "Ordre" Access database og sette inn en ny ordre:

Public Sub ConnectToAccess ()

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

Dim insert_rec Som SqlCommand

'Endre tilkoblingsstrengen

conn.ConnectionString = & _

"Provider = Microsoft.Jet.OLEDB.12.0; Datakilde =" & _

"C: \ Documents and Settings \ brukernavn \ Mine dokumenter \ dbFile.mdb"

Try

conn.Open ()

"Sett inn SQL-setning for å legge til data.

insert_rec = New SqlCommand("INSERT INTO Orders (Product

ID, Produktnavn, Pris, Units, plassering) verdier ( '36127',

'Circular Aksel', '250,95', 50 'Warehouse ", conn)

'Overvåke tilkobling for feil

Catch ex As Exception

MessageBox.Show ( "Klarte ikke å koble til datakilden")

conn.Close ()

End Try

End Sub