
CODE: [Copy to clipboard]VBS脚本:MakeBar.vbs@echo off
MakeBar.vbs %1 %2
set /p v=<pb.dat
del pb.dat
cls
@echo %v%
CODE: [Copy to clipboard]测试文件:Test.batSet a = WScript.Arguments
dim str
str = string(cint(a(0)),a(1))
createobject("scripting.filesystemobject").createtextfile("pb.dat").write(str)
CODE: [Copy to clipboard]@echo off
for /l %%v in (0,1,20) do @call ProcessBar.bat %%v "■"
pause
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |