[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文件操作] 批处理图书管理系统

我正在做一个图书管理系统,外壳已经做好了,请大家提提建议
  1. @echo off&setlocal enabledelayedexpansion
  2. if exist 书库\ goto start
  3. md 书库
  4. attrib 书库 +s +h
  5. echo [.ShellClassInfo]>书库\desktop.ini
  6. echo CLSID={21EC2020-3AEA-1069-A2DD-08002B30309D}>>书库\desktop.ini
  7. attrib 书库\desktop.ini +s +h +r
  8. :once
  9. mode con: cols=30 lines=4
  10. echo.
  11. goto pwd
  12. :pwd0
  13. cls
  14. echo.
  15. echo    两次输入密码不一致,请重新输入
  16. echo.
  17. :pwd
  18. set /p pwd=   请设置密码:
  19. if '%pwd%'=='' goto pwd
  20. set /p pwd0=   请再输一次:
  21. if not '%pwd%'=='%pwd0%' goto pwd0
  22. echo %pwd%>书库\pwd.lnk
  23. attrib 书库\pwd.lnk +s +h
  24. echo.
  25. echo 密码设置成功
  26. ping 127.1 -n 3 >nul 2>nul
  27. goto menu
  28. :start
  29. mode con: cols=30 lines=4
  30. if not exist 书库\pwd.lnk goto once
  31. for /f "tokens=*" %%a in (书库\pwd.lnk) do set mima=%%a
  32. :kaishi
  33. echo.
  34. set pass=
  35. set /p pass=    请输入进入密码:
  36. :kaishihou
  37. if '%pass%'=='' goto kaishi
  38. if '%pass%'=='%mima%' goto menu
  39. cls
  40. echo.
  41. echo 对不起,密码错误!请重新输入!
  42. goto kaishi
  43. :menu
  44. cls
  45. mode con lines=25 cols=30
  46. set tit=图书管理系统
  47. title %tit%——主页
  48. echo.
  49. echo.
  50. echo         %tit%
  51. echo.
  52. echo           1、借书
  53. echo.
  54. echo           2、还书
  55. echo.
  56. echo         3、增加新书
  57. echo.
  58. echo         4、增加用户
  59. echo.
  60. echo         5、查看用户
  61. echo.
  62. echo         6、查看图书
  63. echo.
  64. echo           7、退出
  65. echo.
  66. set input=
  67. set /p input=      请输入代号[1~7]:
  68. if '%input%'=='' goto menu
  69. if '%input%'=='1' goto js
  70. if '%input%'=='2' goto hs
  71. if '%input%'=='3' goto zj
  72. if '%input%'=='4' goto yh
  73. if '%input%'=='5' goto ck
  74. if '%input%'=='6' goto ts
  75. if '%input%'=='7' exit
  76. :js
  77. cls
  78. mode con lines=20 cols=30
  79. title %tit%——借书
  80. goto menu
  81. :hs
  82. mode con lines=20 cols=30
  83. title %tit%——还书
  84. goto menu
  85. :zj
  86. mode con lines=20 cols=30
  87. title %tit%——增加新书
  88. goto menu
  89. :yh
  90. mode con lines=20 cols=30
  91. title %tit%——增加用户
  92. goto menu
  93. :ck
  94. mode con lines=20 cols=30
  95. title %tit%——查看用户
  96. goto menu
  97. :ts
  98. mode con lines=20 cols=30
  99. title %tit%——查看图书
  100. goto menu
复制代码
最爱%0|%0

记得以前看C语言书的时候后面有这样一道题目

TOP

回复 2# bailong360


    现在我想用纯批做一个图书管理系统,因为我不会C语言
最爱%0|%0

TOP

返回列表