批处理实例.docVIP

批处理实例 批处理实例，bat文档 以下每一段针对某个内容进行实例运行，强大，丰富的例子让你快速掌握各种bat使用方法 赶快用来向朋友炫一炫吧 ::转义字符使用 ^ 例如 ^ ^ ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ bat调用vbs，vbs计算时间 ::══代══码══开══始═══ @echo off mshta vbscript:msgbox(今天已经是第^datediff(d,2010-08-20,date)^天,^datediff(ww,2010-08-20,date)^周,^datediff(m,2010-08-20,date)^个月了,0,提示)(window.close) mshta vbscript:msgbox(今天是^datepart(yyyy,now)^年中的第^datepart(y,now)^日!第^datepart(ww,now)^周!第^datepart(q,now)^季,0,提示)(window.close) ::══代══码══结══束═══ ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ 运行得到Ctrl+V剪贴板内容 1.bat echo mshta vbscript:clipboarddata.setdata(text,你好)(close) 2.bat echo mshta vbscript:clipboarddata.setdata(text,欢迎光临)(close) 3.bat echo mshta vbscript:clipboarddata.setdata(text,再见)(close) ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ 运行得到Ctrl+V剪贴板内容 vbs: Set ws = wscript.createobject(wscript.shell) ws.run mshta vbscript:clipboardData.SetData(++text++,++这段文字复制到剪贴板++)(close),0,true bat: mshta vbscript:clipboarddata.setdata(text,这段文字会复制到右键剪贴板)(close) ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ bat内获得vbs参数，用vbs方法取得7天前日期 @echo off @echo on error resume nextmsg.vbs @echo set ws=createobject(wscript.shell)msg.vbs @echo dim blnmsmsg.vbs ::@echo blnms=datediff(d,2010-08-20,date)msg.vbs @echo blnms=dateadd(d,-7,date)msg.vbs @echo wscript.echo blnmsmsg.vbs for /f skip=2 tokens=1,2,3 delims=- %%i in (cscript msg.vbs) do ( set /a isms=%%i*10000+%%j*100+%%k ) echo %isms% del /q msg.vbs pause ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ 新建xxx.bat设定定时计划，运行一次后可以删除，代码如下： 【第三行D:\WorkTemp\1.bat就是你要定时执行的bat】 sc config Task Scheduler start= auto sc start Task Scheduler AT 23:59 /interactive /every:M,T,W,Th,F,S,Su start D:\WorkTemp\1.bat 你的bat代码修改如下 @echo off setlocal enabledelayedexpansion for /f delims= %%i in (dir /a-d-h /b) do ( set folder=%%~ti set folder=!folder:-=! set folder=!folder:~0,8! md !folder! 3nul move %%i !folder