Ciao a tutti,
non ho trovato nulla in proposito in questa sezione e provo quindi ad esporre il problema.
Ho una procedura che invia un numero di mail (massimo 400) con testo html. Tali mail, "pesano" abbastanza, perchè arrivano anche a più di 500kb.
Il problema è questo.
Se invio la mail, che come allegato ha il risultato presente nel corpo della mail (è un file chiaramente), ma lo eseguo con una procedura Oracle, la velocità è di molto inferiore ai [b]40 minuti[b] e oltre che impiego nell'invio attraverso CDO.
Non so dare altri indizi, oltre che chiaramente il codice che vi posto. (l'allegato non c'è quasi mai)
(l'indirizzo di mail, la password e il server di posta, l'ho omesso).
Qualsiasi suggerimento è ben accetto.Codice PHP:strURL = Request.ServerVariables("URL")
Dim iMsg
Dim iConf
Dim Flds
set iMsg = CreateObject("CDO.Message")
set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
' username e password
Flds("http://schemas.microsoft.com/cdo/configuration/sendusername") = "EMAIL"
Flds("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "PASSWORD"
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="SMTP.XXXX.IT"
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =25
Flds("http://schemas.microsoft.com/cdo/configuration/connectiontimeout") =10
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True
Flds.Update
With iMsg
Set .Configuration = iConf
.To = vc_descindiemai
.From = vc_descindiemaimitt
.Bcc = ""
.Subject = "Bollettino n. "&vc_numeboll
.CreateMHTMLBody vc_pathcomplinvihtml
if vc_pathfileatta <> "" then
.AddAttachment server.mappath(vc_pathfileatta)
end if
.Send
End With
Ciao
Rispondi quotando
