.dsy:it. - [INFORMATICA]

Calendar

Members

Faq

Logout

.dsy:it. : Powered by vBulletin version 2.3.1

.dsy:it. > Community > Forum De Bell Tolls > [INFORMATICA] - Asp

Last Thread Next Thread

Author

Thread Expand all | Contract all

superfabius

.grande:maestro.

User info:

Registered: Nov 2002
Posts: 1519 (0.18 al dì)
Location:
Corso:
Anno:
Time Online: 37 Days, 15:58:19 [...]
Status: Offline

Post actions:

Edit | Report | IP: Logged

[INFORMATICA] - Asp

Ho fatto questa semplice pagina asp di login ma mi indirizza sempre verso la pagina di errore.

<HTML>
<BODY bgcolor=#000060>
<FONT face=arial color=blue>
<P>Aristotle Middle School: Login</P>
</FONT>
<FORM Name=Myform Method="Post" Action="/11asp02.asp">
<FONT face=arial color=red size=3>
<P>LoginID: <input type=text name=LoginID></P>
<P>Password: <input type=password name=pwd></P>
</FONT>
<P>
<INPUT type="submit" value="Send" name=submit>
</P>
</FORM>
</BODY>
</HTML>

questa è la pagina a cui invio i dati...

<HTML>
<BODY bgcolor=#000060>
<%
Function Login(LoginID, Password)
Dim cn
Dim rs
Dim strSql
Dim strCn
Set cn=CreateObject("ADODB.Connection")
Set rs=CreateObject("ADODB.Recordset")
strSql="SELECT * FROM tblLog WHERE LoginName= '" & LoginID & "'"
On Error Resume Next
str="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&server.MapPath("/mdb-database/DBSource.mdb")
cn.Open str
If Err Then Exit Function
rs.Open strSql, cn
If Err Then Exit Function
If rs("pwd")=Password Then
Login=True
Else
Login=False
End If
rs.Close
cn.Close
Exit Function
End Function
If Login(Request.Form("LoginID"),Request.Form("pwd")) Then
Response.Redirect("benvenuto.html")
Else
Response.Redirect("err.html")
End If
%>
</BODY>
</HTML>

qualcuno mi sa dire che errore c'è?
cià

19-08-2003 10:23

Click here to Send superfabius a Private Message

webwarrior

Very Cool Guy

User info:

Registered: Oct 2002
Posts: 197 (0.02 al dì)
Location: Steppa Brianzola
Corso: Informatica
Anno: Settimo?
Time Online: 1 Day, 1:02:00: [...]
Status: Offline

Post actions:

Edit | Report | IP: Logged

Ciao,

innanzitutto elimina o "commenta" la direttiva "on error resume next", cosi lo script si ferma non appena individua un errore così che puoi verificare cosa sia successo

In seconda istanza, scaricati lo script debugger (lo trovi sul sito microsoft) e installalo (dovrai impostare un paio di spunte nella configurazione di IIS)

Una volta installato, inserisci l'istruzione "stop" all'inizio dello script in modo da impostare un breakpoint, così puoi proseguire l'esecuzione una riga alla volta.

Un suggerimento finale: per rendere il testo dello script più leggibile sul forum, inseriscilo nel tag "PHP".

__________________
__________________

a p bertolini

20-08-2003 15:33

Click Here to See the Blog of webwarrior

Click here to Send webwarrior a Private Message

0m4r

.grande:maestro.

User info:

Registered: Mar 2002
Posts: 7287 (0.84 al dì)
Location: Düsseldorf (DE)
Corso:
Anno: ESAMI FINITI
Time Online: 49 Days, 0:57:33 [...]
Status: Offline

Post actions:

Edit | Report | IP: Logged

Originally posted by webwarrior
leggibile sul forum, inseriscilo nel tag "PHP".

il tag è [ code ]...il codice...[/ code ]

(senza gli spazi fra le quadre)

__________________
http://www.twitter.com/0m4r

20-08-2003 20:25

Click here to Send 0m4r a Private Message

superfabius

.grande:maestro.

User info:

Registered: Nov 2002
Posts: 1519 (0.18 al dì)
Location:
Corso:
Anno:
Time Online: 37 Days, 15:58:19 [...]
Status: Offline