SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: donramone en Domingo 4 de Abril de 2010, 04:33

Título: Sencillo: Buscar dato en recordset.
Publicado por: donramone en Domingo 4 de Abril de 2010, 04:33
Hola a todos,pueden decirme como haria una busqueda en un recordset?
Para que se entienda un poco mejor:
rs.open"SELECT id, nombre, apellido FROM persona"
// ¿Cómo comparo desde el primer elemnto al ultimo elemento si el campo "nombre" del rs es igual a lo q tengo en una variable?

if nombre = variable_nombre then
         Msgbox "Existe"
else
         MsgBox "No Existe"

Desde ya muchas gracias
Título: Re: Sencillo: Buscar dato en recordset.
Publicado por: F_Tanori en Domingo 4 de Abril de 2010, 07:40
Puedes usar SQL directamente
Código: Visual Basic
  1. rs.open "SELECT id, nombre, apellido FROM persona WHERE nombre='" & variable_nombre  & "'"
  2.  
  3. if rs.RecordCount>0 then
  4. Msgbox "Existe"
  5. else
  6. MsgBox "No Existe"
  7. end if
  8.  
  9.  

Si lo que quieres es recorrer los resultados

Código: Visual Basic
  1. dim bExiste as Boolean
  2.  
  3. bExiste =false
  4. rs.open "SELECT id, nombre, apellido FROM persona"
  5.  
  6. with rs
  7.     while  not .EOF and not bExiste
  8.              bExiste =  ![nombre] = variable_nombre
  9.             .MoveNext
  10.     loop          
  11. end with
  12.  
  13. if  bExiste then
  14.    Msgbox "Existe"
  15. else
  16.    MsgBox "No Existe"
  17. end if
  18.  

Saludos
Título: Re: Sencillo: Buscar dato en recordset.
Publicado por: donramone en Lunes 5 de Abril de 2010, 00:36
Gracias por tu respuesta, ya lo resolvi usando "Find" en el recordset, estaba usando el primer metodo que me sugeriste, pero a mi me implicaba abrir el recordset dos veces (si el dato no existia abria nuevamente un recordset)
muchas gracias por tu ayuda igualmente