|
|
楼主 |
发表于 2012-10-25 02:21:55
|
显示全部楼层
回复 4# andyrave
不是我挑剔啊,对VBS确实不懂。你的a.vbs代码怎么写?
我的原来的完整代码如下:- @echo off
- if "%1"=="h" goto begin
- start mshta vbscript:createobject("wscript.shell").run("""%~nx0"" h",0)(window.close)&&exit
- :begin
- for %%a in (c: d: e: f: g:) do for /f "delims=" %%b in ('dir /a/s/b "%%a\TTPlayer.exe" 2^>nul') do start %%~sb
- echo wscript.sleep 2500>C:\Sleep.Vbs
- start /wait C:\Sleep.Vbs
- mshta vbscript:CreateObject("Wscript.Shell").popup("现在时间是:08:44 请准备对时间",30,"提示",vbOKOnly)(window.close)
- TASKKILL /F /IM mshta.exe & TASKKILL /IM TTPlayer.exe
- del C:\Sleep.Vbs
- exit
复制代码 请详细说明,谢谢。 |
|