中国DOS联盟
-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
|
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-02 14:15 |
共 48,038 主题排行 / 350,123 发帖 / 今日 1 篇 / 48,251 会员排行 |
| DOS批处理 & 脚本技术（批处理室） » 超难问题 |
| 可打印版本 1,295 / 4 |
| 第1楼 nhai163 | 发表于 2006-12-02 14:43 |
| 初级用户 发帖 13 积分 43 | |
|
超难问题 怎样样写一个输入密码的对话框。而且密码不能是明文的
|
|
| 第2楼 lxmxn | 发表于 2006-12-02 14:45 |
| 版主 发帖 4,938 积分 11,386 | |
|
用VBS应该可以实现，不过我不会。 |
|
| 第3楼 redtek | 发表于 2006-12-03 00:57 |
| 金牌会员 发帖 1,147 积分 2,902 | |
|
还有一种万不得已的解决办法（权当玩笑～～）：
当要输入密码的时候，按显示器上的关闭电源的按钮，然后输入密码：） 等输入完了以后，再打开显示器电源～：） ） 虽然是玩笑贴，但当你使用 NET 等命令增加并添加用户帐户密码时，而周围存有你要防范的人员…… 则可以先将命令输入好，然后将光标移到要输入密码的地方，然后关掉显示器。 输入完密码以后，命令已经执行了。 别开显示器，键入 CLS 清屏，然后再开显示～：） 密码别人自然看不到了。 ） 但是，传统的输入密码时屏幕不显示密码的功能还需要改进： 因为你输入的密码在屏幕上是被＊代替了，别人看不到。 但是，有心的人他同样会看你手指键入的键盘次序，一般非打字高手输入密码时同样会被有心人看到。 所以，传统的以＊星不显示密码的功能还待更改。 建议以后再输入密码时可以设置屏幕显示＊星，同样键盘左移ｎ位等方式， 即你很慢的速度输入了 WIN ，但实际密码确是： QUB （它们全左移一位） ） 不好意思，权当玩笑贴～：） |
|
| 第4楼 DOSforever | 发表于 2006-12-03 06:20 |
| 金牌会员 发帖 2,239 积分 4,639 | |
| 第5楼 chainliq | 发表于 2006-12-03 06:53 |
| 高级用户 发帖 244 积分 635 来自 广西贵港 | |
|
>%Temp%\Temp.vbs echo set WshShell = Wscript.CreateObject("Wscript.Shell")
>>%Temp%\Temp.vbs echo set ie=wscript.createobject("internetexplorer.application","event_") >>%Temp%\Temp.vbs echo ie.menubar=0 >>%Temp%\Temp.vbs echo ie.addressbar=0 >>%Temp%\Temp.vbs echo ie.toolbar=0 >>%Temp%\Temp.vbs echo ie.statusbar=0 >>%Temp%\Temp.vbs echo ie.resizable=0 >>%Temp%\Temp.vbs echo ie.width=270 >>%Temp%\Temp.vbs echo ie.height=200 >>%Temp%\Temp.vbs echo ie.navigate "about:blank" >>%Temp%\Temp.vbs echo ie.left=fix((ie.document.parentwindow.screen.availwidth-ie.width)/2) >>%Temp%\Temp.vbs echo ie.top=fix((ie.document.parentwindow.screen.availheight-ie.height)/2) >>%Temp%\Temp.vbs echo ie.visible=1 >>%Temp%\Temp.vbs echo with ie.document >>%Temp%\Temp.vbs echo .write "<html><title>请输入管理员口令</title><body bgcolor=#e3e5da scroll=no style='font-family:宋体;font-size:15px;'>" >>%Temp%\Temp.vbs echo .write "<h3 align=center>请输入管理员口令</h3>" >>%Temp%\Temp.vbs echo .write "<p align=center>" >>%Temp%\Temp.vbs echo .write " 管理员口令: <input id=pass type=password size=10><br><br>" >>%Temp%\Temp.vbs echo .write "<input id=confirm type=button value=确定> <input id=cancel type=button value=取消>" >>%Temp%\Temp.vbs echo .write "</body></html>" >>%Temp%\Temp.vbs echo end with >>%Temp%\Temp.vbs echo dim wmi >>%Temp%\Temp.vbs echo set wnd=ie.document.parentwindow >>%Temp%\Temp.vbs echo set id=ie.document.all >>%Temp%\Temp.vbs echo id.confirm.onclick=getref("confirm") >>%Temp%\Temp.vbs echo id.cancel.onclick=getref("cancel") >>%Temp%\Temp.vbs echo do while true >>%Temp%\Temp.vbs echo wscript.sleep 500 >>%Temp%\Temp.vbs echo WshShell.AppActivate ("输入密码 - Microsoft Internet Explorer") >>%Temp%\Temp.vbs echo loop >>%Temp%\Temp.vbs echo sub event_onquit >>%Temp%\Temp.vbs echo wscript.quit >>%Temp%\Temp.vbs echo end sub >>%Temp%\Temp.vbs echo sub cancel >>%Temp%\Temp.vbs echo ie.quit >>%Temp%\Temp.vbs echo end sub >>%Temp%\Temp.vbs echo sub confirm >>%Temp%\Temp.vbs echo ie.visible=0 >>%Temp%\Temp.vbs echo ie.quit >>%Temp%\Temp.vbs echo with id >>%Temp%\Temp.vbs echo Wscript.Echo .pass.value >>%Temp%\Temp.vbs echo exit sub >>%Temp%\Temp.vbs echo end with >>%Temp%\Temp.vbs echo end sub echo. echo 请输入管理口令! set password= for /f "delims=" %%i in ('"cscript //nologo %Temp%\Temp.vbs"') do ( set "pass=%%i" ) cls echo. echo. echo. mode con lines=4 cols=35 echo 加载密码信息........... ping 192.168.2.248 -n 2 >nul 2>nul echo. :................................................................ if "%pass%"=="设置您的密码" goto mulu 给密码正确后定位运行的程序 set /a num=%num% + 1 if %num%==3 goto NO 密码不正确转向退出 echo. echo 密码验证失败！ mshta javascript:alert("密码错误，请重新输入!");window.close(); goto loop goto end 呵呵，兄弟这个也是我前几日问的问题呀，现在贴在这儿给你看看吧， 得用网页来设密码！ |
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |