[其他] 怎么用bat模拟登陆注册用户

ANSL

登录时需要填写用户名和密码一共有三次机会用完了就退出，内置一个管理员用户可以添加或删除用户，更改用户密码什么的管理员也要有密码密码可以自己设置
每回进来都得输入用户名和密码登录
最多支持1000用户
2个管理员
20个来宾
用户等级:
管理员(最高权限)
用户(常规操作）
来宾（没有密码，权限最低）
求哪位大佬能实现以上功能！（我感觉这东西不可能实现）
实在不行用第三方也可以！

Batcher

回复 1# ANSL


    登录什么东西？某个网站？某个应用？

ANSL

回复 2# Batcher
查看1.txt里的文档访客只能看到第一行(bat内)管理员可以删除编辑和修改1.txt(在bat内)
用户可以全部查看1.txt的内容(仅查看)(在bat内)

Zhou.

回复 3# ANSL


    可以是可以实现，就是比较烦

ANSL

回复 4# Zhou.

可以试试
登录时输入用户名和密码
自动判断是什么用户等级

Zhou.

回复 5# ANSL


    我试试

Zhou.

回复 5# ANSL

你如果想要的话，我继续开发管理用户模块
另存为ANSI编码

@echo off
title 模拟用户登录
echo 加载...
if not exist "Data" goto ce
set ci=100
cls
:back
title 登入
cls
:backcls
echo 登入
echo 输入用户名
echo 默认管理员为Admin
set /p name=
if "%name%"=="" goto back
cls
set ci=99
:fanc
cls
echo 读取中...%ci%/1100
set /a ci=%ci%+1
for /f "delims=" %%i in (Data\user%ci%) do set names=%%i
for /f "delims=" %%i in (Data\%names%\usercontrol) do set control=%%i
set cuo=100
if "%name%"=="%names%" goto next
cls
if "%ci%"=="1100" echo 查无此人 & goto backcls
goto fanc
:next
for /f "delims=" %%i in (Data\%names%\password) do set namespassword=%%i
cls
if "%control%"=="Admin" echo 管理员%names%，您好！
if "%control%"=="User" echo 用户%names%，您好！
if "%control%"=="Guide" echo 来宾%names%，您好！
if "%cuo%"=="103" exit
echo 密码：
echo 默认管理员密码password
set /p password=
if "%password%"=="%namespassword%" goto start
set /a cuo=%cuo%+1
goto next
:start
title 主界面
cls
echo 主界面
echo 1. 1.txt
echo 2.管理用户
echo 3.重置
set /p choose=
goto jianquan

:jianquan
cls
if "%choose%"=="1" goto c
if "%choose%"=="2" goto start
if "%choose%"=="3" goto r
goto start

:r
if not "%control%"=="Admin" goto start
cls
echo 确定吗？
echo 任意键重置.
pause
rd /s /q Data
exit


:c
cls
if "%control%"=="Admin" start Data\1.txt
if "%control%"=="User" copy Data\1.txt Data\cache.txt
if "%control%"=="User" echo 你输入的更改将不会保存。>Data\cache.txt
if "%control%"=="User" start Data\cache.txt
if "%control%"=="Guide" for /f "delims=" %%i in (Data\1.txt) do set nc=%%i
cls
if "%control%"=="Guide" echo %nc%
pause
del /s /q Data\cache.txt
goto start

:ce
cls
md Data
md Data\Admin
echo Admin>Data\user100
echo Admin>Data\Admin\usercontrol
echo ---->Data\1.txt
echo password>Data\Admin\password
goto back
复制代码

ANSL

回复 7# Zhou.
可以，继续开发吧！
谢谢大神！
还有一个Bug查询用户的时候不能看见进度但是源码里有进度代码呀？
Bug如下：

Zhou.

回复 8# ANSL


    好的我看看 bug已修复 把26行的 cls 删除

ANSL

回复 9# Zhou.
还是不行啊,但是能看见一点进度就来回在清屏

Zhou.

回复 10# ANSL


    好的我知道了 下个版本修复

Zhou.

回复 10# ANSL

新增了创建用户
下个版本新增更改用户名

@echo off
title 模拟用户登录
echo 加载...
if not exist "Data" goto ce
set ci=100
cls
:back
title 登入
cls
:backcls
echo 登入
echo 输入用户名
set /p name=
if "%name%"=="" goto back
cls
findstr "%name%" Data\User.ini
if %errorlevel% equ 0 goto fanc
goto back
:fanc
set cuo=100
set namespassword=no
:next
for /f "delims=" %%i in (Data\User%name%Control.ini) do set control=%%i
if "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\User%name%Password.ini) do set namespassword=%%i
if "%cuo%"=="103" goto er
cls
echo 密码：
set /p password=
if "%namespassword%"=="" goto er
if "%password%"=="%namespassword%" goto start
set /a cuo=%cuo%+1
goto next
:er
cls
echo 用户名或密码错误。
pause
exit
:start
title 主界面
cls
echo 主界面
echo 1. 1.txt
echo 2.管理用户（目前只支持创建）
echo 3.重置
echo 4.新增功能与已知问题
echo v.0.2 模拟登录注册用户
set /p choose=
goto jianquan

:jianquan
cls
if "%choose%"=="1" goto c
if "%choose%"=="2" goto cuser
if "%choose%"=="3" goto r
if "%choose%"=="4" goto q
goto start

:q
title 新增功能与已知问题
cls
echo ----------2022/04/15----------v.0.1
echo 基本服务。
echo ----------2022/04/16----------v.0.2
echo 重构用户存储方式。
echo 支持创建用户。
echo bug修复
echo ------------------------------
pause
goto start

:r
if not "%control%"=="Admin" goto start
cls
echo 确定吗？
echo 任意键重置.
pause
rd /s /q Data
exit

:c
cls
if "%control%"=="Admin" start Data\1.txt
if "%control%"=="User" copy Data\1.txt Data\cache.txt
if "%control%"=="User" echo 你输入的更改将不会保存。>>Data\cache.txt
if "%control%"=="User" start Data\cache.txt
if not "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\1.txt) do set text=%%i
cls
echo %text%
pause
del /s /q Data\cache.txt
goto start

:ce
cls
md Data
echo Admin>Data\User.ini
echo Admin>Data\UserAdminControl.ini
echo ---->Data\1.txt
echo password>Data\UserAdminPassword.ini
cls
echo 默认管理员为Admin
echo 密码password
echo 任意键代表您已经阅读密码。
pause>nul
goto back

:cuser
title 创建用户
if not "%control%"=="Admin" goto start
cls
echo 创建用户
echo 权限：
echo 1.管理员
echo 2.用户
echo 3.来宾
set /p num=
if "%num%"=="1" set qx=管理员
if "%num%"=="1" goto cusers
if "%num%"=="2" set qx=用户
if "%num%"=="2" goto cusers
if "%num%"=="3" set qx=来宾
if "%num%"=="3" goto cusers
goto cuser
:cusers
cls
echo 创建一个%qx%用户
echo 用户名：
set /p o=
if "%o%"=="" goto cusers
echo %o%>>Data\User.ini
if "%qx%"=="管理员" echo Admin>Data\User%o%Control.ini
if "%qx%"=="用户" echo User>Data\User%o%Control.ini
if "%qx%"=="来宾" echo Guide>Data\User%o%Control.ini & goto cuserw
:cuserp
cls
echo 创建%o%用户的密码
set /p pass=
if "%pass%"=="" goto cuserp
echo %pass%>Data\User%o%Password.ini
:cuserw
cls
echo 恭喜！
echo 用户创建已完成。
echo 重新启动以应用。
pause
exit
复制代码

Zhou.

最近在学C++ 可能更新比较慢
上个版本的文件可以直接使用

@echo off
title 模拟用户登录
echo 加载...
if not exist "Data" goto ce
set ci=100
cls
:back
title 登入
cls
:backcls
echo 登入
echo 输入用户名
set /p name=
if "%name%"=="" goto back
cls
findstr "%name%" Data\s.ini
if not %errorlevel% equ 0 goto fanc
findstr "%name%" Data\User.ini
if %errorlevel% equ 0 goto fanc
goto back
:fanc
set cuo=100
set namespassword=no
:next
for /f "delims=" %%i in (Data\User%name%Control.ini) do set control=%%i
if "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\User%name%Password.ini) do set namespassword=%%i
if "%cuo%"=="103" goto er
cls
echo 密码：
set /p password=
if "%namespassword%"=="" goto er
if "%password%"=="%namespassword%" goto start
set /a cuo=%cuo%+1
goto next
:er
cls
echo 用户名或密码错误。
pause
exit
:start
title 主界面
cls
echo 模拟登录注册用户
echo 1. 1.txt
echo 2.管理用户（目前只支持创建）
echo 3.重置
echo 4.新增功能与已知问题
echo 5.删除用户
echo v.0.3 模拟登录注册用户
set /p choose=
goto jianquan

:jianquan
cls
if "%choose%"=="1" goto c
if "%choose%"=="2" goto cuser
if "%choose%"=="3" goto r
if "%choose%"=="4" goto q
if "%choose%"=="5" goto scuser
goto start

:scuser
if not "%control%"=="Admin" goto start
cls
echo 删除用户Preview
echo 你要删除什么用户？
echo tips:删除的用户信息会保留
echo 且长时间内可再次登录
set /p suser=
if "%suser%"=="" goto start
echo %suser%>>Data\s.ini
goto cuserw

:q
title 新增功能与已知问题
cls
echo ----------2022/04/15----------v.0.1
echo 基本服务。
echo ----------2022/04/16----------v.0.2
echo 重构用户存储方式。
echo 支持创建用户。
echo bug修复
echo ----------2022/04/18----------v.0.3
echo 支持删除用户
echo ------预计：2022/04/20-------v.0.4
echo 
pause
goto start

:r
if not "%control%"=="Admin" goto start
cls
echo 确定吗？
echo 任意键重置.
pause
rd /s /q Data
exit

:c
cls
if "%control%"=="Admin" start Data\1.txt
if "%control%"=="User" copy Data\1.txt Data\cache.txt
if "%control%"=="User" echo 你输入的更改将不会保存。>>Data\cache.txt
if "%control%"=="User" start Data\cache.txt
if not "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\1.txt) do set text=%%i
cls
echo %text%
pause
del /s /q Data\cache.txt
goto start

:ce
cls
md Data
echo Admin>Data\User.ini
echo Admin>Data\UserAdminControl.ini
echo ---->Data\1.txt
echo password>Data\UserAdminPassword.ini
cls
echo 默认管理员为Admin
echo 密码password
echo 任意键代表您已经阅读密码。
pause>nul
goto back

:cuser
title 创建用户
if not "%control%"=="Admin" goto start
cls
echo 创建用户
echo 权限：
echo 1.管理员
echo 2.用户
echo 3.来宾
set /p num=
if "%num%"=="1" set qx=管理员
if "%num%"=="1" goto cusers
if "%num%"=="2" set qx=用户
if "%num%"=="2" goto cusers
if "%num%"=="3" set qx=来宾
if "%num%"=="3" goto cusers
goto cuser
:cusers
cls
echo 创建一个%qx%用户
echo 用户名：
set /p o=
if "%o%"=="" goto cusers
echo %o%>>Data\User.ini
if "%qx%"=="管理员" echo Admin>Data\User%o%Control.ini
if "%qx%"=="用户" echo User>Data\User%o%Control.ini
if "%qx%"=="来宾" echo Guide>Data\User%o%Control.ini & goto cuserw
:cuserp
cls
echo 创建%o%用户的密码
set /p pass=
if "%pass%"=="" goto cuserp
echo %pass%>Data\User%o%Password.ini
:cuserw
cls
echo 恭喜！
echo 用户操作已完成。
echo 重新启动以应用。
pause
exit
复制代码

Zhou.

回复 13# Zhou.


    我差点把echo 写成 cout << "用户创建已完成" << endl; 了

ANSL

回复 14# Zhou.还有下个版本吗？