Att kunna berätta om en Microsoft Access- databas fråga finns från Visual Basic.NET program kan göra din ansökan mer robust genom att inte meddela ett fel om frågan inte existerar . I VB , kan du använda " CreateObject " -funktionen för att skapa en topp - nivå objekt variabel som representerar Access. Du kan öppna alla Access-databas programmatiskt med hjälp av objekt och söka efter ett objekt i databasen , till exempel tabeller eller frågor . Saker du behöver
Microsoft Visual Studio Review Access-databas
Visa fler instruktioner
1
Launch Microsoft Visual Studio . Klicka på " Nytt projekt " från den vänstra rutan på din datorskärm , och expandera " Visual Basic " under " Installerade mallar . " Klicka på " Windows " och dubbelklicka på " Console Application " från mitten av dialogrutan för att skapa en ny konsol projekt .
2
Lägg till följande kod för att deklarera variabeln Access- objektet och boolesk variabel du kommer att använda för att kontrollera om frågan existerar :
Dim accessAppObj As Object
Dim qryResult As Boolean
3
skapa objektet och också öppna Access-databas :
accessAppObj = CreateObject ( " Access.Application " ) katalog
accessAppObj.OpenCurrentDatabase ( " C : \\ Northwind 2007.accdb " , False )
4
Sök efter " Faktura Data " query i Northwind -databasen . Följande kod returnerar "true " om frågan existerar eller " False " om det inte finns :
On Error Resume Next
Dim s As String
s = accessAppObj.CurrentDb.QueryDefs ( " Faktura Data " ) . Name
qryResult = ( s < > " " )
5
Kontrollera resultatet och visa ett meddelande genom Console fönster :
p Om ( qryResult ) Sen
Console.Write ( " Query existerar " ) katalog
Else
Console.Write ( " Query spelar ' t existerar " ) katalog
End If
6
Frigöra objekt från minnet :
accessAppObj.CloseCurrentDatabase ( ) katalog
accessAppObj.Quit ( )
accessAppObj = Nothing
Console.ReadLine ( )
7
Tryck " F5 " för att köra programmet .
