|
Título: Busqueda de datos en una tabla Publicado por: Ragde88 en 4 Diciembre 2005, 23:21 pm hola a todos
estoy haciendo un programa con vb 6, en el cual se crea una factura. Para llenar todos los campos en el formulario, solo debo de cambiar la clave de registro del usuario, y apareceran automaticamente todos los datos que se encuentran guardados en una taba hecha en acces. Para introducir la clave de registro del usuario utilizo el siguiente codigo: Private Sub Command1_Click() Dim buscar As String, criterio As String buscar = InputBox("Escribe el R.F.C del cliente") criterio = "R F C Like'*" & buscar & "*'" Data1.Recordset.MoveNext Data1.Recordset.Find criterio End Sub Pero me señala un error en: data1.recordset.find criterio Realmente soy muy nuevo en vb, quisiera saber si me pueden ayudar a resolver este problema. saludos Título: Re: Busqueda de datos en una tabla Publicado por: germixxx en 5 Diciembre 2005, 17:11 pm Jeje no me interesan mucho las base de datos y siempre me salteaba este post, perdon :( , creo q seria
Data1.findfirst criterio Título: Re: Busqueda de datos en una tabla Publicado por: Ragde88 en 5 Diciembre 2005, 23:08 pm Gracias :o :o
ya me funciona correctamente el programa ;D saludos Título: Re: Busqueda de datos en una tabla Publicado por: Ragde88 en 7 Diciembre 2005, 01:49 am hola de nuevo
el codigo que me dijiste, me funciono en ese formulario, pero al querer utilizarlo en otro me señala error de nuevo, me dice lo siguiente: Error 3077 Error de sintaxis (falta operador) en la expresion y al tratar de depurarlo, me señala otra vez ese renglon, que ahora tiene escrito " data1.recordset.findfirst criterio" espero que me puedan ayudar, es muy importante saludos Título: Re: Busqueda de datos en una tabla Publicado por: germixxx en 7 Diciembre 2005, 02:00 am Fijate si declarastes la variable string criterio y si la variable no esta vacia o tiene algun dato invalido
Título: Re: Busqueda de datos en una tabla Publicado por: Ragde88 en 7 Diciembre 2005, 02:24 am se supone que no esta vacia
por que pongo criterio = "Numero de control Like '*" & buscar & "*'" y si esta declarada al principio |