une condition empeche la validation d'une autre page?

Version imprimable

Bonjour,

Le titre n'est pas très explicite mais je ne voyais pas trop comment résumer la situation....

J'ai une page A (newIndex.asp) qui constitue un formulaire et une page B (newSaveEtape1.asp) qui enregistre les données du formulaire.

Tout fonctionnait a merveille jusqu'a ce que je me rende compte que j'ai omis le cas ou l'utilisateur ne renseignait pas un champ, ce qui generait une erreur sur ma page B. J'ai donc rajouté une condition toute bete sur ma page B. Et du coup ma page A ne se soumet plus. j'appuie sur le bouton "valider" et ça ne fait mais alors rien du tout. (pas de rechargement, pas d'erreur javascript, rien).

voici la condition que j'ai rajoutée dans B :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 If ListeFichiers = "" Then ExisteLF = false else ExisteLF = true end if if ExisteLF Then Dim tabTmp TabTmp = split(ListeFichiers, ":-:") Redim tableauFichiers (Ubound(tabTmp)-1,4) For i = 0 to (Ubound(TableauFichiers)) tmp = split(Tabtmp(i),"::") for j = 0 to Ubound(tmp) TableauFichiers(i,j) = tmp(j) next next End if
lorsque je mets la condition "if existeLF Then" et le "end if" qui va avec en commentaire tout fonctionne.

Alors docteurs, c'est moi qui devient folle? :fou:

si tu fais :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
If ListeFichiers = "" Then 
   ExisteLF = false 
else 
   ExisteLF = true 
end if 
 
if ExisteLF Then 
   Dim tabTmp 
   TabTmp = split(ListeFichiers, ":-:") 
   Redim tableauFichiers (Ubound(tabTmp)-1,4) 
 
   For i = 0 to (Ubound(TableauFichiers)) 
      tmp = split(Tabtmp(i),"::") 
      for j = 0 to Ubound(tmp) 
         TableauFichiers(i,j) = tmp(j) 
      next 
   next 
Else
   Response.write("Existe pas")
End if

Qu'est-ce qu'il te donne ?

28/04/2005, 10h22
Gwenn

Salut,

on dirait qu'il a un soucis avec

Code:

If ListeFichiers = "" then...

Essayes

Code:

If len(ListeFichiers)= 0 then...

Sinon tu fais une alert Javascript
Code:

1 2 3 4 5 if (ListeFichiers="") then Response.Write("<script language='javascript'>") Response.Write("alert('Choisissez un Fichier');") Response.Write("</script>") %><META HTTP-EQUIV=REFRESH CONTENT="0;URL=ChoixFichier.html">
ou alors si ta liste de fichier est dans une base de données.

Permet au champs d'être NULL.

Bon ben ça yest c'est sur : je suis folle

voila ce que j'ai maintenant :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
If ListeFichiers = "" Then
	ExisteLF = false
else
	ExisteLF = true
end if
 
if ExisteLF Then
	Dim tabTmp 
	TabTmp = split(ListeFichiers, ":-:")
	Redim tableauFichiers (Ubound(tabTmp)-1,4)
 
	For i = 0 to (Ubound(TableauFichiers))
		tmp = split(Tabtmp(i),"::")
		for j = 0 to Ubound(tmp) 
			TableauFichiers(i,j) = tmp(j)
		next
	next
'Else 
 '  Response.write("Existe pas") 
End if
'response.Write(existeLf)
'response.End()

et ça marche....
:arf:

28/04/2005, 10h38
LineLe
enfin pas tout à fait....

tout a la fin de ma page B j'ai ça :
Code:

1 2 3 4 5 6 7 8 9 <% If Erreur <> "" Then response.Write(erreur) Else Response.Redirect("newConfigFiche.asp?Idfiche_tmp="& num_auto_fiche) response.End() End if %>
quand je mets en commentaire le response.redirect... ça marche, j'enleve le commentaire, ça marche plus.
Cette page C est vide, il n'y a rien. quand je mets quelque chose dedans , ça marche tout le temps.

En faisant les test de response.write tout a l'heure j'avais mis en commentaire tous les response.redirect pour etre sur que c'etait pas un de ceux la qui me ramenait sur ma page A.

je comprends pas comment ce truc la influe sur ma page A. Si ma page C est vide ma page A ne se soumet paS...

elle dit qu'elle comprend plus rien