Base de Datos
Publicado por Jorge (6 intervenciones) el 29/05/2001 22:57:20
Tengo una Aplicacion en Visual Basic con Acceso a base de datos en Microsoft Access. Necesito Realizar una consulta con parametros intoducidos por el usuario,
Tengo una Tabla Personales con los siguientes campos:
-Expediente, Nombre, Direccion, ...
Necedito Realizar una consulta con parametros que sean introducidos
por el usuario. Lo estoy realizando con ciertos controles enlazados como textbox a un control Data, para esto estoy utilizando la propiedad Recordsource para poder realizar una Clausula Sql.
El problema es el siguiente:
dim Expe as string
Expe = inputbox ( "Expediente":)
Data1.Recordsource = "Select * " & _
"From Personales " & _
"Where Personales.Expediente = Expe "
Data1.Refresh
En la Clausula Where manda un error por que el Criterio a encontrar en este caso (Expe) esta escrito sin apostrofos. ( ' Expe ' )
Como puedo realizar esta consulta sin necesidad de poner los Apostrofos a la consulta utilizando el control Data y su Propiedad Recordsource, es Decir:
" Where Personales.Expedinte = Expe "
Tengo una Tabla Personales con los siguientes campos:
-Expediente, Nombre, Direccion, ...
Necedito Realizar una consulta con parametros que sean introducidos
por el usuario. Lo estoy realizando con ciertos controles enlazados como textbox a un control Data, para esto estoy utilizando la propiedad Recordsource para poder realizar una Clausula Sql.
El problema es el siguiente:
dim Expe as string
Expe = inputbox ( "Expediente":)
Data1.Recordsource = "Select * " & _
"From Personales " & _
"Where Personales.Expediente = Expe "
Data1.Refresh
En la Clausula Where manda un error por que el Criterio a encontrar en este caso (Expe) esta escrito sin apostrofos. ( ' Expe ' )
Como puedo realizar esta consulta sin necesidad de poner los Apostrofos a la consulta utilizando el control Data y su Propiedad Recordsource, es Decir:
" Where Personales.Expedinte = Expe "
Valora esta pregunta
0