vbs sendmail發(fā)郵件帶附件方法
更新時(shí)間：2008年06月19日 12:33:31 作者：
vbs下實(shí)現(xiàn)郵件發(fā)送代碼，可以發(fā)附件等
NameSpace = "http://schemas.microsoft.com/cdo/configuration/"
Set Email = CreateObject("CDO.Message")
Email.From = "zzzevazzz@21cn.com"
Email.To = "zzzevazzz@126.com"
Email.Subject = "Test sendmail.vbs"
Email.Textbody = "OK!"
Email.AddAttachment "C:\foo.zip"
With Email.Configuration.Fields
.Item(NameSpace&"sendusing") = 2
.Item(NameSpace&"smtpserver") = "smtp.21cn.com"
.Item(NameSpace&"smtpserverport") = 25
.Item(NameSpace&"smtpauthenticate") = 1
.Item(NameSpace&"sendusername") = "zzzevazzz"
.Item(NameSpace&"sendpassword") = "ph4nt0m!"
.Update
End With
Email.Send
Set Email = CreateObject("CDO.Message")
Email.From = "zzzevazzz@21cn.com"
Email.To = "zzzevazzz@126.com"
Email.Subject = "Test sendmail.vbs"
Email.Textbody = "OK!"
Email.AddAttachment "C:\foo.zip"
With Email.Configuration.Fields
.Item(NameSpace&"sendusing") = 2
.Item(NameSpace&"smtpserver") = "smtp.21cn.com"
.Item(NameSpace&"smtpserverport") = 25
.Item(NameSpace&"smtpauthenticate") = 1
.Item(NameSpace&"sendusername") = "zzzevazzz"
.Item(NameSpace&"sendpassword") = "ph4nt0m!"
.Update
End With
Email.Send
相關(guān)文章
目前各類萬能驅(qū)動(dòng)程序包在網(wǎng)絡(luò)上屢見發(fā)布，在使用這些程序包的同時(shí)，我們不僅會(huì)問：為什么這些程序包中的驅(qū)動(dòng)程序可以在安裝新硬件之后自動(dòng)安裝呢？2008-07-07
把txt文件托放到這個(gè)vbs上試一下，它會(huì)自動(dòng)生成一個(gè)htm文件。需要修的地方說一下。2011-01-01
VBS教程：函數(shù)-Array 函數(shù)...2006-11-11
VBS教程：運(yùn)算符-除運(yùn)算符 (/)...2006-11-11
變量是一種使用方便的占位符，用于引用計(jì)算機(jī)內(nèi)存地址，該地址可以存儲(chǔ)腳本運(yùn)行時(shí)可更改的程序信息2006-11-11
VBScript 監(jiān)控并結(jié)束指定進(jìn)程的代碼
有時(shí)候我們需要監(jiān)控一些進(jìn)程，防止一些進(jìn)程的開啟，發(fā)現(xiàn)指定進(jìn)程運(yùn)行就關(guān)閉它，那么就可以參考下面的代碼2013-09-09
已經(jīng)第二次了，上班后沒把電話解除，總記不起這件事。做了個(gè)備忘錄，放在啟動(dòng)項(xiàng)里，每次啟動(dòng)系統(tǒng)后都會(huì)執(zhí)行，彈出相關(guān)事項(xiàng)，即便自己沒有記住也可以給個(gè)提醒了2008-06-06
對于想結(jié)合OWC的朋友，可以參考下。2009-05-05
用vbs腳本實(shí)現(xiàn)運(yùn)行DOS批處理不再出現(xiàn)黑屏cmd窗口
用vbs腳本實(shí)現(xiàn)運(yùn)行DOS批處理不再出現(xiàn)黑屏cmd窗口...2007-02-02
用vbs實(shí)現(xiàn)的exe2swf工具腳本代碼
幾個(gè)超據(jù)學(xué)習(xí)價(jià)值的VBS腳本用法：將exe格式的flash拖放在此vbs文件上，即可生成swf文件2008-05-05