In der Lage zu sagen, ob eine Microsoft Access-Datenbank -Abfrage besteht aus der Visual Basic.NET -Anwendung können Sie Ihre Anwendung robuster durch Aufforderung nicht einen Fehler, wenn die Abfrage nicht existiert. In VB, können Sie mit dem " CreateObject "-Funktion , um eine Top-Level- Objekt-Variable , die den Zugriff zu erstellen. Sie können eine beliebige Access-Datenbank öffnen programmatisch mit dem Objekt und die Suche nach einem Artikel in der Datenbank , z. B. Tabellen oder Abfragen. Things You
Microsoft Visual Studio
Access-Datenbank
brauchen anzeigen Weitere Anweisungen
1
Starten Sie Microsoft Visual Studio. Klicken Sie auf " Neues Projekt " aus dem linken Bereich des Bildschirm Ihres Computers , und erweitern Sie " Visual Basic " unter " Installierte Vorlagen . " Klicken Sie "Windows " und doppelklicken Sie auf "Console Application" aus der Mitte der Dialog um eine neue Konsole Projekt zu erstellen.
2
Fügen Sie den folgenden Code, um die Access-Objekt Variable und den Boolean deklarieren Sie verwenden, um zu überprüfen , ob die Abfrage vorhanden ist:
Dim accessAppObj As Object Dim
qryResult As Boolean
3
erstellen Sie das Objekt und auch öffnen, die Access-Datenbank:
accessAppObj = CreateObject (" Access.Application " )
accessAppObj.OpenCurrentDatabase ( "C: \\ Nordwind 2007.accdb " , False)
4
Suche nach dem " Rechnungsdaten "-Abfrage in der Datenbank Northwind. Der folgende Code wird "wahr" zurück , wenn die Abfrage existiert oder "Falsch" , wenn sie nicht vorhanden ist :
On Error Resume Next
Dim s As String
s = accessAppObj.CurrentDb.QueryDefs ( " Rechnungsdaten " ) an. Name
qryResult = (s <> "" )
5
Überprüfen Sie das Ergebnis und zeigt eine Meldung durch die Console Fenster :
( qryResult ) Dann
Console.Write ( "Query existiert " )
Else
Console.Write ( "Query doesn 't exist " ) End If
6
Veröffentlichung Objekte aus dem Speicher :
accessAppObj.CloseCurrentDatabase ()
accessAppObj.Quit ()
accessAppObj = Nothing
Console.ReadLine ()
7
Presse "F5 ", um das Programm auszuführen.
