Soyez le premier à donner votre avis sur cette source.
Snippet vu 11 922 fois - Téléchargée 37 fois
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")
31 août 2006 à 20:34
D'avance merci
31 août 2006 à 20:33
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
13 févr. 2006 à 11:19
3 oct. 2003 à 12:20
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.
11 juil. 2003 à 09:47
Merci de votre aide
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.