Microsoft Visual Basic, Scripting Edition ist eine Untermenge von Visual Basic , die mit Datenbanken arbeitet . Ob für die Führung eines Verzeichnisses von Produkten in einem Lager oder Lohnbuchhaltung verwendet werden, haben Datenbanken zu einem wichtigen Bestandteil unserer Umwelt. VBScript gibt Ihnen Zugriff auf ActiveX Data Objects zugreifen , wo Sie das Recordset-Objekt verwenden können, um einen oder mehrere Datensätze zurück. Das Recordset durchsucht die Felder in der Datenbank für Ihre Anfrage und hält die Ergebnisse , die Sie dann bearbeiten können . Anleitung
1
Type " Option Explicit " auf Ihren Code der ersten Zeile . Dies zwingt die explizite Deklaration jeder Variablen in Ihrem Programm. Type " Dim objConnection ", " Dim objRecordSet " und " Dim SQLQuery " auf separaten Zeilen zu definieren konstante Größen .
2
Typ "Set objConnection = CreateObject (" ADODB.Connection " ) " zu verbinden zu Ihrer Datenbank . Type " Set objRecordSet = CreateObject (" ADODB.Recordset " )" auf der nächsten Zeile , um das Recordset , um Ihre Suchergebnisse zu speichern etablieren. Sie müssen die "Set "-Anweisung zu verwenden, da VBScript nicht zulässt, dass die " Dim "-Anweisung allein auf Objekte in einen bestimmten Typ zuordnen.
3
Geben Sie Ihren SQL-Abfrage. Geben Sie beispielsweise " SQLQuery = SELECT * FROM tabelle ", wenn Sie alle Datensätze in der Tabelle, um das Recordset zurückgeben möchten . Wenn Sie eine bestimmte Liste , Typ " SQLQuery = SELECT * FROM tabelle WHERE table_column = ' some_criterion ' " .
4
Type " objConnection.Open SQLQuery , objConnection ", um das Programm die Datenbank abfragen und die Ergebnisse in Ihre Cord . Sie können bestimmte zusätzliche Parameter für die Open-Methode , wie Cursor-Typ , Lock-Typ eingestellt . Werden diese Werte leer wird sie auf die Standardwerte gesetzt .
5
Schreiben Sie die Cord- Ergebnisse auf den Bildschirm oder in eine Datei , wo Sie sie brauchen. Type " objRecordSet " und " objConnection.Close " auf separaten Zeilen , um das Objekt zu schließen , um die Ressourcen Ihres Systems zu befreien.