Salve a tutti
da tempo utilizzo il codice di seguito riportato per l'invio di email da un sito di ecommerce, ma da qualche tempo succede che mi trovo nella casella della posta inviata sul mio ISP, solo in alcuni casi che ovviamente non sono riuscito a risolvere, più copie della stessa email.

codice:
'-----------------------------------------------------------
'Invio E-Mail
'-----------------------------------------------------------
DIM iMsg, Flds, iConf, xNum

set oMail=Server.CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(2) = 2
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.miosito.com"
Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= 25
Flds("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")= True
Flds("http://schemas.microsoft.com/cdo/configuration/sendusername")= "user@miosito.com"
Flds("http://schemas.microsoft.com/cdo/configuration/sendpassword")= "anyvalue"
Flds.Update

With oMail
Set .Configuration = iConf
end with
omail.Fields("urn:schemas:httpmail:importance").Value = 0
oMail.From = "user@miosito.com;"
oMail.BCc="user@miosito.com;"
oMail.To=EMAIL
oMail.Subject="Oggetto mail"
oMail.HTMLBody = "Testo della mail"
oMail.Send
xNum=Err.number
if xNum>0 then
	Response.Write "Errore nell'invio delle E-Mail 
" & xNum & " " & Err.description
	Err.Clear
	Response.End
end if
set oMail=nothing
Lo script funziona su di un Window 2000 Server Sp4 con IIS 5.0.

Qualcuno ha una soluzione, consiglio

Grazie