recordset vba

Question

alors voilà g une table CLIENT avec différents champs comme Id, Nom , Adresse ...

Ce que je veux c vérifier qu'un client axiste bien et récupérer son id.

Je pense utiliser un recordset mais je n'arrive pas à le mettre en place.

Voilà ce que g pour l'instant :

Function Get_id_client() 
    Dim l_table As Recordset
    Dim l_Client_id As Integer
    
    Set l_table = CurrentDb.OpenRecordset("select * from CLIENT")
    
    l_table.MoveFirst
    
    l_Client_id = l_table("Id")
    
    l_table.Close
    
    MsgBox (l_Client_id)
End Function

mais il me dit que le type n'est pas correcte lorsque j'execute cette ligne : 
    Set l_table = CurrentDb.OpenRecordset("select * from CLIENT")
    

?????????????

Pikashoute · Answer

tu développes dans quel language ?

cs_ucorsu · Answer

VBA pquoi ???

Pikashoute · Answer

sur quel logiciel ? excel, word...

cs_ucorsu · Answer

access sorry !!!

Pikashoute · Answer

ah bah tres bien !
je vais peut etre pouvoir t'aider !
j'ai copie et coller ton code dans une appli access et ca marche !
regarde dans tes references (outils\references) et dis moi si tu as une ligne : Microsoft DAO 3.51 Object Library
et dis moi ce que tu as d'autres ?!

cs_ucorsu · Answer

je ne l'avais pas mais je l'ai validée et toujours même pblm ????

cs_ucorsu · Answer

nom mais je l'ai validé et cela ne change rien ???

Pikashoute · Answer

ferme ton appli et verifie que ta reference et bien la et relance !
t'as access 97 ou 2000 ?

cs_ucorsu · Answer

access 2000

g fermé l'option est tjrs valide mais ca ne marche pas ???

Pem13lw · Answer

J'aai moi même fait pas mal de test, et ça marche, pour des test plus approfondi serait-il possible que tu m'envoie la base de donnée, épurée si nécéssaire (juste la table CLIENT et le code qui plante) à cette adresse : pem13lw@aol.com
_________________________________________________
La seule chose que non avons à faire ici-bas c'est 
choisir quoi faire du temps qui nous à été imparti !!!

Recordset vba

10 réponses

Discussions similaires