Discussion :

[autumn319]

rebonjour
j'ai une erreur de syntaxe dans ce code ci.elle se situe au niveau des doubles cotes.avec des ( ) , il fait une erreur de syntaxe au niveau des ()

Code :

S�lectionner tout - Visualiser dans une fen�tre � part

1
2
3
4
IF Request.Form("nom_1")<> "" AND
      Request.Form("nom_2")<> "" AND 
      Request.Form("nom_3")<> ""
      THEN

[jfphan]

Moi je mettrais plutot �a

Code :

S�lectionner tout - Visualiser dans une fen�tre � part

1
2
3
4
IF Request.Form("nom_1")<> "" AND _
      Request.Form("nom_2")<> "" AND _
      Request.Form("nom_3")<> "" 
      THEN

ou tout sur la meme ligne

[autumn319]

merci c'est cool mais �a ne marche pas.
l'erreur de syntaxe se trouve juste apres les <> et avant le "" sur la 1ere ligne.

[jfphan]

essaie de remplacer les "" par des vbNullString

[BrYs]

Hummmmm ..... voui c'est clair, c'est bizarre.
montre le code de ta page ?

[lexav]

ouaip, le probl�me se situe certainement AVANT ce test...

[autumn319]

tu l'auras voulu,mais je te pr�viens ;c'est une vraie boucherie.

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
<%
   IF (Request.Form("nom_modele")<> "")AND_
      (Request.Form("nom_court_modele")<> "")AND_ 
      (Request.Form("nom_menu")<> "")
   THEN 
   'le formulaire a été validé je fais ma requête <BR>   
     Response.Write("ça se passe tout doucement")
     'strREQ = "SELECT *FROM bidon WHERE v=..." 
     'exécution de la requête <BR>   ... 
   '         
    'si le formulaire html ci dessous n'a pas été validé,je l'affiche en erreur 
     ELSE 
       if (Err.number) then 
              Response.Write(sql +"."+ Err.Description)
              Response.End
           end if   
   %> 
<BR><BR>
      <FORM METHOD ACTION="redirection1.asp">
      <div align="center"><B>CREATION DE MODELE<B></div>
      <div align="center">Quel est la reference exacte de votre modèle?</div>
      <div align="center"><input name="nom_modele" type="test"></div>
      <div align="center">Quel est le nom court de votre modèle?</div>
      <div align="center"><input name="nom_court_modele" type="test"></div>
      <div align="center">Quelle est l'adresse URL où vous voulez stocker ce fichier? </div>
      <div align="center"><input name="nom_menu" type="test"></div>
      <div align="center"><input type=submit value="soumettre votre requête"></div>
      <%

[scorpia]

Et c'est quoi le texte exact de l'erreur ?

Et en mettant tout sur la m�me ligne :

Code :

S�lectionner tout - Visualiser dans une fen�tre � part

1
2
3
4
5
IF Request.Form("nom_1")<>"" AND ... AND Request.Form("nom_3")<>"" THEN
...
ELSE
...
END IF

a+

[linkchaser]

il te le fais des le premier chargement de la page ou quand tu soumets le formulaire?

[autumn319]

vbNullString �a ne marche pas,d�sol�.

normalement,il doit m'afficher mon formulaire la premiere fois qu'il charge la page,puis la deuxieme fois qu'il charge la page,il doit afficher "�a se passe tout doucement".

je ne pense pas que l'erreur soit avant,puisque jusque l�,il affiche tout correctement.

[jfphan]

pour les _ il faut un espace entre le AND et le _.
Mais comme je l'ai dis tout � l'heure, essaie de mettre tout ton IF sur la meme ligne, tout comme l'a dit Scorpia

[linkchaser]

je sias ce qu'il doit faire

je te demande ce qu'il fait reelement

il te donne l'erreur au premier chargement ou apres la soumission

[autumn319]

voila le message d'erreur quand je mets tout sur la meme ligne(c'est bizarre d'etre oblig� de mettre tout sur la meme ligne!!!!!)
la colonne 109,c'est ds le dernier request entre les deux <>
bizarre,non?

Code :

S�lectionner tout - Visualiser dans une fen�tre � part

1
2
3
4
5
Type d'erreur :
Erreur de compilation Microsoft VBScript (0x800A03F9)
'Then' attendu
/webburo/programmes/redirection1.asp, line 31, column 109
IF (Request.Form("nom_modele")<>"")AND(Request.Form("nom_court_modele")<>"")AND(Request.Form("nom_menu")<>"")

[autumn319]

oui,c'est avant la soumission qu'il me donne cette erreur

[linkchaser]

lol alors soit il te manque un _ entre ton 3 eme request et ton then

soit ton then n'est pas sur la meme ligne

et lorsque tu n'as qu'une instructiona mettre dans le if tu fais tout sur une seule ligne comme ca tu n'as pas besoin de ton end if

[linkchaser]

le mot "then" doit etre sur la meme ligne que le mot "if"

[jfphan]

Non t'es pas oblig� de tout mettre sur la meme ligne si tu respecte bien le caract�re de suite qu'est le signe _ (avec un espace avant), la pour ton message d'erreur je pense que le THEN doit aussi etre sur la meme ligne ou bien sur la ligne du dessous toujours avec le caract�re de suite.
Mais enfin je reviens de vacances, donc j'ai un peu de mal, et par cons�quent je peux me tromper.

[autumn319]

vous etes vraiment tres forts!!!!!



je trouve quand meme fort indisposant (n'est ce pas?) de devoir tout mettre dans une ligne,le then y compris.

voici ma ligne

Code :

S�lectionner tout - Visualiser dans une fen�tre � part

IF (Request.Form("nom_modele")<>"")AND(Request.Form("nom_court_modele")<>"")AND(Request.Form("nom_menu")<>"")THEN

qui se situe dans une seule ligne

[lexav]

Code :

S�lectionner tout - Visualiser dans une fen�tre � part

1
2
3
4
5
Type d'erreur :
Erreur de compilation Microsoft VBScript (0x800A03F9)
'Then' attendu
/webburo/programmes/redirection1.asp, line 31, column 109
IF (Request.Form("nom_modele")<>"")AND(Request.Form("nom_court_modele")<>"")AND(Request.Form("nom_menu")<>"")

tout ton test est concat�n�, il n'y a pas d'espaces entre les AND... c'est pas �a le pb ? je comprends plus rien ou quoi ?

[autumn319]

il me manquait un "then " en fin de ligne.
merci � tous!