AutoIT在测试服务器不正常后发邮件通知

-----------------------testWeb.au3------------------------------
#include <Array.au3>

Local $nBytes
Local $emailFrom = "***@cn.***.com"
Local $emailTo = "***@***.com"
Local $emailMsg
Local $sWeb

Local $mailsvr = IniRead("targeweb.ini","server","mailserver","mail.***.ts 25")
Local $mailsvrname = IniRead("targeweb.ini","server","servername","tecserver02.***.ts")
Local $username = IniRead("targeweb.ini","server","username","dGVzdEBjbi50==");用base64加密
Local $passwd = IniRead("targeweb.ini","server","password","dGVjNDA=");用base64加密

Local $hDownload
Local $nBytes

Local $iArrayNum = IniRead("targeweb.ini","targe","WebsNum","1")
Local $sWebs[$iArrayNum]

For $j = 0 To $iArrayNum-1 Step 1
   $sWebs[$j] = IniRead("targeweb.ini","targe","Web"&$j,"http://www.***.ts/test.txt")
Next


Local $iWebsNum = UBound($sWebs)-1

For $i = 0 To $iWebsNum Step 1

   $sWeb = StringMid($sWebs[$i],12,7)
   
   $hDownload = InetGet($sWebs[$i], @TempDir & "\test.tec", 1, 1)
   Do
    Sleep(5000)
   Until InetGetInfo($hDownload, 2) ; Check if the download is complete.
   $nBytes = InetGetInfo($hDownload, 0)
   InetClose($hDownload)
   
   If $nBytes = 0 Then      
      $emailMsg = "不"&$sWeb
      $emailMsg = StringReplace($emailMsg,".","P")
      SendEmail($mailsvr,$mailsvrname,$username,$passwd,$emailFrom,$emailTo,$emailMsg)
   Endif
Next




Func SendEmail($mailsvr1,$mailsvrname1,$username1,$passwd1,$emailFrom1,$emailTo1,$emailMsg1)
   run("cmd.exe")
   sleep(2000)
   send("telnet "&$mailsvr1&"{Enter}")
   sleep(5000)
   send("helo "&$mailsvrname1&"{Enter}")
   sleep(5000)
   send("auth login{Enter}")
   sleep(5000)
   send($username1&"{Enter}")
   sleep(5000)
   send($passwd1&"{Enter}")
   sleep(5000)
   send("mail from:"&$emailFrom1&"{Enter}")
   sleep(5000)
   send("rcpt to:"&$emailTo1&"{Enter}")
   sleep(5000)
   send("data{Enter}")
   sleep(5000)
   send("Subject:"&$emailMsg1&"{Enter}")
   sleep(5000)
   send(".{Enter}")
   sleep(5000)
   send("quit{Enter}")
   sleep(5000)
   send("{Enter}")
   sleep(5000)
   send("exit{Enter}")
   sleep(5000)
EndFunc


-----------------------------------targeweb.ini ------------------------------
[targe]
WebsNum=2
Web0="http://www.***.com/images/logo_01.gif"
Web1="http://www.****.com/images/corel001_07.gif"

[server]
mailserver="mail.***.ts 25"
servername="tecserver02.****.ts"
username="dGVzdEBjLmNvbQ=="
password="dGwMDA="