Salve sto facendo un sito in cui le persone si scrivono e alla loro iscrizione vorrei che gli arrivasse una email per confermare, premetto che di asp sono alle prime armi, vi chiedo un aiutino visto che mi sto scervellando da una settimana
qui vi do il codice che ho messo
Dim objMail, objConfig
Set objMail = createObject("CDO.Message")
Set objConfig = Server.createObject ("CDO.Configuration")
With objConfig
.Fields("
http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.miamail.com"
.Fields("
http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.Fields("
http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Fields("
http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Fields.update
End With
Set objMail.Configuration = objConfig
objMail.From = " "
objMail.To = Request("email")
objMail.Sender = " "
objMail.Subject = " Conferma la tua iscrizione "
objMail.HTMLBody = " Salve " & Request("username") & ", " & VbCrLf &_
" Hai ricevuto questa email perchè hai richiesto l'iscrizione al nostro sito. " & VbCrLf & VbCrLf & VbCrLf &_
" I dati per accedere al tuo pannello personale sono i seguenti: " & VbCrLf & VbCrLf & VbCrLf &_
" USERNAME " & Request("username") & ", " & VbCrLf &_
" PASSWORD " & Request("password") & ", " & VbCrLf & VbCrLf & VbCrLf &_
"--------------------------------" & VbCrLf &_
"Lo Staff" & VbCrLf &_
"--------------------------------"
objMail.Send()
Set objMail = Nothing
che cos'ha che non va? mi arriva sempre l'email:
Delivery Failure
Failed Recipient: emailmittente
Reason: Remote host said: 501 miaemail Sender domain must exist
qual'è il problema?
vi ringrazio in anticipo