The Visual Basic 6 ( VB6 ) programmeringsspråk bruker Microsoft Jet Object Linking and Embedding Database ( OLE DB ) leverandør system modul for tilkobling til en Access database. Du kan opprette tilkoblinger til datakilder fra programmet ved hjelp av data tilkoblingsobjekter i VB6 programmer. Ved å sette ConnectionString eiendom OleDbConnection objektet, kan du åpne tilkoblingen til en Access database. Når du oppretter en tilkobling mellom en applikasjon og Access-databasen , kan du oppdatere data , skrive ut eller forhåndsvise en Access-rapport og vise et Access-skjema i VB6 programmer . Instruksjoner
en
Klikk "Start" i Windows og deretter " Microsoft Visual Studio. "
2
Velg "File" og "Åpne ", dobbeltklikk deretter på Visual Basic program der du vil koble til Access-databasen.
3
Skriv inn følgende kode etter " Public Delt Main ( ) "-linjen for å koble til "Orders " Tilgang database og sette inn en ny bestilling : en
Public Sub ConnectToAccess ( )
Dim conn som ny System.Data.OleDb.OleDbConnection ( )
Dim insert_rec Som SqlCommand
' endre tilkoblingen strengen
conn.ConnectionString = & _
" Provider = Microsoft.Jet.OLEDB.12.0 ; data source = " & _
" C: . \\ Documents and Settings \\ brukernavn \\ Mine dokumenter \\ dbFile.mdb "
Prøv
conn.Open ( )
'insert SQL-setning for å legge til data
insert_rec = Ny SqlCommand ( " INSERT INTO Orders ( Etiketter
ID , Produktnavn , Pris , Units , Location) verdier ( '36127 ' , etter
' Circular Aksel ',' 250,95 ' , 50 , ' Warehouse ' , conn )
' overvåke tilkoblingen for feil
Catch ex As Exception
MessageBox.Show ( " Kan ikke koble til datakilden " )
conn.Close ( )
End Prøv
End Sub