本文转载自： http://blog.csdn.net/cryeyes/archive/2007/10/17/1829985.aspx
 
@set 路径=\\\\server\\资料保存$
@set errorlevel=>nul
@echo                                                         ╔======================╗
@echo                                                         ‖天保网络客户资料保存区‖
@echo                                                         ╚======================╝
@echo            ╔┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉╗
@echo            ┋◆本存档区是为了方便客户保存一些外挂设置文件、游戏存档而设的！                    ┋
@echo            ┋◆禁止上传***、病毒、以及危害网吧的软件，一经发现，立即删除该用户     ┋
@echo            ┋◆禁止上传×××、反动信息一经发现连同信息移交公安机关处理。                                 ┋
@echo            ┋◆本保存区采用自动注册账号方法，如果你没有账号系统会为你自动建立。     ┋
@echo            ╚┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉╝

@echo 请输入你的用户名(如果没有账号系统会自动建立)：
@set/p 用户名= >nul
@set 用户名|findstr "\\<%search%\\>" >nul
@set search=%用户% >nul
@echo 正在验证用户■■■%用户名%■■■

@if exist %路径%\\%用户名% goto pass >nul
@if not exist %路径%\\%用户名% goto md >nul
:pass
@rem 密码验证
@set errorlevel=>nul
@echo →%用户名%这个用户已经存在,请输入密码:
@set/p 密码= >nul
@set 密码|findstr "\\<%pass%\\>" >nul
@set pass=%密码% >nul
@if errorlevel=1 cls &&echo MSGBox "密码不能为空,请重新输入！！",48,"天保网络用户共享区" >run.vbs &&call run.vbs    &&call %0    
@if exist %路径%\\%用户名%\\pass\\%密码% goto login >nul
@if not exist %路径%\\%用户名%\\pass\\%密码% echo    MSGBox "你输入的密码错误！",48,"天保网络用户共享区" >run.vbs &&call run.vbs    &&call %0
:login
@echo MSGBox "密码验证成功！！！**请不要上传***！***",48,"天保网络用户共享区" >run.vbs &&call run.vbs >nul
@call explorer.exe %路径%\\%用户名% >nul
exit
:md
@echo 用户名不存在， 准备创建新用户！

@set errorlevel=>nul
@echo 请为你的用户名设置一个密码:
@set/p 密码= >nul
@set 密码|findstr "\\<%pass%\\>" >nul
@set pass=%密码% >nul
@if errorlevel=1 cls &&echo    MSGBox " 密码不能为空,请重新输入！",48,"天保网络用户共享区" >run.vbs &&call run.vbs &&call %0    
@md %路径%\\%用户名% >nul
@md %路径%\\%用户名%\\pass
@attrib +h %路径%\\%用户名%\\pass
@attrib +h %路径%\\%用户名%
@md %路径%\\%用户名%\\pass\\%密码%

@echo MSGBox "您好！你是本网吧存档共享区的的新用户，请不要上传***违者不允重复建立账号发现立即删除！",48,"天保网络用户共享区"    >run.vbs &&call run.vbs    >nul
@explorer.exe %路径%\\%用户名% >nul
exit
rem 密码验证测试