Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man vet om en Query Exists

    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 .


    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur du installerar Visual Basic 6.0
    ·Lägga till ListView
    ·Konvertera ett decimaltal till ett String i VB.NET
    ·Hur man kan stoppa en loop i VBA
    ·Hur du ändrar DataGrid färg i VB6
    ·Hur konvertera en bild till Transparent i Visual Basic
    ·Hur får man ett svar från en röstbrevlåda i VB.Net
    ·Hur köra Microsoft Visual Studio Sample Program
    ·Tillträde : VBA Utför Query
    ·Hur man skriver VB Code för en pekskärm knappsats
    Utvalda artiklarna
    ·Hur man öppnar en webbsida bekräftelse genom PerlScri…
    ·Kan Android Run Jar
    ·Hur man använder Google Translate för API & PHP
    ·Hur Split String Längd i Java
    ·PHP MySQL Database Query
    ·Kombination av JavaScript Snabbtangenter
    ·Lägga till en rad till GridView programmatiskt
    ·Hur man skapar en PHP Login Script för MySQL
    ·Ställa den sista raden i ett rutnät till Focus
    ·Hur man skapar en PHP Counter utan att beskatta Server
    Copyright © Dator Kunskap http://www.dator.xyz