Ciao a tutti,

sto cercando di far funzionare un recupero password attraverso mail...
la mail arriva, esce il messaggio, l'oggetto, ma niente password...come mai?

vi incollo il codice, magari sbaglio qcs e non mi rendo conto... grazie mille a tutti.



<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%
tipouser=trim(request("tipouser"))

set conn = server.CreateObject("Adodb.connection")
conn.open strconn


email=trim(request("email"))
if email <> "" and tipouser <> "" then

recupero=true

set rsDati= server.CreateObject("Adodb.recordset")
if tipouser="utente" then
sql="select psw from TblUtenteAna where email ='"& email &"'"
else
sql="select psw from TblOfferente where email ='"& email &"'"
end if


rsdati.open sql,conn
if not rsdati.eof then
ctrl=true
psw=rsdati("psw")



Msg = Msg & "*******************" & "
"
Msg = Msg & "** xxxxxxxxxxx **" & "
"
Msg = Msg & "*******************" & "
" & "
"
Msg = Msg & "**Richiesta Recupero password a xxxxxxxxxxx**" & "
" & "
" & "
"
Msg = Msg & "La password per accedere a xxxxxxxxxxx e " & psw


Set objMail=Server.CreateObject("CDO.Message")
objMail.From="registrazioni@xxxxxxxxxxx.com"
objMail.To=Email
oggettomail="Recupero Password iscrizione a xxxxxxxxxxx"
objMail.Subject=oggettomail
objMail.HTMLBody =Msg
'objMail.BodyFormat=1
'objMail.MailFormat=0

objMail.Send
Set objMail=nothing

else
ctrl=false
end if

end if

%>