Het is handig om te weten hoe u een Microsoft Access- database met behulp van een Data Source Name ( DSN ) via een Open Database Connectivity ( ODBC ) -verbinding opvragen . Microsoft Access is een relationele database- applicatie die gewoonlijk wordt gebruikt voor kleinere databases . Visual Basic.NET wordt vaak gebruikt om verbinding te maken met een Access-database . Programmeurs vereisen doorgaans een gegevensbank te raadplegen inhoud voor verdere data manipulatie . Met behulp van een DSN is handig omdat u de DSN handmatig kunt bijwerken zodat het naar een andere database zonder dat u uw Visual Basic-code bewerken . Wat je nodig hebt
System DSN verbinding
Microsoft Access-database
Microsoft Visual Basic 2010 Express
Toon Meer Aanwijzingen
1 Start Microsoft Visual Basic 2010 Express , klikt u op " File " en selecteer " New Project ... " . Klik op " Windows Forms applciation " en selecteer " OK". Dubbelklik op " Button "
uit het menu " Toolbox " om een nieuwe knop toe te voegen aan " Form1 " . Dubbelklik op " Button1 " naar " Form1.vb " te openen . Type " Invoer System.Data.Odbc.OdbcConnection " in de eerste regel van de " Form1.vb " module .
Klik 2 binnenkant " Private Sub Button1_Click " en typ het volgende om uw variabelen te verklaren en open uw DSN connectie : Dim loopCounter
als Geheel Dim odbcConn
Zoals Odbc.OdbcConnection
odbcConn = Nieuw Odbc.OdbcConnection ( " DSN = myDSN " ) op Twitter odbcConn.Open ( ) Bewerken
" DSN = myDSN " uw " DSN " naam toevoegen
Type 3 het volgende toe aan uw Access- database te ondervragen . : Dim odbcDataAdapter
als Nieuwe Odbc.OdbcDataAdapter ( "SELECT * FROM TABLE1 TABLE1 ; . " , odbcConn ) Dim odbcDataSet
als Nieuwe Data.DataSet odbcDataAdapter.Fill
( odbcDataSet ) op bewerken " SELECT * FROM TABLE1 TABLE1 ; . ' om uw specifieke vraag toe
Type 4 de volgende voor het doorlussen van uw vraag en geven een bericht weer met informatie uit de . eerste veld :
loopCounter = 0 Om odbcDataSet.Tables ( 0 ) Rows.Count - 1 MsgBox
( odbcDataSet.Tables ( 0 ) Rijen ( loopCounter ) artikel ( 0 ) . . . ) op volgende
5 Typ het volgende om uw variabelen los te maken van het geheugen : odbcConn.Close
( ) op odbcConn.Dispose ( ) odbcConn = Nothing Druk op " F5 "
om uw programma uit te voeren en klik op ' Button1 ' .
|
