Visual Basic 6 ( VB6 ) programmeringsspråk använder Microsoft Jet Object och inbäddning Database ( OLE DB ) modul leverantör för att ansluta till en Access-databas . Du kan skapa anslutningar till datakällor från din ansökan med hjälp dataanslutning objekt i VB6 program . Genom att ställa ConnectionString egenskapen OleDbConnection objektet , kan du öppna anslutningen till en Access-databas . När du upprättar en anslutning mellan en applikation och Access-databas , kan du uppdatera data , skriva ut eller förhandsgranska en Access-rapport och visar ett Access-formulär i VB6 applikationer . Instruktioner
1
Klicka på "Start " i Windows och klicka sedan på " Microsoft Visual Studio . "
2
Välj " File " och " Open " och sedan dubbelklicka på Visual Basic-program som du vill ansluta till din Access-databas .
3
Skriv följande kod efter " Public Shared Main ( ) " för att ansluta till " beställningar " Åtkomst databas och infoga en ny ordning :
Public Sub ConnectToAccess ( ) katalog
Dim conn som ny System.Data.OleDb.OleDbConnection ( ) katalog
Dim insert_rec Som SqlCommand
'Ändra anslutningen
strängen
conn.ConnectionString = & _
" Provider = Microsoft.Jet.OLEDB.12.0 , Data source = " & _
" C: . \\ Documents and Settings \\ användarnamn \\ Mina dokument \\ dbFile.mdb "
Prova
conn.Open ( ) katalog
" insert SQL-sats för att lägga till data
insert_rec = Ny SqlCommand ( " INSERT INTO Orders ( Product
ID , Produktnamn , Pris , enheter, placering ) värden ( '36127 ' ,
' Circular Axel ' , ' 250,95 " , 50 , " Warehouse " , conn ) katalog
" övervaka anslutningen för fel
Catch ex som Exception
MessageBox.Show ( " Kunde inte ansluta till datakällan " ) katalog
conn.Close ( ) katalog
End Försök
End Sub
