alguien que me ayude con el codigo de busqueda en vb 6.0

juan luis
06 de Agosto del 2004
esto hacinedo una base de datos para registro de alumnos de mis grupos y quiero utilizar una busqueda para encontrarlos con numero de lista o nombre y apellido les agradezco la ayuda

jz
06 de Agosto del 2004
Esto es para visual basic 6 y DAO :
rs as recorset
db as database

set db=opendatabase("C: ...etc")
set rs=db.openrecordset("nombretabla")

rs.index="NombreIndiceNumerodelista"
ó?
rs.index "NombreInd..ista" Con esto fijas la clave

rs.seek "=",val(numerolista) 'estas buscando comparando con un texbox (el val es por si en tu base el campo es numérico)

if rs.nomatch then ..' ejecuta codigo si no encuentra coincidencia

ahora tienes un registro de tu base en rs

rs.fields ("nombrecampo") para sacar el valor de un campo
ó rs.fields (numerodecampo) '(empezando por 0)

para el nombre y apellido igual pero la clave son dos campos
osea:

rs.index "nombre","apellido" (estos son los nombres de los indices que pusistes en tu base)

rs.seek "=",TXTnombre,TXTapellido

SALU2



jz
06 de Agosto del 2004
corrijo la linea anterior

rs.index="nombre","apellido" por rs.index="apellido" ya que solo puede ordenar por un indice.