Ciao a tutti,
con la speranza che qualcuno mi possa aiutare, vi spiego il mio problemone:
faccio effettuare una registrazione da un utente tramite un semplice script CDO message.
Il tutto funziona benissimo
Vorrei integrare allo script che allego la possibilità di prendere un immagine posizionandola come intestazione ed allegare un file pdf.
Purtroppo non ho le possibilità (per motivi che vi risparmio) modificare completamente lo script, quindi devo provare a modificare quello che già ho
Un ultima cosa, l'email del destinatario la prelevo direttamente dal form di registrazione dell'utente.
Vi prego aiutatemi!!
'Invio email
' istanzio le costanti per invio
DIM iMsg, Flds, iConf
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "smtp.aruba.it"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update
With iMsg
Set .Configuration = iConf
.To = email
.From = "registrazione_xxxxxx@nomeazienda.it"
.Sender = "nome azienda"
.Subject = "Registrazione nome azienda"
.TextBody = "Benvenuti - IL VOSTRO REFERENTE DI FIDUCIA."
.Send
End With
Rispondi quotando
