Ciao a tutti
ho creato una piccola pagina asp che mi serve per mandare mail a degli utenti di un sito. Questi utenti sono ciraca 445. Utilizzando il codice sotto sembra funzionare tutto. la response.write finale mi restituisce 445 righe in output
Se però vado a vedere nella cartella C:\Inetpub\mailroot\Queue mi ritrovo circa 860 mail ( quasi il doppio ). In pratica per pochi indirizzi ne crea una , per altri 2.
A cosa può essere dovuto ? Qualche parametro del server ?
Unica cosa che ho fatto io è aumentare il tempo di timeout scripting.
Grazie a tutti.
do until dbset.eof
email1 = "xxx"
email2 = DBSet("email")
nome = "Admin"
oggetto = "Newsletter"
messaggio = "messaggio"
Set objFSO=Server.CreateObject("Scripting.FileSystemObject")
Set objHTML=objFSO.OpenTextFile(Server.MapPath("NewsLetter_20080219.html"),1)
HTML = objHTML.ReadAll
Dim objMail
Set objMail = Server.CreateObjecT("CDONTS.NewMail")
ObjMail.from = nome & "<" & email1 & ">"
ObjMail.to = email2
ObjMail.subject = oggetto
ObjMail.body = HTML
objMail.BodyFormat = 0
objMail.MailFormat = 0
ObjMail.Importance = 1
ObjMail.send
Set ObjMail = Nothing
Set objHTML = Nothing
Set objFSO = Nothing
dbset.MoveNext
response.write email2 & " - OK<br>"
loop
.
Modificato da ilmagowalter il 19 febbraio 2008 10.41 -