Salve a tutti, ho questo problema: Devo inviare delle e-mail automatiche, non ho avuto problemi finora, funzionava tutto perfettamente, ma ora ,senza aver apportato alcuna modifica al codice, mi dà questo errore:

0x8004020F
La classe di eventi per questa sottoscrizione si trova in una partizione non valida

Se provo ad inserire l'autenticazione:

myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "email"

'myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")="password"

torna a funzionare!

Vorrei sapere il motivo di questo comportamento! Sapete darmi una spiegazione, vi posto il codice che fino a poco tempo fa funzionava:

Set myMail=CreateObject("CDO.Message")
Set myConfig=Server.CreateObject("CDO.Configuration")
with myConfig

Set myMail.Configuration=myConfig

myMail.From=Emailmittente
myMail.To=Emaildestinatario
myMail.Subject="Prova"
myMail.HTMLBody=HTML

myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2

myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")=0


'Name or IP of remote SMTP server
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp"

'Server port
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25


myMail.Configuration.Fields.Update
myConfig.Fields.Update
myMail.Send()
set myMail=nothing
set myConfig=nothing

end with