實現(xiàn): 對EMAIL分批 讀出記錄到recordset,利用常見的分頁程序,將所有記錄分頁,每頁作為一批,有多少頁就分多少批 間隔延遲 在每頁執(zhí)行完畢后用<meta http-equiv="refresh" content="60;URL=SendMail.asp?page="&page>來延遲跳轉(zhuǎn) 減少執(zhí)行時間: 在循環(huán)的過程中,循環(huán)添加收件人,而不要循環(huán)發(fā)送,即 for i=1 to rs.pagesize msg.AddRecipient rs("Email") rs.movenext next msg.Send ("smtp.abc.com") 減小郵件大小 循環(huán)添加收件人,會造成一封Email的收件人很多,這樣一封Email的就會很大。 所以,在以上代碼的基礎(chǔ)上改進一下,在循環(huán)內(nèi)做個判斷,當收件人Email數(shù)量到達 20的時候就發(fā)送一次。即: for i=1 to rs.pagesize msg.AddRecipient rs("Email") if i mod 20 = 0 then ’每 20 個收信人作為一封Email發(fā)送一次 msg.Send ("smtp.abc.com") msg.ClearRecipients ’清除已發(fā)送的收信人 end if rs.movenext next msg.Send ("smtp.abc.com") ’發(fā)送余下的 頁面 Mail.asp 包含郵件主題、正文的表單,<form action="SendMail.asp" target="Send">;一個iframe頁面,<iframe name="Send" src="SendMail.asp"> SendMail.asp 包含后臺發(fā)送程序,循環(huán),延遲跳轉(zhuǎn)等。