Récupérer le numéro auto...

Signaler
-
Messages postés
70
Date d'inscription
mercredi 7 décembre 2005
Statut
Membre
Dernière intervention
9 juillet 2010
-
Bonjour,
J'ai une base de donnée qui se présente à peu près comme ceci (en très simplifié évidemment) :

id nom description prix

ID : Numéro automatique
NOM : Texte
DESCRIPTION : Memo
PRIX : Numérique

Alors, bon si je veux ajouter un élement à ma base de donnée, je crée un objet Recordset et je fais à peu près comme ceci :

Rec.Addnew
Rec("nom") = "Vase"
Rec("description") = "C'est un superbe vase !"
Rec("prix") = 150

Rec.Update


Alors maintenant, j'aimerais récupéré le numéro automatique qu'Access a envoyé sur cet enregistrement, mais je ne sais pas comment faire ?

Est-ce que quelqu'un aurait par hasard une idée ?

D'avance, je vous remercie,

Frédéric... a dreamer...
---> ffeytons@allforwebmaster.org

2 réponses

set rec= server.createobject("ADODB.recordset")
rec.open "tatable", taconnection, 2, 3, 2

Rec.Addnew
Rec("nom") = "Vase"
Rec("description") = "C'est un superbe vase !"
Rec("prix") = 150
Rec.Update

Dim id
rec.movelast
rec=rec("id")

rec.close
set rec = nothing

ou

Dim id
rec.movefirst
rec.find "nom='"& nom &"' and ....
rec= rec("id")

rec.close
set rec= nothing

voilou :)
Messages postés
70
Date d'inscription
mercredi 7 décembre 2005
Statut
Membre
Dernière intervention
9 juillet 2010

Tu pourrai expliquer ton code je dois faire exactement la même chose