Discussion :

[Immobilis]

T'aas pas fait de recherche sur la transaction toi. Je me permet d'insister...

[tribaleur]

Bin si j'ai fait des recherches sur les transactions pourtant!!!
Mais là je vien de trouver pourquoi ça fonctionnai pas même avec begin/commit/rollbacktrans.

Déja j'ai marqué

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if err.mumber = 0 then

au lieu de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if err.number = 0 then

Ensuite j'annulait à chaque fois que c'était mauvais mais si c'était bon je validait, ce que je ne voulais pas!!!

Enfin

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

RS.eof=true

ne me ferra jammais sortir de la boucle.
Il faut plutôt un truc du genre (en tout cas ce que j'ai fait et que vous pouvez me conseillé d'améliorrer).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
RS.movelast
RS.movenext

Voici donc mon code maintenant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
VF=0
on error resume next
    conn.begintrans
    mysql = "select num_quest as nb from T_question"
    if(RS.state = 1 )then RS.close
    RS.open mysql, conn  
 
    dat_actuel=year(now)                                        '///////récupère la date actuel sous le format aaaa//////
 
    while not RS.eof
     obj=request.form("commentaire"&RS("nb")&"")
     obj=replace(obj,"'","''")
     mysql = "insert into T_reponse (date_rep,num_quest,reponse,commentaire) values ('"&dat_actuel&"','"&RS("nb")&"','"&request.form("question"&RS("nb")&"")&"','"&obj&"')"
     conn.execute mysql
     if err.number<>0 then
       RS.movelast
       RS.movenext
       conn.rollbacktrans
       VF=1
     else  
       RS.movenext
     end if  
    wend      
 
    if VF=0 then
      conn.committrans
      response.write "Merci d'avoir répondu"  
      BT_Fermer                     '/////////appel de la fonction "BT_Fermer"/////////
    else
      response.write "Erreur d'insertion"
    end if

Maintenant quand deux personnes répondent en même temps, une des deux enregistrera ces données dans la base de données et l'autre aurra le message d'erreu de transaction.

Merci à tous!!!!!!!