国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > BAT > 正文

批處理實現網吧存檔

2020-03-29 20:29:33
字體:
來源:轉載
供稿:網友

批處理實現網吧存檔

 

復制代碼 代碼如下:

@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

 

 
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 华阴市| 巩留县| 霍山县| 通山县| 韶山市| 军事| 阳新县| 壶关县| 抚州市| 兴隆县| 合肥市| 新野县| 全州县| 德格县| 绥阳县| 中方县| 宣威市| 米泉市| 文水县| 柳林县| 佛冈县| 镇赉县| 垫江县| 扎兰屯市| 普格县| 怀柔区| 龙南县| 惠州市| 镇雄县| 棋牌| 茌平县| 灵川县| 新平| 玉溪市| 光泽县| 合水县| 芦溪县| 买车| 房产| 祁东县| 宝兴县|