dim req dim varr dim sar set conn=server.createobject("adodb.connection") conn.open "nom_du_dsn" 'Requete ajout ou methode Addnew...Update req="Requete_d'ajout_d'enregistrement;" var=conn.execute (req) 'execution requete 'recuperation du champ numero auto rst="select max(Champ_numeroauto) from nom_de_table;" set sar=conn.execute (rst) 'execution requete recup=rst.fields("Champ_numeroauto")
Non seulement on gagne une connection, mais en plus son code ne fonctionne pas toujours... En effet, admettons qu'il y ait deux requêtes en +- même temps... il se peut que le truc se mélange les pinceaux et inverse les nouvelles ids... Quand à la 2ème soluce, elle fonctionne bien pour autant que l'on utilise le bon curseur de BD :)
Une fois cette valeur récupéré, comment puis-je la stocker dans une variable globale à toutes les frames jusqu'à la fin de la connexion ? Merci de votre aide
Salut, je comprend pas trop l'histoire du rs("..") = ".." ... en tout cas je sais que sur MS Sql Server on peut accéder à une variable @@IDENTITY qui contient l'AutoInc du dernier insert. C'est fait exprès, on est sur que "le truc" ne se mélange pas les pinceaux comme dit YopYop. Pour info @@ROWCOUNT "Returns the number of rows affected by the last statement." comme le dit la doc.
J'ai un problème il me dit que rs n'est pas déclaré il faut ajouter un élément?
bonjour, effectivement, j'utilise la méthode de MCJO seulement apres l' insert j'arrive à récupérer n'importe quel champs sauf l'Id auto-incrémenté (ASP/MySQL) : Dim flat Dim tito 'définit le Recordset Dim chaine set objconn=server.createobject("ADODB.Connection") chaine = "dsn=datamysql;uid=xxx;option=16386" objconn.open chaine Set flat = Server.CreateObject("ADODB.Recordset") 'Ouvre le Recordset flat.Open "GLM_XXX", objconn, 1,2,2 flat.Addnew flat.fields("id_X01") = X01 flat.fields("ID_user") = session.SessionID 'MaTable.fields("start") = "'Now()'" ' & vbCrLf for i=1 to 200 flat.fields("rp"& i)="-"' & vbCrLf next 'ajoute les données dans la base flat.update tito=flat("id_XXX") '(l'auto-incrémenté) celui que je ne récupère pas en revanche, flat.fields("ID_user") pas de problème response.Write(tito) 'on ferme et on supprime la conn et le flat flat.Close Set flat = Nothing objconn.Close Set objconn = Nothing
Quelqu'un à une idée ? pour récupérer cet ID auto ? D'avance merci
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 871 941 membres 20 nouveaux aujourd'hui 16 147 membres club