salve a tutto il forum.
nonostante abbia provato in vari modi
non riesco a sistemare questi apici
daato ke il risultato è sempre:
questo è il codice della paginacodice:Prevista fine istruzione /prova_login/prova login/txt/recuperopass.asp, line 8, column 29 response.Write"<form action="recuperopass.asp" method=post"&_ ----------------------------^
se qualkuno volesse darmi una mano sarei molto contentocodice:<html> <haed> <body> <% nick=trim(request.Form("nick")) if len (nick) < 1 then response.Write"Hai dimenticato la password?" response.Write"<form action="recuperopass.asp" method=post"&_ "Inserisci il tuo nick:"&_ "input type=""text"" name=""nick"">"&_ "</form>" else Set Conn = Server.CreateObject("ADODB.Connection") StrConn="DRIVER={Microsoft Access Driver (*.mdb)};"&_ "DBQ=" & server.MapPath("../mdb-database/utenti.mdb") Conn.open StrConn email=Replace(email,'"",'"") sql="select nick,email, passw form utenti where"&_ "nick='"&nick&""' set rs=conn.execute (sql) if rs.eof then response.Write"Non esiste nessun utente con questo nick" else email=rs("nick") passw=rs("passw") Set objmail=Server.CreateObject("CDONTS.NewMail") objmail.from="field_tv@simosnap.it" objmail.to=email objmail.subject="Ecco la tua password" cdomail.body="Ecco la tua password" cdomail.send() set cdomail=nothing response.Write("Password spedita") end if rs.close set rs = nothing conn.close set conn=nothing end if %> </body> </html>
e riconoscente...![]()

Rispondi quotando