codice:
Dim objMessage, objConfig
Set objMessage = CreateObject("CDO.Message")
Set objConfig = CreateObject("CDO.Configuration")

objConfig.Fields(cdoSendUsingMethod) = cdoSendUsingPort
objConfig.Fields(cdoSMTPServer) = "localhost"
objConfig.Fields(cdoSMTPServerPort) = 25
objConfig.Fields.Update
Set objMessage.Configuration = objConfig

objMessage.To =  email
objMessage.From = "info@miosito.com"
objMessage.Subject = "Availability | INFO | "
objMessage.CreateMHTMLBody ("http://www.miosito.com/email.asp?p=1")


On Error Resume Next
objMessage.Send()

Set objMessage = Nothing
Set objConfig = Nothing
Della serie...

e se durante la creazione della pagina mhtml si creasse un errore 500 ????
Ho provato infattia debuggare e a bloccare l'invio ma non funziona..

invierebbe la pagina con l'errore 500...
come si potrebbe risolvere .. ?