Invio di una doppia email con CDO

[leftist73]

Mi auguro che non ci sia un post simile, in caso contrario chiedo scusa in anticipo.

Ho trovato un simpatico script che mi permette di inviare un'email anche in html all'utente che si registra:

Dim iMsg
Dim iConf
Dim Flds
set iMsg = CreateObject("CDO.Message")
set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True
Flds.Update
With iMsg
Set .Configuration = iConf
.CreateMHTMLBody "http://www.nomesito.it/email.htm"
.To = email
.From = "[email protected]"
.Sender = "Nome azienda"
.Subject = "Ciao"
.Send
End With

Ora se volessi ricevere un email, in tal modo posso verificare chi si è iscritto come faccio??
La cosa migliore e che mi arrivi un link del tipo http://www.nomesito.it/vedi_richiesta.asp?progressivo="&rs_last_id("progressivo")

Ditemi che c'è un modo per piacere

Grazie 1000

 

[Paolo69]

Lo hai provato lo script, funziona?

Il corpo dell'email è conservato in questa riga:

.CreateMHTMLBody "http://www.nomesito.it/email.htm"

la potresti personalizzare così:

.CreateMHTMLBody = "<a href=""http://www.nomesito.it/vedi_richiesta.asp?progressivo=""&rs_last_id("progressivo")&"" target=""_blank"">clicca qui</a>"

0

 

[leftist73]

Ciao Paolo69,
grazie per la tua risposta.
Si lo script funziona.
In realtà 5 minuti fà ho risolto in un altra maniera.
Ho inserito lo script di che mi invia l'email l'ho inserito in una pagina di risposta.

Grazie 1000 :mavieni::mavieni:

Lo hai provato lo script, funziona?

Il corpo dell'email è conservato in questa riga:

.CreateMHTMLBody "http://www.nomesito.it/email.htm"

la potresti personalizzare così:

.CreateMHTMLBody = "<a href=""http://www.nomesito.it/vedi_richiesta.asp?progressivo=""&rs_last_id("progressivo")&"" target=""_blank"">clicca qui</a>"

0