Visual Basic para Aplicaciones - Ayuda con busqueda de palabras

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda con busqueda de palabras

Publicado por Marcos (4 intervenciones) el 25/02/2005 15:55:09
Hola a todos y todas de este foro.

Necesito hacer una busqueda de productos que tengo en mi base de datos de access 2000, ingresando el nombre del producto que me busque dicho producto, yo lo hice con sentencias SQL pero no me busca nada, siempre me coloca el primer registro que tengo en mi base de datos. Aqui coloco mi codigo que hice para ver si me pueden corregir y ayudar:

Set BuscarNomb = New ADODB.Recordset
BuscarNomb.CursorType = adOpenDynamic
BuscarNomb.LockType = adLockOptimistic
BuscarNomb.CursorLocation = adUseClient
BuscarNomb.Open "SELECT * FROM Producto", Conexion
SQL = "SELECT * FROM Producto WHERE Nombre_Producto LIKE ' " & txtBuscar.Text & " %'"
InvNombre.Text = BuscarNomb!Nombre_Producto
InvPrecio.Text = BuscarNomb!Precio_Producto
InvCantidad.Text = BuscarNomb!Cantidad_Producto

MUCHAS GRACIAS DE ANTEMANO Y ESPERO QUE ME PUEDAN AYUDAR.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda con busqueda de palabras

Publicado por David Palafox (4 intervenciones) el 25/02/2005 22:46:15
intenta cambiar la linea SQL = "SELECT * FROM Producto WHERE Nombre_Producto LIKE ' " & txtBuscar.Text & " %'"

por SQL = ("SELECT * FROM Producto WHERE Nombre_Producto = txtBuscar.text" ) tb prueba sin los parentesis

admas recomiendo que BuscarNomb.CursorType = adOpenDynamic lo cambies por BuscarNomb.CursorType = adOpenSnapShot esto hará que la tabla se abra unicamente pára consultar y evitar perder informacion por error

tb recomiendo que los textbox que usas para mostrar la informacion (InvNombre.Text, InvPrecio.Text, nvCantidad.Text) los cambies por labels para mayor seguridad ya que la informacion que mostraran sera pequeña, ejemplo: lblNombre.Caption = BuscarNomb!Nombre_Producto
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda con busqueda de palabras

Publicado por cmgcharli (51 intervenciones) el 26/02/2005 00:18:29
prueba a poner LIKE ' " & TXTBUXCAR.TEXT & " ' %"
FIJATE o lo has copiado mas

SQL = "SELECT * FROM Producto WHERE Nombre_Producto LIKE ' " & txtBuscar.Text & " %'"
InvNombre.Text = BuscarNomb!Nombre_Producto
InvPrecio.Text = BuscarNomb!Precio_Producto
InvCantidad.Text = BuscarNomb!Cantidad_Producto
p
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda con busqueda de palabras

Publicado por Marcos (4 intervenciones) el 26/02/2005 17:01:16
Muchas Gracias a todos los que me ayudaron, se lo agradezco, pero sigue igual busca solo el primer registro de la tabla, lo que de mil maneras pero siempre sigue igual, no se que pueda ser si alguien me quiere seguir ayudando c lo agradecere mucho....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar