Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A0401)
Prevista fine istruzione
/password/pippo/pippo.asp, line 62, column 14
UPDATE utenti SET password = appoggio WHERE password_database=session ("sssPassword")
'codice ---------------------------------------------------------
<%
Option Explicit
dim utente
utente = ""
dim password
password = ""
if Session ("sssUtente") = utente or Session("sssPassword") = password then
response.redirect("../password.asp?errore=1")
end if
%>
<html>
<head>
<meta http-equiv="Content-Language" content="it">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>PAGINA RISERVATA A PIPPO</title>
</head>
<body>
<p align="center"></p>
<p align="center">PAGINA RISERVATA A PIPPO</p>
<p align="center"></p>
<form>
<p align="center">
<input type="button" value="PREMI QUI PER CAMBIARE PASSWORD" name="Pulsante" onclick"cambio_password()"></p>
</form>
<%
function cambio_password()
%>
<SCRIPT language="javascript">
var appoggio;
appoggio = prompt("Inserire la nuova password","");
</SCRIPT>
<%
session ("sssPassword") = password
' creare connessione
set connessione = Server.createObject ("ADODB.connection")
'aprire connessione
connessione.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("utenti.mdb")
'creare recordset
set rs = Server.CreateObject("ADODB.recordset")
'creo la query e invio comando sql
query = "select password from utenti"
'configurare
rs.ActiveConnection = connessione
do while not rs.eof
password_database=rs.fields ("password")
if session ("sssPassword") = password_database then
' LINEA 62:
UPDATE utenti SET password = appoggio WHERE password_database = session ("sssPassword")
connessione.Execute query
response.write ("Password cambiata. Ora sarà: " & password)
session ("sssPassword") = password
end if
rs.close
connessione.close
set rs =nothing
set connessione=nothing
rs.movenext
loop
end function
%>
<p align="left"></p>
<p align="center"></p>
<p align="left"></p>
</body>
</html>
' ----------------------------------------------------------------

Rispondi quotando
