Question

能用批处理模拟登陆吗？高手请进！

以前用了会VB，死360老报毒，这程序是要给别人用的，总不能让别人以为是木马啊……所以只好问问批处理可不可行了……
能否弄这么个批处理，模拟登陆（不联网）：
打开后提示“请输入用户名:”输入完确定，再提示“请输入密码:”输入完确定，如果跟预设内容一样进行下一步，否则提示“用户名或密码输入错误!”并回到刚开始的提示内容。
1.用户名可以输入大小写字母，不能打数字；密码有字母和数字。密码显示为*，且预设的用户名和密码组合有好几个（比如用户名111密码222、用户名333密码444），区分大小写。
2.标题显示“模拟登陆器”。
如果能用的话，我追加50分……谢谢各位批处理高手帮忙了……

Answer 1

密码显示为*做不到。除非用第三方或者仅仅显示黑色背景（实际上输入了密码）

追问

这个还不算太重要。那么别的如何实现？

追答

不重要就行。其他的好办。

追问

能否给一下代码？用户名和密码那里不会弄……

追答

@echo off & title 模拟登陆器 & setlocal enabledelayedexpansion
:start
setlocal & cls
set /a num=1,_num=1
set "arruser=admin 123 456 789"
set "arrpass=admin 321 654 987"
rem 帐号数组和密码数组，第一个账号对应第一个密码，以此类推。
set /p username=请输入用户名:
set /p password=请输入密码:
if not defined username call :error
if not defined password call :error
call :checkuser
for %%i in (%arrpass%) do (
if !_num! equ !num! (if "%%i"=="%password%" (echo 密码正确^^!) else (call :error))
set /a _num+=1
)
pause & exit

:checkuser
for %%i in (%arruser%) do if /i not "%%i"=="!username!" (set /a num+=1) else (goto :eof)
call :error
goto :eof

:error
echo 用户名不存在或密码错误密码错误^^! & pause>nul & endlocal & goto start
goto :eof

追问

恕我再问几个问题。
1.“goto :eof”指向哪里？是接下来的内容吗？“登陆”成功后转到ABC就把eof改成ABC？
2.用户名最好要设置只能打出大小写字母，这个怎么解决？

追答

@echo off & title 模拟登陆器 & setlocal enabledelayedexpansion
:start
setlocal & cls
set /a num=1,_num=1
set "arruser=admin 123 456 789"
set "arrpass=admin 321 654 987"
rem 帐号数组和密码数组，第一个账号对应第一个密码，以此类推。
set /p username=请输入用户名:
set /p password=请输入密码:
if not defined username call :error
if not defined password call :error
call :checkuser
for %%i in (%arrpass%) do (
if !_num! equ !num! (if "%%i"=="%password%" (echo 密码正确^^!) else (call :error))
set /a _num+=1
)
pause & exit

:checkuser
for %%i in (%arruser%) do if not "%%i"=="!username!" (set /a num+=1) else (goto :eof)
rem 注意这里的if没有/i
call :error
goto :eof

:error
echo 用户名不存在或密码错误密码错误^^! & pause>nul & endlocal & goto start
goto :eof
rem 这个去掉也成，就是一个习惯罢了。