Recupero password

windt · 22 Mag 2020

Salve ragazzi, come al solito qualche piccolo problemino sorge sempre. Non riesco a fare partire la mail per il recupero della

Max 1 · 23 Mag 2020

@windt
Da regolamento del forum, come tutti noi sei tenuto ad usare il tag

quando posti del codice php, oppure la funzione codice dalla barra degli strumenti

Inoltre IMPORTANTE: Prima di creare una nuova discussione o di rispondere alle discussioni esistenti ricordati di leggere attentamente il Regolamento del Forum e l'eventuale regolamento specifico della sezione!

Grazie

Correggi i tuoi post mi raccomando altrimenti sarò costretto a cancellare le discussioni

windt · 23 Mag 2020

Scusate ok va bene. Devo reinserire??? :-(

Paolo69 · 24 Mag 2020

...che errore ti restituisce il browser?

Max 1 · 24 Mag 2020

windt ha scritto:
Scusate ok va bene. Devo reinserire??? :-(

Si! E vedo che non lo hai anvora fatto devi farlo!

Paolo69 · 24 Mag 2020

Sostituisci:

Codice:

' esiste
'__________________________________________________________________________________
' configurazione mail
' Windows XP / 2003
cSmtpServer = "smtp.elektric.it"
cSmtpPort = "25"
cSMTPUser = ""
cSMTPPassword = ""

' invio e-mail di notifica
Set myMail = Server.CreateObject("CDO.Message")
'CDO Port (1=localhost 2=network)
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Out going SMTP server
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")= cSmtpServer
'SMTP port
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= cSmtpPort
'SMTP Server password
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/c-do/configuration/sendpassword") = cSMTPPassword
'SMTP Server username
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/c-do/configuration/sendusername") = cSMTPUser
'Timeout
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
'Update
myMail.Configuration.Fields.Update
' Windows XP / 2003
' oggetto
myMail.Subject = "Recupero password"
' mittente
myMail.From = "[email protected]"
' destinatario
myMail.To = u_email
' messaggio
myMail.HTMLBody = "Ciao "&u_id&", la tua Password e "&u_password&")"
' send
myMail.Send
Set myMail = Nothing
' confermo e redirect
Response.Write("Password inviata all'indirizzo "&U_email)
Response.Write("<br> ")
'__________________________________________________________________________________

con:

Codice:

' esiste
'__________________________________________________________________________________
' configurazione mail
Set objMail = Server.CreateObject("CDO.Message") 
Set objConfig = Server.createObject("CDO.Configuration") 
    With objConfig 
        .Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver")= "smtp.elektric.it"
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= 25
        .Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = ""
        .Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = ""
        .Fields.Update
    End With 
                
Set objMail.Configuration = objConfig ' Assegna le configurazioni
    objMail.From = "[email protected]" ' Mittente dell'email (indirizzo)
    objMail.To = u_email ' Destinatario dell'email (indirizzo) 
    objMail.Subject = "Recupero password" ' Oggetto dell'email
    objMail.HTMLBody = "Ciao "&u_id&", la tua Password e "&u_password&")" ' Corpo del messaggio Formato HTML 
    objMail.Send() ' Invia l'email 
Set objMail = Nothing 
'__________________________________________________________________________________

windt · 24 Mag 2020

Ciao Paolo, grazie per l'aiuto. Non mi restituisce nessun errore. Se inserisco indirizzo mail mi dice che non esiste, se non indico niente mi dice che non sono registrato. Ho inserito correzione come da te suggerita.

ASP.net:

<!--#include file="Connections/connDUclassified.asp" -->

<html>
<body>
<h3 align="center">Hai dimenticato la Password?</h3>
<p align="center">Inserisci l'indirizzo email con cui ti sei registrato e la riceverai entro pochi minuti!</p>
<p align="center">
    <form method="POST" action="pass.asp?invia=u_password">
    <input type="text" name="u_email" />
    <input type="submit" value="OK" />
    </form>
</p>
<p align="center">
<%

    invia = Request.QueryString("invia")
    email = Request.Form("u_email")

If invia = "u_password" Then
  
   If email <> "" Then
                 'Apro la connessione al database e verifico che l'utente esista
                strConnect = "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("../mdb-database/DUclassified.mdb")
            Set Rs = Server.CreateObject("ADODB.Recordset")
                Rs.ActiveConnection = strConnect
                Rs.Source = "SELECT * FROM users WHERE u_email = '"&U_email&"'"
                Rs.CursorType = 0
                Rs.CursorLocation = 2
                Rs.LockType = 1
                Rs.Open()
              If NOT Rs.EOF Then
            
                    username = (Rs.Fields.Item("u_id").Value)
                    password = (Rs.Fields.Item("u_password").Value)



' esiste
'__________________________________________________________________________________
' configurazione mail
Set objMail = Server.CreateObject("CDO.Message")
Set objConfig = Server.createObject("CDO.Configuration")
    With objConfig
        .Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver")= "smtp.elektric.it"
        .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= 25
        .Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = ""
        .Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = ""
        .Fields.Update
    End With
                
Set objMail.Configuration = objConfig ' Assegna le configurazioni
    objMail.From = "[email protected]" ' Mittente dell'email (indirizzo)
    objMail.To = u_email ' Destinatario dell'email (indirizzo)
    objMail.Subject = "Recupero password" ' Oggetto dell'email
    objMail.HTMLBody = "Ciao "&u_id&", la tua Password e "&u_password&")" ' Corpo del messaggio Formato HTML
    objMail.Send() ' Invia l'email
Set objMail = Nothing
'__________________________________________________________________________________


                ' confermo e redirect
                Response.Write("Password inviata all'indirizzo "&U_email)
                Response.Write("<br> ")
                '__________________________________________________________________________________
            Else
                ' non esiste
                  Response.Write("<font color='#FF0000'>Email non presente, non sei registrato...!</form>")
            End If
            
            ' chiudo e distruggo tutto
            Rs.Close
        Set Rs = Nothing ' chiudo il recordset

    Else ' e-mail vuota
      
             ' Se non viene inerito alcun indirizzo email restituisco un messaggio di errore
                 Response.Write("<font color=#FF0000>Indirizzo Email non è corretto!</form>")
  
   End If ' chiudo controllo e-mail
  
End If ' chiudo tutto

%>
</p>
</body>
</html>

Paolo69 · 25 Mag 2020

...allora non è un problema di invio email, avevi esordito con "Non riesco a fare partire la mail per il recupero della... ", probabilmente il valore inserito nel form email non viene passato nel modo corretto nel database o non viene valorizzato per niente. Appena ho tempo ricontrollo il codice, ma ha mai funzionato?

windt · 25 Mag 2020

Ciao Paolo, nella confusione sicuramente mi ero espresso male. E' da 2 mesi che cerco di farlo funzionare ma senza nessun risultato :-(

Paolo69 · 25 Mag 2020

intanto correggi questo codice, in particolare questa riga con la variabile email errata:

Codice:

email = Request.Form("u_email")

devi sostituirla con questa, con la variabile email giusta:

Codice:

u_email = Request.Form("u_email")

windt · 25 Mag 2020

Fatto, ho anche corretto questa riga in questo modo "" If u_email <> "" Then""
Finalmente adesso funziona invio della mail, mi resta solo il problema che nella mail riporta dei segni grafici anziche il nome utente e la password

windt · 25 Mag 2020

Paolooooo, grazie a te ho trovato gli errori

adesso funziona tutto... finalmente. Poi devo trovare degli spunti tuoi per andare a capo in un texarea

. E' una fortuna che ci sei, sei sempre disponibile con il tuo aiuto. Un grandissimo grazie

windt · 25 Mag 2020

Come ti dicevo mi è rimasto da configurare solo questaparte di codice, che lla mail che arriva si legge solo l'ultima riga

ASP.net:

Set objMail.Configuration = objConfig ' Assegna le configurazioni
    objMail.From = "[email protected]" ' Mittente dell'email (indirizzo)
    objMail.To = u_email ' Destinatario dell'email (indirizzo)
    objMail.Subject = "Recupero password" ' Oggetto dell'email
    objMail.HTMLBody = "Ciao "&u_first&", " ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Per la tua richiesta le informazioni di login sono : " & vbCrLf & vbCrLf  ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Username: "& u_id & vbCrLf ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Password: "& u_password & vbCrLf & vbCrLf & vbCrLf ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Clicca questo collegamento per accedere alla pagina del Login : " & ServerURL & "login.asp" & vbCrLf & vbCrLf ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "----------------------------------------------------" & vbcrlf ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Powered by "& Live_server & vbcrlf' Corpo del messaggio Formato HTML
    
    objMail.Send() ' Invia l'email
Set objMail = Nothing

Paolo69 · 26 Mag 2020

sostituisci:

Codice:

    objMail.HTMLBody = "Ciao "&u_first&", " ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Per la tua richiesta le informazioni di login sono : " & vbCrLf & vbCrLf  ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Username: "& u_id & vbCrLf ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Password: "& u_password & vbCrLf & vbCrLf & vbCrLf ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Clicca questo collegamento per accedere alla pagina del Login : " & ServerURL & "login.asp" & vbCrLf & vbCrLf ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "----------------------------------------------------" & vbcrlf ' Corpo del messaggio Formato HTML
    objMail.HTMLBody = "Powered by "& Live_server & vbcrlf' Corpo del messaggio Formato HTML

con questo:

Codice:

messaggio = "<br /><hr />Ciao "&u_first&", in relazione alla tua richiesta, le credenziali per poter accedere al sistema sono le seguenti:<br />"
messaggio = messaggio&". username: "& u_id & "<br />"
messaggio = messaggio&". password: "& u_password & "<br />"
messaggio = messaggio&"Clicca questo collegamento per accedere alla pagina del Login : <a href=" & ServerURL & " target='_blank'>accedi</a><br />"
messaggio = messaggio&"<hr />"
messaggio = messaggio&"Powered by "& Live_server & "<br />"

objMail.HTMLBody = messaggio

il messaggio generato dovrebbe essere una cosa del genere:

windt · 26 Mag 2020

Un immenso grazieeeee, adesso si che funziona tutto. Forse più avanti dovro disturbarti nuovamente perchè, mentre la mail di questo form arriva perfettamente e velocemente nella casella di posta, quella del form di chi contatta l'inserzionista arriva come spam......,, ci sto lavorando e voglio provare a riuscire da solo

. Cmq sempre grazie per la tua preziosa e impagabile disponibilità. Luigi

Paolo69 · 26 Mag 2020

in questa discussione ho indicato uno dei motivi per cui va nella casella spam:

https://forum.mrw.it/threads/registrazione-utente-su-pagina-asp.56121/#post-215463

windt · 26 Mag 2020

Ok grazie a presto

Autore	Titolo	Forum	Risposte	Data
H	Recupero password dimenticata	PHP	0	18 Feb 2013
E	Form recupero password	PHP	12	2 Mag 2012
C	Recupero password Access	MS Access	4	26 Mag 2005
R	recupero PASSWORD	Supporto Mr.Webmaster	3	16 Lug 2003
O	Recupero valori da listato	Javascript	0	9 Mag 2021
S	problema con recupero dati tabella mysql	PHP	2	12 Apr 2021
D	Recupero dati da HDD esterno	Hardware	0	13 Gen 2021
T	foreach e fetchAll dove recupero solo l'ultimo record	PHP	5	2 Set 2020
T	recupero valori select multipla da android	Javascript	3	12 Lug 2020
L	Recupero dati da SSD Windows 10 prof	Windows e Software	2	11 Mar 2020
S	[PHP] Recupero nome immagine da Form con input file	PHP	3	10 Nov 2019
	Recupero dati da una vecchia versione MySql [Risolto]	MySQL	4	24 Lug 2018
	[PHP] Recupero id autoincrement	PHP	8	10 Lug 2018
I	Recupero accesso pannello di controllo dominio	Leggi, Normative e Fisco	2	13 Apr 2018
S	[PHP] form con metodo get e recupero id	PHP	4	26 Mar 2018
	[PHP] Check - Select e recupero variabili	PHP	40	21 Feb 2018
	[PHP] Recupero input senza invio	PHP	1	19 Gen 2018
U	[PHP] Selezione con menu a tendina e recupero selezione	PHP	5	19 Dic 2017
L	Problema con recupero dati in PHP cURL e JAVA con server	PHP	1	6 Apr 2017
P	Javascript o Jquery - recupero testo (oltre al valore) di una select	Javascript	5	10 Mar 2017
S	[PHP] Recupero più dati da form realizzata ciclo FOR	PHP	5	23 Ott 2016
P	[PHP] Recupero dati da un array	PHP	5	17 Ott 2016
P	[Javascript] Aiuto per recupero variabili da script	Javascript	10	30 Ago 2016
F	Recupero dati json	Ajax	2	19 Lug 2016
D	jquery per recupero variabile	Javascript	4	16 Mag 2016
A	Form recupero campo Radio	PHP	7	13 Apr 2016
I	tabella con ciclo, recupero dati	PHP	3	21 Dic 2015
P	Recupero variabile	Ajax	5	13 Lug 2015
Z	recupero e stampa a video di immagini da database	PHP	3	31 Mar 2015
	Problema recupero Dati da MYSQL	PHP	20	4 Gen 2015
L	Recupero dati da tutte le tabelle nel db	MySQL	4	10 Dic 2014
	[PHP] Recupero dati da un WHILE !	PHP	3	29 Nov 2014
N	Recupero indirizzo mail	PHP	1	5 Ott 2014
M	recupero dati...	PHP	1	30 Set 2014
	Recupero anchor	Javascript	13	12 Set 2014
P	Recupero dati per select form	PHP	9	31 Lug 2014
S	Recupero valori da tabella tramite id colonna	Javascript	1	10 Apr 2014
L	Recupero dati form in tabella e invio con ajax. Problemino	jQuery	1	10 Apr 2014
L	PHP e recupero risultati da query	PHP	2	19 Mar 2014
L	PHP e recupero risultati da query	PHP	11	18 Mar 2014
	HDD 2.5'' caduto a terra: possibile recupero dei dati al suo interno	Hardware	8	26 Feb 2014
D	recupero valore radio button	PHP	1	2 Nov 2013
	Recupero dati da una tabella e spostarli in un altra	PHP	11	26 Ott 2013
A	Problema recupero valori da select con chiamata ajax	Ajax	1	9 Ott 2013
	Non recupero il value in un select popolato da DB	PHP	4	1 Ago 2013
N	Chronoforms, recupero nome form	Joomla	20	16 Lug 2013
	Recupero valori select	Javascript	1	22 Giu 2013
C	Recupero dati da pagina esterna	PHP	5	11 Feb 2013
M	recupero dati da db	PHP	6	24 Gen 2013
I	Recupero numero file uploadati php	PHP	1	18 Set 2012

Cerca

Cerca

Recupero password

windt

Utente Attivo

Max 1

Super Moderatore

windt

Utente Attivo

Paolo69

Moderatore

Max 1

Super Moderatore

Paolo69

Moderatore

windt

Utente Attivo

Paolo69

Moderatore

windt

Utente Attivo

Paolo69

Moderatore

windt

Utente Attivo

windt

Utente Attivo

windt

Utente Attivo

Paolo69

Moderatore

windt

Utente Attivo

Paolo69

Moderatore

windt

Utente Attivo

Discussioni simili