扔一个20几年前( 网吧存档.BAT )代码

jiavip

如题----20几年前的前辈写的原代码,未做任何修改----扔码------------

1. @echo off
   
2. color 80
   
3. cls
   
4. set 路径=\\server\DJ
   
5. set errorlevel=>nul
   
6. echo  ┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓
   
7. echo  ┃亲爱的顾客：                                                              ┃
   
8. echo  ┃                                                                          ┃
   
9. echo  ┃    你好~！                                                               ┃
   
10. echo  ┃    你有需要保存的图片、文档、软件....等资料吗？                          ┃
    
11. echo  ┃                                                                          ┃
    
12. echo  ┃    因我们网吧电脑装有还原系统，你的资料在重启后就会消失掉。              ┃
    
13. echo  ┃    请把你需要保存的资料放到本网吧为你准备的【保存区】好吗？              ┃
    
14. echo  ┃                                                                          ┃
    
15. echo  ┃注意：请保管好您的帐号和密码，这将是您访问您在保存区资料的唯一路径！！    ┃
    
16. echo  ┃               注：【保存区】的资料不会被还原，并且任何一台电脑都可以访问 ┃
    
17. echo  ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛
    
18. echo 
    
19. echo  请输入你的帐号后回车!如果你没有账号系统会为你自动建立。
    
20. echo -------------------------------------------------------
    
21. set/p 用户名= >nul
    
22. echo -------------------------------------------------------
    
23. set 用户名|findstr "\<%search%\>" >nul
    
24. set search=%用户% >nul
    
25. echo 正在验证用户『%用户名%』
    
26. echo 请稍候........
    
27. if exist %路径%\%用户名% goto pass >nul
    
28. if not exist %路径%\%用户名% goto md >nul
    
29. :pass
    
30. rem 密码验证
    
31. set errorlevel=>nul
    
32. echo →%用户名%这个用户已经存在,请输入密码:
    
33. echo -------------------------------------------------------
    
34. set/p 密码= >nul
    
35. set 密码|findstr "\<%pass%\>" >nul
    
36. set pass=%密码% >nul
    
37. if errorlevel=1 cls &&echo MSGBox "密码不能为空哦,请重新输入吧！！^_^",48,"温馨提示：" >c:\run.vbs &&call c:\run.vbs  &&call %0
    
38. if exist %路径%\%用户名%\pass\%密码% goto login >nul
    
39. if not exist %路径%\%用户名%\pass\%密码% echo  MSGBox "：（ 你输入的密码错咯！请重新输入吧！！",48,"温馨提示:" >c:\run.vbs &&call c:\run.vbs  &&call %0
    
40. :login
    
41. echo MSGBox "恭喜~！密码验证成功！！！**请不要上传木马哦！***^_^",48,"温馨提示：" >c:\run.vbs &&call c:\run.vbs >nul
    
42. cls
    
43. echo 请稍侯.......
    
44. echo 正在为你打开【保存区】
    
45. call explorer.exe %路径%\%用户名% >nul
    
46. exit
    
47. :md
    
48. echo 用户名不存在， 准备创建新用户！
    
49. 
    
50. 
    
51. set errorlevel=>nul
    
52. echo 请为你的用户名设置一个密码:
    
53. echo -------------------------------------------------------
    
54. set/p 密码= >nul
    
55. set 密码|findstr "\<%pass%\>" >nul
    
56. set pass=%密码% >nul
    
57. if errorlevel=1 cls &&echo  MSGBox " 密码不能为空哦,请重新输入吧！！^_^",48,"温馨提示：" >c:\run.vbs &&call c:\run.vbs &&call %0
    
58. md %路径%\%用户名% >nul
    
59. md %路径%\%用户名%\pass
    
60. attrib +h +s %路径%\%用户名%\pass
    
61. attrib +h +s %路径%\%用户名%
    
62. md %路径%\%用户名%\pass\%密码%
    
63. 
    
64. 
    
65. echo MSGBox "恭喜~！你已成为本网吧【保存区】的新用户，赶快把你的资料放进去吧！~*_^",48,"温馨提示："  >c:\run.vbs &&call c:\run.vbs  >nul
    
66. cls
    
67. echo 请稍侯.......
    
68. echo 正在为你打开【保存区】
    
69. explorer %路径%\%用户名% >nul
    
70. exit
    
71. rem 密码验证测试

复制代码

-----------------------码毕--开始闲聊废话----

翻看了一下用了20几年的 163 邮箱,发现有一封20几年前的保存邮件!
是当时做网吧网管时,网络存储的一封邮件!就叫 网吧存档 --
20几年前没有那么多的网盘,也没啥网络存储,邮件几乎是当时唯一的网络存储手段.
记得鄙人现在用的 163 邮箱 那时候是号称国内最大的免费邮箱,容量高达 1M 免费邮箱!
比起当时的雅虎邮箱,21CN邮箱~~很多的,忘了,,等~~~的确是当时最大那时候那些邮箱都才 K 做单位,而且还收费.
网易最大的推动作用是把网络免费理念,推得最不可缺的推手之一,后来的什么什么免费都避不开这个坎.

跑题了!~~急回~~~

上面的代码是,鄙人还是学生时候,做网吧网管时,和前辈师傅收集回来的,好像是99年还是2000年来的,,忘了~~
邮件日期是2000年,但记得是存U盘自用了很久,后来才转存网络上的,,,,
那时候还是个小白,学的也不是电脑专业,只是觉得做网吧网管,可以尽情的玩电脑,且不累,才入坑的.
毕业出社会后,做了很长时间的网吧技术,在哪段时间也摸了不少,网页网站,游戏私服,,
对于写代码都处于一种,认得是何物,说得出是何物,但说不清是何物,道不明是何物的状态,,,,
也没想过靠写代码,编程,依存于网络,电脑等,,过生活,,,,
于今,年岁渐长,曾今的愣青,现已是   三十年河东&西,莫欺中登穷 ...
今日翻出20几年前的前辈代码,是一种回忆也是一种审视,,,,

最近无聊嘛,翻看上面的代码,就有了一些不一样的心思,,,
想把代码优化一下,或改写一个类似功能的程序,,
说不定穿越回20几年前,,,,啧啧啧,,,
于是想着用 HTA应用程序写一个功能类似的程序,,,,
我记得 HTA 程序是出现得很早的,,,,
以前的光盘启动程序,有不少就是 HTA 程序,,,
理论上,HTA 本地应用是可以实现以上代码的功能的,而且还可以优化流程,美化界面,,,,
现在呢!鄙人算是  先画靶,,改天啥时候射箭,,未知,,
反正现在 A1 那么方便,随便写一下也没多难的,,,

帖子算是回忆闲聊贴,也算是给时下的年轻人抛一些个反面案例,年轻人啊,有啥想法就快点去做,莫等中登穷!~~