源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

批处理实现网吧存档

  • 时间:2022-11-02 17:05 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:批处理实现网吧存档
批处理实现网吧存档
[u]复制代码[/u] 代码如下:
@echo off color 0a cls set 路径=\\game\上传$ echo.正在检测是否连上保存区... @net use J: "%路径%" if exist J:\ goto nno echo 末连接上保存区,请与网管联系. pause>nul exit :nno @net use /del J: >nul :koko cls echo 请输入你的账号后回车!如果你没有账号请您在下面新建一个后按回车键,帐号建好后请您牢记。以便您下次登陆使用。 echo --------------------------------------------------- set/p 用户名=用户名: echo --------------------------------------------------- if %用户名% geq 1 goto start echo MSGBox "用户名不能为特殊符号,请重新输入!",48,"错误提示:" >nos.vbs &&call nos.vbs &&del nos.vbs &&goto koko :start set 用户名|findstr "\<%search%\>" >nul set search=%用户% >nul echo 正在验证用户『%用户名%』 echo 请稍候........ if exist %路径%\%用户名% goto pass >nul if not exist %路径%\%用户名% goto md >nul :pass rem 密码验证 set errorlevel=>nul echo → 『%用户名%』这个用户已经存在,请输入您的密码: echo --------------------------------------------------- set/p 密码=密码: if %密码% geq 1 goto yes echo MSGBox "不能用特殊符号,请重新输入!",48,"温馨提示:" >nos.vbs &&call nos.vbs &&del nos.vbs &&call %0 :yes set 密码|findstr "\<%pass%\>" >nul set pass=%密码% >nul if errorlevel=1 cls &&echo MSGBox "密码不能为空哦,请重新输入吧!!^_^",48,"温馨提示:" >kong.vbs &&call kong.vbs  &&del kong.vbs &&call %0 if exist %路径%\%用户名%\pass\%密码% goto login >nul if not exist %路径%\%用户名%\pass\%密码% echo  MSGBox "你输入的密码错咯!请重新输入吧!!",48,"温馨提示:" >run.vbs &&call run.vbs  &&del run.vbs &&call %0 :login echo MSGBox "恭喜~!密码验证成功!欢迎您的登录! **请不要上传木马病毒哦 谢谢您的合作!***^_^",48,"温馨提示:" >ys.vbs &&call ys >nul &&del ys.vbs cls echo 请稍侯....... echo 正在为你打开【保存区】 NET USE u: /DELETE /YES >nul net use u: %路径%\%用户名% /YES >nul @explorer.exe u:\ exit :md echo     用户名不存在,是否创建新用户? echo. echo   A: 创建新用户         B: 重新输入 echo. set /p tw= >nul if "%tw%"=="a" goto yesok if "%tw%"=="A" goto yesok if "%tw%"=="b" goto koko if "%tw%"=="B" goto koko :yesok set errorlevel=>nul echo 请为你的新用户设置一个密码: echo --------------------------------------------------- echo. set/p 密码=密     码: if %密码% geq 1 goto oks echo MSGBox "不能用特殊符号,请重新输入!",48,"温馨提示:" >run.vbs &&call run.vbs  &&del run.vbs &&goto yesok :okss set /p 密码0=请再次输入: if "%密码0%"=="%密码%" goto okss echo MSGBox "您的两次密码不同,请重新输入!",48,"错误提示:">no.vbs &&call no.vbs  &&del no.vbs &&goto yesok goto :yesok :okss set 密码|findstr "\<%pass%\>" >nul set pass=%密码% >nul if errorlevel=1 cls &&echo  MSGBox " 密码不能为空哦,请重新输入吧!!^_^",48,"温馨提示:" >run.vbs &&call run.vbs &&del run.vbs &&call %0 md %路径%\%用户名% >nul md %路径%\%用户名%\pass attrib +h +s %路径%\%用户名%\pass attrib +h +s %路径%\%用户名% md %路径%\%用户名%\pass\%密码% echo MSGBox "恭喜~!你已成为本网吧【保存区】的新用户,赶快把你的资料放进去吧!~*_^",48,"温馨提示:"  >run.vbs &&call run.vbs &&del run.vbs >nul cls echo 请稍侯....... echo 正在为你打开【保存区】 NET USE u: /DELETE /YES >nul net use u: %路径%\%用户名% /YES >nul @explorer.exe u:\ exit
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部