Il doit y avoir une erreur mais où ?

**BZH75** · 13/06/2007, 15h13

Bonjour,

Ci-dessous le code source d'une page ASP de mon site.
La page réel du site est à cette adresse Elle permet en théorie a mes clients de s'identifier... hors maintenant ça me balance une "erreur 500 le site ne peut pas afficher la page".

Donc, si quelqu'un pouvait regarder le code source de cette page et me dire, si apriorio il est correcte (j'imagine que non vu le résultat) où bien m'indiqué les problèmes repérés ?? Merci d'avance !!

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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
<!-- #include virtual = "/param/param.inc" -->
<!-- #include file="fct_menu.txt" -->
<!-- #include file="encode.txt" -->
<%
msg=""
MotDePasse=request("MOTDEPASSE")
MOTCLE=request("MOTCLE")
if MOTCLE = "" then
 
   MotDePasse=session("PASSE")
   MOTCLE=session("ACCES")
end if
codescorrects=VerificationAbonne(MOTCLE,MOTDEPASSE)
if codescorrects > 0 then
 
	   session("PASSE")=MOTDEPASSE
	   session("ACCES")=MOTCLE
	   session("idabo")=codescorrects
	Response.Redirect("consultationCompte.asp?"&crypt("MC="&MOTCLE&"&MDP="&MOTDEPASSE))
else
	if MOTCLE<>"12345678" then 	msg="<br>Votre code d'accès ou votre mot de 
passe est incorrect."  end if
end if%>
 
<html>
<head>
<%=FormatePage("Votre compte abonné")%>
           <table BORDER=0 CELLPADDING=0 CELLSPACING=0 Width="100%" 
height="100%"><TR height=25><TD colspan="2"><font 
size=0pt>&nbsp;</font></TD></TR><TR><TD width="100%" colspan="2"><A 
NAME="4"></A><TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 
width="100%"><TR><td width="5%"></td><TD ALIGN="LEFT" VALIGN="MIDDLE" 
WIDTH="15%"><table border=0 cellpadding=0 
cellspacing=0><tr><td></td></tr></table></TD><td width="5%"></td><TD 
ALIGN="CENTER" VALIGN="MIDDLE" WIDTH="65%">
<div align=center><FONT face=Arial color=#003399
size=4><STRONG><EM><FONT
color=#eeeeee> Gestion du   </FONT>
  <FONT color=#ffb820>COMPTE ABONNE</FONT>
</EM></STRONG></FONT>
    </div>
 
</TD><td width="10%"></td></TR></TABLE></TD></TR><TR height=50><TD 
colspan="2"><font size=0pt>&nbsp;</font></TD></TR>
            </td>
 
         <tr valign="middle" align="left">
           <td colspan="2">
             <p class="textg"><span class="bleu">
               Entrez le code d'accès qui vous a été fourni, ainsi que le 
mot
               de passe que vous avez choisi, <font face="Verdana, Arial, 
Helvetica, sans-serif" size="2" color= rgb(255,0,0)>
		en respectant majuscule minuscule</font>.<br>
               <%=msg%>
             </span></p>
           </td>
         </tr>
<form method="POST" action="CodeAccesVallon.asp">
         <tr valign="middle">
           <td align="right">
             <p class="textng"><span class="noir">
               Votre code d'accès:
             </span></p>
           </td>
           <td align="left">
             <input name="MOTCLE" size="40" tabindex="10">
           </td>
         </tr>
         <tr valign="middle">
           <td align="right">
             <p class="textng"><span class="noir">
               Votre mot de passe:
             </span></p>
           </td>
           <td align="left">
             <input name="MOTDEPASSE" size="40" tabindex="11" 
type="password">
           </td>
         </tr>
         <tr valign="middle">
           <td colspan="2" align="center">
             <input name="BT-EFFACER" tabindex="23" type="reset" 
value="Effacer">&nbsp;&nbsp;&nbsp;
             <input name="BTENVOYER" tabindex="22" type="submit" 
value="Envoyer">
           </td>
         </tr>
         <tr valign="middle" align="center">
           <td colspan="2">&nbsp;
           </td>
         </tr>
         <tr valign="middle" align="center">
           <td colspan="2">
             <a href="jemabonne.asp">Je m'abonne</a>
           </td>
         </tr>
         </form>
            </TD></TR><tr height=100%><td width="100%" 
colspan=2>&nbsp;</TD></TR></table>
 
			</td>
		  </tr>
		</table>
       </td>
 
</tr>
 
 
 
 
 
</table>
 
</body>
 
 
</html>
 
 
<script LANGUAGE="VBSCRIPT" RUNAT="SERVER">
function VerificationAbonne (motcle,MotDePasse)
set rstVerifAbonne = CreateObject("ADODB.Recordset")
	rstVerifAbonne.Open "SELECT IDENTIFIANTABONNE FROM c_i_ABONNE WHERE 
site<>'anafinance' and MOTCLE ='"&MOTCLE&"' AND MOTDEPASSE='"&MOTDEPASSE&"'" 
, _
           strConnexion
if rstVerifAbonne.EOF or rstVerifAbonne.BOF then
VerificationAbonne=0
else
VerificationAbonne=CInt(rstVerifAbonne.fields("IDENTIFIANTABONNE"))
end if
end Function
</script>

**Phiss** · 13/06/2007, 15h35

Je n'ai pas regardé à fond mais je voulais juste te dire qu'il est préférable de mettre request.form que request tout seul.

**BZH75** · 13/06/2007, 15h39

Merci pour le conseil ! Tu penses que ça peux jouer sur mon problème ou c'est un conseil d'ordre général ?

**Phiss** · 13/06/2007, 15h46

c'est plus d'ordre général.
Cela optimise ton code.

**agrotic** · 13/06/2007, 16h48

bonjour,

as-tu demandé à ne pas afficher les messages d'erreur simplifiés dans les options Internet ? cela permet à IE de te dire quelle est l'erreur et à quelle ligne elle se situe

Nico.

**BZH75** · 13/06/2007, 17h42

Quand je regarde le détail ça me donne ça :

Cette erreur (HTTP 500 Erreur interne au serveur) signifie que le site Web que vous visitez a rencontré un problème de serveur qui a empêché l’affichage de la page Web.

Pour plus d’informations sur les erreurs HTTP, consultez l’aide.

**pitoune17** · 13/06/2007, 18h13

Je ne sais pas si tu as réglé ton problème, mais pour y voir mieux, et compte tenu de ton erreur 500, il serait intéressant que tu mette la totalité de ton code (tes includes). la structure de ta base.

Sinon c'est pas facile

**kaiser59** · 13/06/2007, 21h32

Salut,

Il y a des truc pas très compréhensible dans ton code

tout d'abord on est même pas encore connecté qu'on à déjà le message d'erreur d'identification

Pour y remédier il te suffit de faire ceci :
Page formulaire :

Code :

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

1
2
3
4
<form action="toto" method="post">
 ..
 <input type="submit" name="ok" value="Envoyer">
</form>

Page asp :

Code :

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

1
2
3
4
5
<%
if request.form("ok") = "Envoyer" then
 'appliquer le reste du code
end if
%>

Ensuite pourquoi utilises-tu une fonction script pour vérifier le mot de passe sachant qu'on peut le faire en asp de plus s'il on enlève javascript je pense que ta vérification ne fonctionnera pas

De plus, tu fais une vérification de vérification un peu bizarre non

codescorrects=VerificationAbonne(MOTCLE,MOTDEPASSE)
if codescorrects > 0 then

session("PASSE")=MOTDEPASSE
session("ACCES")=MOTCLE
session("idabo")=codescorrects
Response.Redirect("consultationCompte.asp?"&crypt("MC="&MOTCLE&"&MDP="&MOTDEPASSE))
...

tu peux faire tout ceci dans une fonction asp

...
if MOTCLE<>"12345678" then
msg="<br>Votre code d'accès ou votre mot de passe est incorrect."
end if
end if

Pas besoin de mettre ceci puisse que tu vérifie la concordance des champs dans ta base à l'aide de ta fonction à la rigueur si tu veux le garder mais le dans ta fonction.

++

Il doit y avoir une erreur mais où ?

ASP

Discussions similaires

Partager

Partager