Come eseguire query di Access in Visual Basic

August 2

Come eseguire query di Access in Visual Basic


Avere la conoscenza per eseguire query di Microsoft Access da un'applicazione Visual Basic.NET può aiutare a rendere l'applicazione più dinamico. Access è un sistema di gestione di database relazionali incluso nella suite Microsoft Office. Visual Basic.NET è un linguaggio di programmazione utilizzato per sviluppare applicazioni Windows ed è relativamente facile da usare. E 'spesso necessario per effettuare gli aggiornamenti di un database di Access da un'applicazione Visual Basic in base all'input dell'utente. In pochi passi, è possibile scrivere codice Visual Basic per eseguire le query in Access.

istruzione

1 Avviare Microsoft Office Access e selezionare "Database vuoto." Nome del database "QueryTest" e fare clic su "Crea".

2 Creare una nuova tabella e il nome "Table1". Il primo tipo di riga "John" sotto "Field1" e "Smith" sotto "Campo2."

Aggiungere un'altra riga digitando "Jaime" sotto "Field1" e "Gonzalez" sotto "Campo2."

Salva "Table1" e vicino.

3 Avviare Microsoft Visual Basic 2010 Express e selezionare "New Project" nel menu "File". Selezionare "Applicazione Windows Form" e fare clic su "OK".

Fai clic su "Strumenti" nel riquadro a sinistra della finestra e fare doppio clic su "Pulsante" per aggiungere un pulsante al form. Fare doppio clic su "Button1" per aprire il modulo "Form1.vb", dove potrete digitare il codice.

4 Tipo "Imports System.Data.OleDb" sulla parte superiore del modulo "Form1.vb".

Fare clic all'interno "Private Sub Button1_Click" per iniziare a digitare il codice Visual Basic.

5 Digitare la seguente per dichiarare le variabili di connessione e di comando:

myConnToAccess fioco come OleDbConnection

mySQLCommand fioco come OleDbCommand

Dim mySQLStrg As String

6 Digitare la seguente per aprire una connessione al "QueryTest" database di Access:

myConnToAccess = new OleDbConnection ( "Provider = Microsoft.Jet.OLEDB.4.0; Dati Source = C: \ QueryTest.mdb;")

myConnToAccess.Open ()

Modifica "Source = C: \ QueryTest.mdb" e immettere il percorso in cui è stato salvato il database di Access.

7 Digitare quanto segue per eseguire una query "Elimina" nel database:

mySQLStrg = "DELETE FROM Table1.Field1 Table1 WHERE (((Table1.Field1) = 'John'));"

mySQLCommand = Nuovo OleDbCommand (mySQLStrg, myConnToAccess)

mySQLCommand.ExecuteNonQuery ()

Si eliminare il record in cui "Field1" è uguale a "John".

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