salve ho uno spazio su natan.it
provo ad inviare email con il seguente codice ma ottengo il seguente errore:
error '8004020f' perche?
<%
'------------------------------------invio email
DIM iMsg, Flds, iConf
emaile="info@lacollinadelsagrantino.com"
email="info@turistaonline.net"
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "mail.lacollinadelsagrantino.com"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.update
With iMsg
Set .Configuration = iConf
.From = emaile
.To = email
.Sender = emaile
.Subject = "campo1"
.htmlBody = "appo"
.Send
End With
'------------------------------------fine invio email
%>

Rispondi quotando
