Originariamente inviato da aasmdaa
Sto seguendo un corso base su guidainlinea.com e provando ho due listati che non funzionano...se qualcuno sa darmi una mano a trovare l'errore...
RESPONSE1.ASP
<%Option Explicit%>
<html>
<head>
<title>Response 1</title>
</head>
<body>Riempi i campi:
<%
var sErrore
var sMessaggio
sErrore = Request.QueryString("errore")
Select Case
sErrore
Case "1"
sMessaggio = "Il campo nome non è, stato debitamente compilato"
Case "2"
sMessaggio = "Il campo cognome non è, stato debitamente compilato"
Case "3"
sMessaggio = "Entrambi i campi non sono stati debitamente compilato"
Else Case
sMessaggio = ""
End Select
Response.Write(sMessaggio)
%>
<form name="test" action="response2.asp" method="post">
nome: <input type="text" name="txtFirstName" value="">
cognome: <input type="text" name="txtLastName" value="">
<input type="submit" value="Invia">
</form>
</body>
RESPONSE2.ASP
<% Option Explicit
dim sNome
dim sCognome
dim sErrore
'Prende i dati in input
sNome = request.form("txtFirstName")
sCognome = request.form("txtLastName")
'Controlla quali campi sono stati lasciati in bianco
sErrore = 0
if sNome = "" then sErrore = 1
if sCognome = "" then sErrore = sErrore + 2
'Se ci sono errori viene richiamata la pagina di input
If sErrore > 0 then
Response.Redirect("Response1.asp?errore=" & sErrore)
End If
%>
<html>
<head>
<title>Response 2</title>
</head>
<body>Hai inserito i seguenti dati ...
nome: <%= sNome %>
cognome: <%= sCognome%>
</body>
</html>
In pratica non dovrebbe fare altro che inserire nome e cognome, verificare se sono stati inseriti, ed in caso di errore rimandare alla prima pag. In realtà quando clicco invia esce la finestra per scaricare (di download) RESPONSE2.ASP
Qualcuno sa dirmi dov'è l'errore?
E se poi qualcuno risponde ho qualche altro chiarimento da chiedere...
Rispondi quotando
