Visual Basic para Aplicaciones - Buscar un valor en una base de datos

Life is soft - evento anual de software empresarial
 
Vista:

Buscar un valor en una base de datos

Publicado por Ramon (5 intervenciones) el 14/08/2003 20:07:27
Hola, necesito la ayuda de alguien mi problema es el siguiente:
yo necesito que cuando introdusco un dato en un cuadro de texto por ejemplo "123456" ese dato sea comparado con los datos que se encuantran almacenados en una tabla de una base de datos hecha en Access si existe igualdad que ejecute el codigo que contiene un boton caso contrario emita un mensaje que no existe, yo uso el control data para conectar con la base de datos, bueno espero que alguien me pueda pasar el codiogo que necesito para solucionar el problema que tengo, se los voy agradacer mucho.

Muchas Gracias
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:Buscar un valor en una base de datos

Publicado por Angel (2 intervenciones) el 23/08/2003 17:11:39
Hola, hay una manera, pero vas a tener q manejar el Recordset desde el codigo.
Recordset = RS
minumero = numero text box

ok?

CODIGO---

Miboton_click
rs.movefirst
do
if rs.fields("campo de la tabla q contine el numero")=minumerito then

rs.movenext
loop until rs.eof

End Sub
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:Buscar un valor en una base de datos

Publicado por Angel (2 intervenciones) el 23/08/2003 17:12:50
Hola, hay una manera, pero vas a tener q manejar el Recordset desde el codigo.
Recordset = RS
minumero = numero text box

ok?

CODIGO---

Miboton_click
rs.movefirst
do
if rs.fields("campo de la tabla q contine el numero")=minumerito then
Ejecuta el codigo q quieras
Exit do
end if
rs.movenext
loop until rs.eof

End Sub


OJO, yo este tipo de conexion no la utilizo, casi no tiene posibilidades y no estoy seguro de q te funcione. Mejor q empieces a utilizar DAO tio, algun problema, escribeme
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