Base de donne avec seek

Contenu du snippet

La methode de recherche la plus rapide il faut absolument un indext pour travailler avec seek

SEEK ser a chercher dans une base de donne

Source / Exemple :


sub command1_click()
dim db as database
dim rs as recordset
set db=opendatabase("c:\client.mdb")
set rs=db.open recordset("client",dbopentable)
rs.seek=","text1.text
if rs.nomatch then
msgbox"client inexistant"
else
list1.additem rs("no_client")&""& rs("nom")
end if
rs.close
db.close
end sub

Conclusion :


entout cas pour moi il marche et j'attend vo critique

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.