Discussion :

[tabulaire]

bonjour a tous,
g créé une nouvelle table et j'y ajoute des valeurs prises de mon formulaire contenu dans une page asp
ces valeurs proviennent de champs de saisie ,de radios et d'une liste déroulante ,g un problème au niveau de la boucle
merci
voici le bout de code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
 
objcommand2.CommandText" INSERT INTO mailing_log (TITRE,OBSERVATION,AUTEUR,TYPECLIENT,CLTOUI,MAIL,SALON) 
values  
('" + Replace(Request("titre"),"'","''") + "','" + Replace(Request("obs"),"'","''") 
 
+ "','" + Replace(Request("Ope"),"'","''") + "','" + Replace(Request.Form
 
("NOMDOC"),"'","''") + "','" + if Request.Form("CLTOUI")="client" then "-1" 
 
else "0" end if + "','" + Replace(Request.Form("MAIL"),"'","''") + "','" + Replace
 
(Request.Form("csalon"),"'","''") + "')"

[ced600]

g un problème au niveau de la boucle

Je ne vois pas de boucle dans ton code !!!
Et quel genre de problème as tu ?

[ced600]

Heu, es tu sur de pouvoir insérer un if en plein milieu de la chaine de charactere que tu concatenes.
Moi j'aurais plutot fait cela :

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
 
Dim client_request
If Request.Form("CLTOUI")="client" Then
    client_request = "1"
Else
    client_request = "0"
End If
 
objcommand2.CommandText
"INSERT INTO mailing_log (TITRE,OBSERVATION,AUTEUR,TYPECLIENT,CLTOUI,MAIL,SALON) 
values  
('" + Replace(Request("titre"),"'","''")
+ "','" + Replace(Request("obs"),"'","''") 
+ "','" + Replace(Request("Ope"),"'","''")
+ "','" + Replace(Request.Form("NOMDOC"),"'","''")
+ "','" + client_request
+ "','" + Replace(Request.Form("MAIL"),"'","''")
+ "','" + Replace(Request.Form("csalon"),"'","''") + "')"

Ha et puis mettre un peu en forme facilite la lectue du code !!!