⑴ 用bat和vbs等简易程序获取本机IP、系统版本、已开放端口 等信息并发送至指定邮.箱
VBS获取系统版本
setcol=getobject("winmgmts://./root/cimv2").ExecQuery("Select*fromWin32_OperatingSystem")foreachpspincolmsgboxpsp.caption&vbcrlf&psp.versionnext
批处理获取系统端口信息，网上找的，不知道是不是你要的
@echooffcoloraTitleXP端口-进程查询echo╔–╗echo本机开放的端口及使用该端口的进程echo╚–╝echo————————————echo端口号进程名称ECHOTCP协议:::利用netstat命令找出使用TCP协议通信的端口，并将结果分割；::将第二个参数(IP加端口)传给%%i，第五个参数(PID号)传给%%j;for/F"usebackqskip=4tokens=2,5"%%iin(`"netstat-ano-pTCP"`)do(call:Assoc%%iTCP%%jecho!TCP_Port!!TCP_Proc_Name!)ECHOUDP协议:for/F"usebackqskip=4tokens=2,4"%%iin(`"netstat-ano-pUDP"`)do(call:Assoc%%iUDP%%jecho!UDP_Port!!UDP_Proc_Name!)echo按任意键退出pause>nul:Assoc::对%1(第一个参数）进行分割，将第二个参数传给%%e。在本程序中，%1即为上面的%%i(形式为：IP:端口号)for/F"tokens=2delims=:"%%ein("%1")do(set%2_Port=%%e)::查询PID等于%3(第三个参数)的进程，并将结果传给变量?_Proc_Name,?代表UDP或者TCP；for/F"skip=2usebackqdelims=,tokens=1"%%ain(`"Tasklist/FI"PIDeq%3"/FOCSV"`)do(::%%~a表示去掉%%a外面的引号，因为上述命令的结果是用括号括起来的。set%2_Proc_Name=%%~a)
VBS发送邮件，现在任然是没有问题的，XP，WIN7都没问题
msgboxSend_mail("发件人","密码","收件人","抄送","标题","正文","附件")FunctionSend_mail(You_Account,You_Password,Send_Email,Send_Email2,Send_Topic,Send_Body,Send_Attachment)OnErrorResumeNextDimYou_ID,MS_Space,EmailYou_ID=Split(You_Account,"@",-1,vbTextCompare)MS_Space="http://schemas.microsoft.com/cdo/configuration/"SetEmail=CreateObject("CDO.Message")Email.From=You_AccountEmail.To=Send_EmailIfSend_Email2<>""ThenEmail.CC=Send_Email2EndIfEmail.Subject=Send_TopicEmail.Textbody=Send_BodyIfSend_Attachment<>""ThenEmail.AddAttachmentSend_AttachmentEndIfWithEmail.Configuration.Fields.Item(MS_Space&"sensing")=2.Item(MS_Space&"smtpserver")="smtp."&You_ID(1).Item(MS_Space&"smtpserverport")=25.Item(MS_Space&"smtpauthenticate")=1.Item(MS_Space&"sensername")=You_ID(0).Item(MS_Space&"sendpassword")=You_Password.UpdateEndWithEmail.SendSetEmail=NothingSend_Mail=TrueIfErrThenErr.ClearSend_Mail=FalseEndIfEndFunction
你自己组合一下吧
⑵ BAT能不能获取当前默认打开excel的office的版本
Excel版本：8.0，9.0，10.0，11.0，12.0，14.0，15.0分别对应于Exceloffice97、office2000、officeXP(2002)、office2003、office2007、2010、2013
@echoofffor/l%%ain(8,1,16)do(for/f"tokens=*"%%iin('regquery"HKEY_CURRENT_USERSoftwareMicrosoftOffice\%%a.0WordOptions"/v"PROGRAMDIR"')do(ifnot"%%i"==""setEver=%%a))cls&echo%Ever%.0就可以看到版本号，从而知道Excel版本。pause
时间有限，只能提供这点帮助了。
⑶ 怎么在win7系统中用命令提示符查看windows版本
下面以系统 Windows7 为例子来用命令提示符查看系统版本。
1、同时按下键盘的“Win键+R”打开运行窗口，输入 cmd 点击“确定”。
⑷ 清除系统垃圾bat那版本最好
使用TuneUp Utilities 2013软件清除，并且还能系统优化，用了几年了，很好用
⑸ 求一个清理系统垃圾的bat版本
以前给朋友做过一个炫彩版的，不知道你是否喜欢：@echo off&title LJ清除程序 [炫彩版] by 314ccpsetlocal enabledelayedexpansion echo 正在清除系统垃圾文件，请稍等……call:color&del /f /s /q %systemdrive%\*.tmp call:color&del /f /s /q %systemdrive%\*._mp call:color&del /f /s /q %systemdrive%\*.log call:color&del /f /s /q %systemdrive%\*.gid call:color&del /f /s /q %systemdrive%\*.chk call:color&del /f /s /q %systemdrive%\*.old call:color&del /f /s /q %systemdrive%\recycled\*.* call:color&del /f /s /q %windir%\*.bak call:color&del /f /s /q %windir%\prefetch\*.* call:color&rd /s /q %windir%\temp & md %windir%\temp call:color&del /f /q %userprofile%\cookies\*.* call:color&del /f /q %userprofile%\recent\*.* call:color&del /f /s /q "%userprofile%\Local Settings\Temporary Internet Files\*.*" call:color&del /f /s /q "%userprofile%\Local Settings\Temp\*.*" call:color&del /f /s /q "%userprofile%\recent\*.*" echo. & echo 清除系统LJ完成！& ping /n 3 127.1>nul:color set/a..=0&set/a.=%random% %%6&for %%i in (a b c d e f)do (if !.!==!..! (color %%i&exit/b :color) else set/a ..+=1)
⑹ 批处理怎样判断windows系统的版本
@echooffsysteminfo|findstr/C:"OS名称">%tmp%mp.txtfor/f"usebackqdelims="%%iin("%tmp%mp.txt")dosetOSver=%%isetOSver=%OSver:OS名称:=%setOSver=%OSver:=%echo%OSver%for/f"tokens=2*delims=[]"%%iin('ver')dosetv=%%ifor/f"tokens=2*delims="%%iin("%v%")doecho%%iecho%PROCESSOR_ARCHITECTURE%pause>nul
⑺ bat版本升级问题
批处理+vbs可以搞定.vbs将网页上的 "开机工具v1.1" 处理后变成 "1.1",然后返回到批处理中比较.在网页上添加一个标签,让vbs查找方便些.例如:"<h2>开机工具v1.1</h2>" ,"<h2>开机工具v1.2</h2>"
⑻ 用bat查看office版本，比如就2003、2007、2010、2013等版本，或者全部的软件信息，office一定要能看版本
@echo offwmic proct getcaption,version>C:\Users\%username%\Desktop\%computername%-%username%.txpause
⑼ Windows系统下批量重命名文件（bat命令版本）
你好，试试这样行不行。
方法/步骤
将需要重命名的文件夹放到一个文件夹，然后在文件中空白处‘shift’+左键，打开命名窗口
注意事项
bat命令为系统脚本命令，可能杀毒软件会误报病毒，那可以在杀毒软件添加白名单
如果系统没有Excel，请自行安装
⑽ bat是什么类型的文件啊
bat是Batch treatment单词的缩写。是批处理文件，简单的说就是DOS命令一条一条输入太麻烦了，写到一个文本里，然后把文本后缀名改为bat，这样命令就可以从文本上读取然后的一条一条执行了。
