Microsoft Access è un piccolo motore di database utilizzato da principianti o per i siti web di piccole dimensioni. È possibile utilizzare Visual Basic ( VB) per interrogare il database direttamente nel codice . Questo è utile per coloro che vogliono fornire un sito web dinamico per i loro lettori . Per interrogare il database , è necessario creare una connessione , inviare la query e assegnare i risultati alla vostra variabile di Visual Basic . Istruzioni
1
doppio clic sul form di Visual Basic per aprire il codice del file e caricarlo nel vostro editor di VB . Scorrere fino alla sezione del codice VB in cui si desidera posizionare la connessione al database e la query.
2
Creare la connessione al database . La variabile di connessione contiene il server e il database a cui si desidera connettersi . Il codice seguente crea un collegamento :
Dim conn As String = "Data Source = localhost ; Initial Catalog = Northwind ; Integrated Security = True "
Dim sqlcon Come SqlConnection = New SqlConnection ( conn )
sqlcon.Open ( ) per
il testo " localhost" si collega al computer locale in cui si trova il codice del sito web . Se il server di database è su un altro computer , digitare il nome del computer al posto di " localhost ". Sostituire " Northwind " con il nome del database .
3
query le tabelle e recuperare le informazioni del database . Il codice seguente mostra come query di Access utilizzando la connessione creata nel passaggio tre:
variabile Dim As String = " Miami "
Dim strSelect As String = "SELECT * FROM Customers WHERE City = ' "& variabile &" ' "
Dim dscmd come nuovo SqlDataAdapter ( strSelect , sqlcon )
Dim ds As New DataSet ( ) per
dscmd.Fill ( ds , " clienti " ) per
Nel codice precedente , viene inviata una query al database di Access utilizzando la variabile chiamata " variabile " . Questa variabile contiene la città " Miami ". Questa variabile viene inviato al database di Access . La query viene inviata e tenuto in una variabile di set di dati denominato "ds ".
4
Stampa il primo record per testare il nuovo codice . Il seguente codice stampa il cognome del primo record nei risultati della query :
ds.Tables.Item MsgBox ( " cognome " ) economici