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

Question

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

Poufaille · Answer

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 :)

Goldeneye007 · Answer

Tu pourrai expliquer ton code je dois faire exactement la m&#234;me chose

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

2 réponses

Votre réponse

Discussions similaires