联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
@echo off set sum=0 for /f "delims=ms" %%a in (ping_Average_time.txt) do ( set /a sum+=%%a ) echo 平均值的和:%sum% >"%temp%\MyDel.vbs" echo wscript.echo %sum%/40 for /f %%a in ('cscript /nologo "%temp%\MyDel.vbs"') do set div1=%%a echo 平均值除以40的结果:%div1% set /a div2=sum/40 echo 平均值整除40的结果:%div2%
>"%temp%\MyDel.vbs" echo wscript.echo %sum%/40
for /f %%a in ('cscript /nologo "%temp%\MyDel.vbs"') do set div1=%%a
Set cdo = CreateObject("CDO.Message") strCfg = "http://schemas.microsoft.com/cdo/configuration/" With cdo .Sender = "发送者邮件地址" .From = "发送者邮件地址" .To = "接收者邮件地址" .Fields("urn:schemas:mailheader:X-Priority") = 1 .Fields.Update .Subject = "邮件标题" .TextBody = "邮件内容" .Configuration(strCfg & "SendUsing") = 2 .Configuration(strCfg & "smtpserver") = "发送邮件服务器地址" .Configuration.Fields.Update .Send End With