“Conocimiento Programación>Visual Basics Programación

Cómo saber si una consulta existe

2015/11/3
Ser capaz de saber si existe una consulta de base de datos Microsoft Access desde la aplicación de Visual Basic.NET puede hacer su aplicación más robusta al no provocó un error si la consulta no existe . En Visual Basic , puede utilizar la función " CreateObject " para crear una variable de objeto de nivel superior que representa el acceso . Usted puede abrir cualquier base de datos Access mediante programación con el objeto y la búsqueda de cualquier elemento de la base de datos, como tablas o consultas. Cosas que necesitará
Microsoft Visual Estudio en base de datos Access
Ver Más instrucciones
1

lanzamiento Microsoft Visual Studio . Haga clic en " Nuevo proyecto " en el panel izquierdo de la pantalla del ordenador , y ampliar a continuación " Visual Basic" " Plantillas instaladas ". Haga clic en " Windows" y haga doble clic en " Aplicación de consola " en el centro de la ventana de diálogo para crear un nuevo proyecto de consola .
2

Agregue el código siguiente para declarar la variable de objeto de Access y la variable booleana que va a utilizar para comprobar si existe la consulta:

accessAppObj Dim As Object Dim

qryResult As Boolean
3

Cree el objeto y abra el base de datos Access :

accessAppObj = CreateObject ( " Access.Application " )

accessAppObj.OpenCurrentDatabase ("C: \\ Northwind 2007.accdb " , False )
4

Búsqueda de la consulta " datos factura" en la base de datos Northwind. El siguiente código devuelve " true" si existe la consulta o "Falso " si no existe:

On Error Resume Next

Dim s As String

s = accessAppObj.CurrentDb.QueryDefs ( "Datos factura ") . Nombre

qryResult = ( s < > "" )
5

comprobar el resultado y mostrar un mensaje a través de la ventana de la consola :

Si ( qryResult ) Entonces

Console.Write ( "La consulta no existe" )

demás

Console.Write ( " Query doesn ' t existe " )

End If
6

soltar objetos de la memoria :

accessAppObj.CloseCurrentDatabase ()

accessAppObj.Quit ()

accessAppObj = Nothing

Console.ReadLine ()
7

Press "F5 " para ejecutar el programa.


Visual Basics Programación
Cómo ejecutar un comando en un sistema remoto en Visual Basic
Cómo iniciar un servicio de Windows utilizando VB.NET
¿Cuál es la función del menú de inicio?
Cómo leer muchas líneas en una sola toma en Visual Basic 6
¿Cómo puedo usar C para visualizar una malla en el entorno 3D?
Cómo descifrar un archivo cifrado de Blowfish
. Cómo aprender Visual Studio NET
Cómo utilizar un Motorola RAZR2 Como Webcam
Conocimiento de la computadora © http://www.ordenador.online