recupero password

[Stanislao]

ho ceracto di realizzare uno script di recupero password in questo modo

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("db/data.mdb")
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="Select * from Iscritti where iscritti.user = '"&request.form("user")&"'"
rs.Open sql,Conn,3,3

if rs.eof then
Response.write "

" 
Response.write "<center>" 
Response.write "<font face=Tahoma size=2 color=#000099>Email Inesistente!</font>

" 
Response.write "<font face=Tahoma size=2 color=#000099>Forse non hai scritto la Username in modo corretto. Torna indietro</font>

" 
Response.write "<font face=Tahoma size=2 color=#000099>Oppure non hai effettuato la Registrazione.</font>

" 
Response.write "</center>" 
Response.write "</p>" 

else
Set objemail = Server.CreateObject("CDONTS.NewMail") 
objemail.From="www.bbart.it"  
objemail.Subject="Recupero dati di accesso www.bbart.it" 
objemail.Body="Ecco i tuoi dati di accesso a www.bbart.it Username:  "&rs("User")&" Password:  "&rs("Password")&" oppure clicca qui per entrare direttamente http://www.melavivo.com/bbart/log.asp?user="&rs2("User")&"&password="&rs2("Password")&""  
objemail.To=""&rs("Email")&""
objemail.send()  
set objemail = nothing 
Response.write "<p align = center>" 
Response.write "<font face=Tahoma size=2 color=#000099>Username e Password ti sono stati inviati all'indirizzo email specificato al momento della registrazione.</font>

" 
Response.write "<font face=Tahoma size=2 color=#000099>Torna alla Home Page</font>" 
Response.write "</p>"

end if

rs.close
set rs = nothing
conn.close
set conn=nothing
end if
%>

ma non funziona.... mi spiego meglio
lo script non da errori
ma mi stampa a video subito l'opzione dati errati come se non ci fosse il nick nel db

e poi pure se metto il nick name nel form non funziona cmq


che ho sbagliato secondo voi?


grazie 3000

[maximum]

Stampa la query e provala direttamente sul db per vedere se tira fuori i dati.

sql="Select * from Iscritti where iscritti.user = '" & request.form("user") & "'"

response.write(sql)
response.end

[Stanislao]

|
|
|

[Stanislao]

scusa avevo sbagliato a mettere nella cartella...cmq non mi da i dati nella query...ma questo è ovvio perche io ho dato il request form

Select * from Iscritti where iscritti.user = ''

[Stanislao]

ora recupera i dati...

Select * from Iscritti where iscritti.user = ''stani''


tolgo il blocco query e mi da questo errore

ADODB.Recordset error '800a0e78'

Operation is not allowed when the object is closed.

/Recupero2.asp, line 7


grazie e scusate per i troppi post

[cavicchiandrea]

Originariamente inviato da Stanislao
ora recupera i dati...

Select * from Iscritti where iscritti.user = ''stani''


tolgo il blocco query e mi da questo errore

ADODB.Recordset error '800a0e78'

Operation is not allowed when the object is closed.

/Recupero2.asp, line 7


grazie e scusate per i troppi post

La linea 7 a cosa si riferisce?

Recupero2.asp e la pagina posta?

Ciao

[maximum]

Il dato lo recuperi sempre in request.form?
E' ovvio che se levi il blocco query non ti funziona, ti serve averlo per recuperare le informazioni da mettere nel corpo della mail.

Prova così:

sql="Select * from Iscritti where iscritti.user = '"&request.form("user")&"'"
rs.Open sql,Conn

[Stanislao]

ma è la stessa query mia non cambia nulla
sempre solito errore

ADODB.Recordset error '800a0e78'

Operation is not allowed when the object is closed.

/Recupero2.asp, line 7


e la riga 7 è if not rs.eof then

[maximum]

Prova solo così:

rs.Open sql,Conn

[Stanislao]

hai ragione ho mancato

rs.Open sql,Conn


grazie 4000