Nwlapcug.com


Come eseguire una Query di un Database di Microsoft Access utilizzando il DSN



È utile sapere come eseguire una query di un database di Microsoft Access utilizzando un nome di origine dati (DSN) attraverso una connessione Open Database Connectivity (ODBC). Microsoft Access è un'applicazione di database relazionale che viene comunemente utilizzata per i database. Visual Basic.NET viene spesso utilizzato per connettersi a un database di Access. I programmatori di solito richiedono l'esecuzione di query un contenuto del database per 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.

Istruzioni

1

Avviare Microsoft Visual Basic 2010 Express, fare clic su "File" e selezionare "Nuovo progetto...". Fare clic su "Windows Forms Applciation" e selezionare "OK".

Fare doppio clic sul "Pulsante" dal menu "Strumenti" per aggiungere un nuovo pulsante a "Form1". Fare doppio clic su "Button1" aprire "Form1. vb". Digitare "Importazioni System.Data.Odbc.OdbcConnection" nella prima riga del modulo "Form1. vb".

2

Fare clic all'interno di "Private Sub Button1_Click" e digitare quanto segue per dichiarare le variabili e aprire la connessione DSN:

Dim loopCounter As Integer

Dim odbcConn come Odbc.OdbcConnection

odbcConn = nuovo Odbc.OdbcConnection("DSN=myDSN")

odbcConn.Open()

Modificare "DSN = myDSN" per aggiungere il nome di "DSN".

3

Digitare quanto segue per eseguire query di database di Access:

OdbcDataAdapter Dim come nuovo Odbc.OdbcDataAdapter("SELECT TABLE1.* FROM TABLE1;", odbcConn)

Dim odbcDataSet As New Data.DataSet

odbcDataAdapter.Fill(odbcDataSet)

Modifica "SELECT TABLE1.* FROM TABLE1" per aggiungere il tuo particolare query.

4

Digitare quanto segue per scorrere in ciclo la query e visualizzare una finestra di messaggio con informazioni dal primo campo:

Per loopCounter = 0 To odbcDataSet.Tables(0). Rows. Count - 1

MsgBox(odbcDataSet.Tables(0). Rows(loopCounter). Item(0))

Successivo

5

Digitare il comando seguente per rilasciare le variabili dalla memoria:

odbcConn.Close()

odbcConn.Dispose()

odbcConn = Nothing

Premere "F5" per eseguire il programma e fare clic su "Button1".