
批處理圖書管理系統(tǒng)我正在做一個(gè)圖書管理系統(tǒng),外殼已經(jīng)做好了,請(qǐng)大家提提建議
nclick="copycode($('code0'));">復(fù)制代碼
- @echo off&setlocal enabledelayedexpansion
- if exist 書庫 goto start
- md 書庫
- attrib 書庫 +s +h
- echo [.ShellClassInfo]>書庫desktop.ini
- echo CLSID={21EC-3AEA-1069-A2DD-08002B30309D}>>書庫desktop.ini
- attrib 書庫desktop.ini +s +h +r
- :once
- mode con: cols=30 lines=4
- echo.
- goto pwd
- :pwd0
- cls
- echo.
- echo兩次輸入密碼不一致,請(qǐng)重新輸入
- echo.
- :pwd
- set /p pwd= 請(qǐng)?jiān)O(shè)置密碼:
- if '%pwd%'=='' goto pwd
- set /p pwd0= 請(qǐng)?jiān)佥斠淮危?li>if not '%pwd%'=='%pwd0%' goto pwd0
- echo %pwd%>書庫pwd.lnk
- attrib 書庫pwd.lnk +s +h
- echo.
- echo 密碼設(shè)置成功
- ping 127.1 -n 3 >nul 2>nul
- goto menu
- :start
- mode con: cols=30 lines=4
- if not exist 書庫pwd.lnk goto once
- for /f tokens=* %%a in (書庫pwd.lnk) do set mima=%%a
- :kaishi
- echo.
- set pass=
- set /p pass=請(qǐng)輸入進(jìn)入密碼:
- :kaishihou
- if '%pass%'=='' goto kaishi
- if '%pass%'=='%mima%' goto menu
- cls
- echo.
- echo 對(duì)不起,密碼錯(cuò)誤!請(qǐng)重新輸入!
- goto kaishi
- :menu
- cls
- mode con lines=25 cols=30
- set tit=圖書管理系統(tǒng)
- title %tit%——主頁
- echo.
- echo.
- echo %tit%
- echo.
- echo 1、借書
- echo.
- echo 2、還書
- echo.
- echo 3、增加新書
- echo.
- echo 4、增加用戶
- echo.
- echo 5、查看用戶
- echo.
- echo 6、查看圖書
- echo.
- echo 7、退出
- echo.
- set input=
- set /p input=請(qǐng)輸入代號(hào)[1~7]:
- if '%input%'=='' goto menu
- if '%input%'=='1' goto js
- if '%input%'=='2' goto hs
- if '%input%'=='3' goto zj
- if '%input%'=='4' goto yh
- if '%input%'=='5' goto ck
- if '%input%'=='6' goto ts
- if '%input%'=='7' exit
- :js
- cls
- mode con lines=20 cols=30
- title %tit%——借書
- goto menu
- :hs
- mode con lines=20 cols=30
- title %tit%——還書
- goto menu
- :zj
- mode con lines=20 cols=30
- title %tit%——增加新書
- goto menu
- :yh
- mode con lines=20 cols=30
- title %tit%——增加用戶
- goto menu
- :ck
- mode con lines=20 cols=30
- title %tit%——查看用戶
- goto menu
- :ts
- mode con lines=20 cols=30
- title %tit%——查看圖書
- goto menu

