vbs傳送郵件 win10環境下成功

2021-08-20 19:44:21 字數 1972 閱讀 1575

function send_mail(you_account,you_password,send_email,send_email2,send_topic,send_body,send_attachment)  

'code by netpatch

'vbs傳送郵件引數說明

'you_account:你的郵件帳號

'you_password:你的郵件密碼

'send_email:

'主要郵件位址

'send_email2: 備用郵件位址

'send_topic:

'郵件主題

'send_body:

'郵件內容

'send_attachment:郵件附件

you_id=split(you_account, "@", -1, vbtextcompare)

'帳號和伺服器分離

ms_space = ""

'這個是必須要的,不過可以放心的事,不會通過微軟傳送郵件

set email = createobject("cdo.message")

email.from = you_account

'這個一定要和傳送郵件的帳號一樣

email.to = send_email

'主要郵件位址

if send_email2 <> ""

then

email.cc = send_email2

'備用郵件位址

endif

email.subject = send_topic

'郵件主題

email.textbody = send_body

'郵件內容

if send_attachment <> ""

then

email.addattachment send_attachment

'郵件附件

endif

with email.configuration.fields

.item(ms_space&"sendusing") = 2

'發信埠

.item(ms_space&"smtpserver") = "smtp."&you_id(1)

'smtp伺服器位址

.item(ms_space&"smtpserverport") = 25

'smtp伺服器端口

.item(ms_space&"smtpauthenticate") = 1

'cdobasec

.item(ms_space&"sendusername") = you_id(0)

'你的郵件帳號

.item(ms_space&"sendpassword") = you_password

'你的郵件密碼

.update

endwith

email.send

'傳送郵件

set email=nothing

'關閉元件

send_mail=true

'如果沒有任何錯誤資訊,則表示傳送成功,否則傳送失敗

if err then

err.clear

send_mail=false

endif

endfunction

'以下是利用上面的函式傳送帶附件的郵件例子

if send_mail("[email protected]","******","[email protected]","","郵件主題","some code from vbs","")=true

then

wscript.echo "傳送成功"

else

wscript.echo "傳送失敗"

endif

win10環境下tensorflow gpu安裝

踩了很多坑,浪費了一下午時間,在此記錄一下。注意 只能用8.0 其中,cudnn的安裝方法是將cudnn下面的三個資料夾 bin,include,lib 複製到cuda 8.0資料夾。裝完以後執行,出現以下錯誤 importerror no module named pywrap tensorflo...

Win10環境下安裝pytorch

注意 pytorch0.4.0才開始支援windows pip install pytorch torchvision這個是安裝命令,不用多說 下面看看遇到的問題 反正就是不行,但是我換linux一次就搞定,不得不說對win相容性真差勁。命令列如下 pip3 install pip3 install...

win10環境下Python安裝skimage模組

個人python環境為anaconda自帶python3.6,使用anaconda prompt安裝時出錯,效果如下,不能安裝skimage庫 因此,安裝skimage模組需要另一種方式。2.安裝 將這三個安裝包放在安裝目錄下,我的位於anaconda3 lib site packages中,按住s...