El Guru Programador
Usuario DESCONOCIDO | Registrate Gratis | Usuarios Registrados
Foro de Visual Basic/VB.NET
Foros del Guru > Visual Basic/VB.NET
Usuario Error 3077, AYUDA porfavor
Desconocido
Enviado - 10/9/2003
 
Hola

Tengo una aplicacion que me calcula el coste de produccion del producto seleccionado de un combobox, pero esta aplicacion me funciona para algunos productos, para otros (Muy pocos) no, cuando elijo uno de los productos para el que la aplicacion revienta me da el siguiente error:

Error '3077' en tiempo de ejecucion
Error de sintaxis (falta operador) en la expresion

el codigo que tengo es el siguiente

Private Sub producto_Click()
Dim buscar As String
Data13.Recordset.MoveFirst
buscar = "nom_art like '" & producto.Text & "'"
Data13.Recordset.FindFirst buscar
cod_product.Text = Data13.Recordset.Fields("ref_art")
Text1.SetFocus
End Sub

¿Sabria alguin decirme a que se debe este error?

Muchisimas gracias.
 
fmarredo
356 Mensaje(s)
Enviado - 10/9/2003
 
Te comento que si usás el operador Like tendrías que poner los comodines (wildcards) que en ADO son el sgino %.
Por ejemplo:

buscar = "nom_art like '%" & producto.Text & "%'"
te buscaría todos los artículos cuyo nombre contenga la palabra que está en producto.Text.

buscar = "nom_art like '" & producto.Text & "%'"
te buscaría todos los artículos cuyo nombre comience con la palabra que está en producto.Text.

buscar = "nom_art like '%" & producto.Text & "'"
te buscaría todos los artículos cuyo nombre termine con la palabra que está en producto.Text.


Saludos


 
 

 

Contactos myStudio Network