Come eseguire una query di Access in VB

February 12

Come eseguire una query di Access in VB


Microsoft Access fornisce alle piccole aziende una soluzione di database. L'accesso è incluso con il Microsoft Office suite di applicazioni, quindi è più conveniente rispetto database aziendali, come Oracle o SQL Server. L'accesso ha la capacità di eseguire query, in modo da poter recuperare i record per l'applicazione Web dal file di database. Poiché Visual Basic (VB) è anche un prodotto Microsoft, il recupero di record richiede solo poche righe di codice.

istruzione

1 Creare le variabili necessarie per il processo di query. Un oggetto di connessione, query e set di record sono necessari per recuperare i record da Visual Basic. Il codice seguente definisce ogni oggetto VB richiesto:

conn fioco come ADODB.Connection
SQL Dim come stringa
rs fiochi come ADODB.Recordset

2 Creare la connessione al database di Access. Il collegamento trova il file di database e lo apre, in modo da poter eseguire query sul file. Il seguente codice apre il database di Access:

conn.Open \ "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C: \ theDB.mdb \"

3 Crea il tuo stringa di query. Il "SQL \" \ variabile definita al punto uno viene utilizzato per creare la query. In questo esempio, la query restituisce il nome di una lista di clienti. Il codice seguente crea una query di Access:

SQL = \ "select first_name dal cliente \"

4 Eseguire la query sul database di Access utilizzando l'oggetto di connessione. Il seguente codice esegue la query e assegna i risultati al \ "rs \" variabile creata nel passo uno:

rs.Open SQL, conn

5 Stampare un record per verificare la query ha avuto successo. È possibile verificare i risultati con la creazione di una finestra di messaggio che indica il primo record nei risultati. I seguenti stampa la prima \ "first_name \" nel gruppo di record:

MsgBox \ "Il primo disco è \" & prima [0] .ToString