Ausführen eine Access-Abfrage in VB

Microsoft Access bietet Kleinunternehmen mit einer Datenbanklösung. Zugang ist im Lieferumfang der Microsoft Office-Suite von Anwendungen, so es günstiger als Enterprise-Datenbanken wie Oracle oder SQL Server ist. Zugriff hat die Fähigkeit zum Ausführen von Abfragen, so dass Sie Datensätze für Ihre Webanwendung aus der Datenbank abrufen können. Da Visual Basic (VB) auch ein Microsoft-Produkt ist, erfordert Abrufen von Datensätzen nur wenige Zeilen Code.

Anweisungen

1 Erstellen Sie die Variablen für den Abfragevorgang benötigt. Eine Verbindung, die Abfrage und die Record Set-Objekt sind erforderlich zum Abrufen von Datensätzen aus Visual Basic. Der folgende Code definiert jedes VB Objekt erforderlich:

Dim Conn als ADODB. VerbindungDim SQL As StringDim Rs als ADODB. Recordset

2 Erstellen Sie die Verbindung zu Ihrer Access-Datenbank. Die Verbindung findet die Datenbankdatei und öffnet sie, so dass Sie auf die Datei Abfragen ausführen können. Der folgende Code öffnet Ihre Access-Datenbank:

Conn. Öffnen Sie \"Provider=Microsoft.Jet.OLEDB.4.0; Daten-Source=c:\theDB.mdb\"

3 Erstellen Sie Ihre Abfragezeichenfolge. Die \"SQL\" im ersten Schritt definierte Variable wird verwendet, um Ihre Abfrage zu erstellen. In diesem Beispiel gibt die Abfrage der Vorname eine Liste der Kunden. Der folgende Code erstellt eine Access-Abfrage:

SQL = \"select First_name aus Customer\"

4 Führen Sie die Abfrage auf Ihre Access-Datenbank mit dem Connection-Objekt. Der folgende Code führt die Abfrage und weist die Ergebnisse zu den \"rs\" Variable, die in Schritt 1 erstellt:

Rs. Öffnen Sie SQL, conn

5 Drucken Sie einen Datensatz zu vergewissern, dass die Abfrage erfolgreich ausgeführt wurde. Ihre Ergebnisse können Sie testen, indem Sie erstellen ein Meldungsfeld, das den ersten Datensatz in den Ergebnissen zeigt. Die folgenden druckt die erste \"first_name\" in Ihrem Datensatz:

MsgBox \"The Erstnachweis ist \" & Rst [0]. ToString