E ' utile sapere come eseguire una query di un database di Microsoft Access utilizzando un Data Source Name ( DSN ) attraverso un Open Database Connectivity ( ODBC) di connessione. Microsoft Access è un'applicazione di database relazionale che viene comunemente utilizzato per i database più piccoli . Visual Basic.NET è spesso usato per connettersi a un database di Access . I programmatori di solito richiedono l'interrogazione di un contenuto del database per un ulteriore manipolazione dei dati. Utilizzo di un DSN è conveniente perché è possibile aggiornare manualmente il DSN per puntare a un database diverso , senza dover modificare il codice Visual Basic . Cose che ti serviranno
DSN di sistema connessione
di database Microsoft Access
Microsoft Visual Basic 2010 Express
Mostra più istruzioni
1
Avviare Microsoft Visual Basic 2010 Express , fare clic su "File" e selezionare " Nuovo progetto ... " . Clicca
doppio clic su " Pulsante " dal menu " Strumenti " per aggiungere un nuovo pulsante di " Form1 " " applciation Windows Form " e selezionare "OK ". . Fare doppio clic su " Button1 " per aprire " Form1.vb " . Tipo " Importazioni System.Data.Odbc.OdbcConnection " nella prima riga del modulo " Form1.vb " .
2
Clicca dentro " Private Sub Button1_Click " e digitare il seguente per dichiarare le variabili e aprire la connessione DSN :
Dim loopCounter As Integer Dim
odbcConn Come Odbc.OdbcConnection
odbcConn = New Odbc.OdbcConnection ( " DSN = myDSN " ) per
odbcConn.Open ( ) per
Modifica " DSN = myDSN " per aggiungere il tuo nome " DSN "
3
digitare quanto segue per interrogare il database di Access . :
Dim OdbcDataAdapter As New Odbc.OdbcDataAdapter ( "SELECT * FROM TABLE1 TABLE1 ; ». , odbcConn ) per
Dim odbcDataSet As New Data.DataSet
odbcDataAdapter.Fill ( odbcDataSet ) per
Modifica "SELECT * FROM TABLE1 TABLE1 ; ". aggiungere la query particolare
4
digitare quanto segue per un ciclo tra la query e visualizzare una finestra di messaggio con informazioni dal . primo campo :
loopCounter = 0 Per odbcDataSet.Tables ( 0 ) Rows.Count - 1
MsgBox ( odbcDataSet.Tables ( 0 ) Righe ( loopCounter ) Voce ( 0) . . . ) per
Successivo
5
digitare quanto segue per rilasciare le variabili dalla memoria :
odbcConn.Close ( ) per
odbcConn.Dispose ( )
odbcConn = Nothing
Premere " F5 " per eseguire il programma e fare clic su " Button1 " .