Discussion :

[LineLe]

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 :

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
 
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?

[roots_man]

si tu fais :

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
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 ?

[Gwenn]

Salut,

on dirait qu'il a un soucis avec

Code :

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

If ListeFichiers = "" then...

Essayes

Code :

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

If len(ListeFichiers)= 0 then...

[pmboutteau]

Sinon tu fais une alert Javascript

Code :

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

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.

[LineLe]

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


voila ce que j'ai 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
 
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....

[LineLe]

enfin pas tout à fait....

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

Code :

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

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