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 :)
-------------------------------
Réponse au message :
-------------------------------
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