服務器用批處理每天自動備份資料生成日志,我寫了個VBS代碼自動發送郵件帶附件的 ,我想讓他如果備份失敗了 那么生成的日志會顯示當天復制日期如20200608,”復制檔案0個“,我想利用這個日志讓他如果備份拷貝失敗了,自動運行VBS發送郵件通知我 , 下面是撰寫的發送郵件的腳本, 請大神幫忙怎么實作如果備份失敗自動發送郵件 成功就不發送。
NameSpace = "http://schemas.microsoft.com/cdo/configuration/"
set Email = CreateObject("CDO.Message")
Email.From = "發件人"
Email.To = "收件人"
Email.Subject = "LOG"
x="C:1.txt"
y="C:\aaa.log"
Set fso=CreateObject("Scripting.FileSystemObject")
Set myfile=fso.OpenTextFile(x,1,Ture)
c=myfile.readall
myfile.Close
Email.Textbody = c
Email.AddAttachment y
with Email.Configuration.Fields
.Item(NameSpace&"sendusing") = 2
.Item(NameSpace&"smtpserver") = "服務器地址"
.Item(NameSpace&"smtpserverport") = 25
.Item(NameSpace&"smtpauthenticate") = 1
.Item(NameSpace&"sendusername") = "用戶名"
.Item(NameSpace&"sendpassword") = "密碼"
.Update
end with
Email.Send
Set Email=Nothing
轉載請註明出處,本文鏈接:https://www.uj5u.com/qita/36722.html
