
CODE: [Copy to clipboard]windows xp pro sp2 下测试成功,可以修改如果运行错误可修改@echo off
set tmpfile=tmp%random%.vbs
echo 请输入密码:
echo Set pw = CreateObject("Microsoft.CmdLib") >>%tmpfile%
echo ps = pw.GetPassword >>%tmpfile%
echo wscript.stdout.write ps >>%tmpfile%
for /f %%i in ('cscript //b %tmpfile%') do @set psw=%%i >nul
msg * "你输入的密码为:%psw%"
del %tmpfile%
CODE: [Copy to clipboard]将默认解释器设置为命令行模式,则在win中双击内容如下的.vbs文件即可。cscript //H: cscript
CODE: [Copy to clipboard]输出信息改为命令行方式,以保持界面的一致,但不知如何实现输出暂停,只好再次使用输入密码命令。还望指教!Set pw = CreateObject("Microsoft.CmdLib")
wscript.stdout.write "请输入密码:"+vbNewLine
ps = pw.GetPassword
wscript.stdout.write "您输入的密码是:"+ps+vbNewLine
wscript.stdout.write "回车退出。"+vbNewLine
ps = pw.GetPassword
| Quote: | |
|
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |