Anónimo
Consulta SQL desde VB
¿Hola, qué tal?, estoy intentando realizar una búsqueda desde VB por medio de sentencia SQL a una BD en access.
Mi problema es que me sale un error de "Error de compilación: se esperaba fin de la instrucción"
El error me lo marca en la sentencia "Like '" del siguiente código
Dim SQL As String
Dim BuscarEn As String
BuscarEn = cmbPor.List(cmbPor.ListIndex)
SQL = "SELECT * FROM tblUsuario WHERE" &BuscarEn& "Like '" &txtBuscar& "*'"
Set acc = DB.OpenRecordset(SQL, dbOpenDynaset)
While Not acc.EOF
lstResultado. AddItem ("acc!" & BuscarEn)
acc.MoveNext
Wend
Quisiera saber si me podrías ayudar con esto, el problema es que no se si esta bien hecha la sentencia
por que lo que quiero es que realize búsqueda con concidencias parciales
espero que me puedas iluminar, saludos.
Mi problema es que me sale un error de "Error de compilación: se esperaba fin de la instrucción"
El error me lo marca en la sentencia "Like '" del siguiente código
Dim SQL As String
Dim BuscarEn As String
BuscarEn = cmbPor.List(cmbPor.ListIndex)
SQL = "SELECT * FROM tblUsuario WHERE" &BuscarEn& "Like '" &txtBuscar& "*'"
Set acc = DB.OpenRecordset(SQL, dbOpenDynaset)
While Not acc.EOF
lstResultado. AddItem ("acc!" & BuscarEn)
acc.MoveNext
Wend
Quisiera saber si me podrías ayudar con esto, el problema es que no se si esta bien hecha la sentencia
por que lo que quiero es que realize búsqueda con concidencias parciales
espero que me puedas iluminar, saludos.
1 Respuesta
Respuesta de Roberto Alvarado
1
Hola, gracias por tu pronta respuesta, pero agregue los espacios en la sentencia pero sigue apareciendo el mismo error en el mismo lugar
En " Like '"
No se que puede ser :(
En " Like '"
No se que puede ser :(
Espacio entre los ampersand (&) y las palabras