Visual Basic 6 ( VB6 ) programmeringssprog bruger Microsoft Jet Object Linking and Embedding Database ( OLE DB) udbyder systemet modul for tilslutning til en Access-database . Du kan oprette forbindelser til datakilder fra din ansøgning ved hjælp af dataforbindelsen objekter i VB6 programmer. Ved at indstille ConnectionString ejendom OleDbConnection objekt, kan du åbne forbindelsen til en Access -database. Når du opretter en forbindelse mellem en ansøgning og den Access-database , kan du opdatere data , print eller forhåndsvisning en Access-rapport og vise en Access- formular i VB6 applikationer. Instruktioner
1

Klik på " Start" i Windows og derefter klikke på "Microsoft Visual Studio ".
2

Vælg "File " og " Open " og derefter dobbeltklikke på Visual Basic-program , hvor du ønsker at forbinde til din Access-database.
3

Indtast følgende kode efter "Public Shared Main ( )" linje til at forbinde til " ordrer " Adgang database og indsætte en ny orden : Hej

Public Sub ConnectToAccess ()

Dim conn som ny System.Data.OleDb.OleDbConnection ()

Dim insert_rec Som SqlCommand

' ændre forbindelsen strengen

conn.ConnectionString = & _

" Provider = Microsoft.Jet.OLEDB.12.0 , data source = " & _

" C: . \\ Documents and Settings \\ brugernavn \\ Dokumenter \\ dbFile.mdb "

Prøv

conn.Open ()

« indsættes SQL-sætning til at tilføje data < br >

insert_rec = Ny SqlCommand ( " INSERT INTO ordrer (Product

id, Produktnavn, Pris , Units, Location) værdier ( '36127 ' ,

' cirkulære Aksel ',' 250,95 ' , 50 ' lager ' , forbind )

' overvåge forbindelsen for fejl

Fang ex Som Exception

MessageBox.Show ( "Kunne ikke forbinde til datakilde " )

conn.Close ()

End Prøv

End Sub