acount_batch.bat

用批处理实现帐号登记本软件,能够登记并查询信息,并且将数据隐藏在回收站的目录下。

 
 
@echo off 
color 37 
cd C:\ 
if  exist 回收站 goto over 
md  回收站 
cd  回收站 
:over 
@echo [.ShellClassInfo]>desktop.ini 
@echo CLSID={645FF040-5081-101B-9F08-00AA002F954E}>>desktop.ini 
attrib +s +h +r desktop.ini 
cd %cd:~0,-3% 
attrib +s 回收站 
cd 回收站 
:MRYELLOW 
color 37 
cls 
echo     ★★★★★★★★★★★★★多功能小程序★★★★★★★★★★★★ 
echo  ★★★★★★★★★★★★                      ★★★★★★★★★★★ 
echo. 
echo. 
echo.                     
echo. 
echo.  帐号登记 I--W--I         帐号查询 I--F--I         交易总额 I--S--I 
echo.                           
echo.                           目录设置 I--M--I 
echo.                           
echo. 
echo. 
set /p choie=请选择相关操作: 
if "%choie%"=="" goto MRYELLOW 
if "%choie%"=="W" goto A 
if "%choie%"=="w" goto A 
if "%choie%"=="F" goto B 
if "%choie%"=="f" goto B 
if "%choie%"=="S" goto C 
if "%choie%"=="s" goto C 
if "%choie%"=="M" goto D 
if "%choie%"=="m" goto D 
goto MRYELLOW 
:A 
set choie=<nul 
color 8e 
title=★代练号码登记★ 
:0 
cls 
echo ★★★★★★★★★★★★★代练号码登记★★★★★★★★★★★★ 
echo  ★★★★★★★★★★★★  帐号和密码  ★★★★★★★★★★★ 
echo. 
echo. 
echo. 
echo. 
echo. 
set /p usernam=请输入帐号: 
if "%usernam%"=="" goto 0 
if not exist datp.dll (@echo 10 >datp.dll) 
set /p ac=<datp.dll 
attrib -r -h -s datp.dll 
set ab=%ac:~1,-1% 
set /a ab+=1 
@echo (%ab%)>datp.dll 
attrib +r +h +s datp.dll 
:1 
cls 
echo ★★★★★★★★★★★★★代练号码登记★★★★★★★★★★★★ 
echo  ★★★★★★★★★★★★  帐号和密码  ★★★★★★★★★★★ 
echo. 
echo. 
echo. 
echo. 
echo. 
set /p password=请输入密码: 
if \"%password%\"==\"\" goto 1 
pause 
:6 
cls 
echo ★★★★★★★★★★★★★代练号码登记★★★★★★★★★★★★ 
echo  ★★★★★★★★★★★★  帐号和密码  ★★★★★★★★★★★ 
echo. 
echo. 
echo.      此处不允许有任何汉字，请直接输入数字，默认交易额单位为(元) 
echo. 
echo. 
set /p money=请输入交易金额: 
if \"%money%\"==\"\" goto 6 
@echo (%ab%)帐号:%usernam% >>帐号登记本.txt
@echo (%ab%)密码:%password% >>帐号登记本.txt 
@echo (%ab%)交易金额:%money% >>帐号登记本.txt 
@echo (%ab%)%date%%time% >>帐号登记本.txt 
set usernam=<nul 
set password=<nul 
set money=<nul 
pause 
cls 
echo ★★★★★★★★★★★★★代练号码登记★★★★★★★★★★★★ 
echo  ★★★★★★★★★★★★  帐号和密码  ★★★★★★★★★★★ 
echo. 
echo. 
echo. 
echo. 
echo. 
echo. 
echo.                           登记完毕! 
echo. 
echo. 
echo.   
echo. 
echo. 
echo.   
pause 
goto MRYELLOW 
:B 
set choie=<nul 
@echo off 
:2 
cls 
color 8e 
set /p N=请输入要查找的帐号: 
echo. 
echo. 
echo. 
echo.   
echo. 
echo. 
echo.                                            返回 I--exit--I 
echo. 
echo.                                            退出 I--out--I 
:4 
if "%N%"==")" goto 5 
if "%N%"=="" goto 2 
if "%N%"=="exit" goto MRYELLOW 
if "%N%"=="EXIT" goto MRYELLOW 
if "%N%"=="out" exit 
if "%N%"=="OUT" exit 
type 帐号登记本.txt|find "%N%" && echo 编号:%N%的文件已被找到!!! && set pkl=1 ||echo 要查找的编号不存在!!! 
pause 
if  %pkl%==1 goto 5 
goto 2 
:5 
cls 
echo.请输入要查找编号: 
echo. 
echo. 
echo. 
echo. 
echo. 
echo.                帐号已被找到，请输入相应的编号! 
echo. 
echo. 
echo.   
echo. 
echo.                                           返回 I--exit--I 
echo.                                           
echo.                                           退出 I--out--I                                   
set N=<nul 
set /p N=从这边输入: 
set pkl=<nul 
if "%N%"=="exit" goto 2 
if "%N%"=="EXIT" goto 2 
if "%N%"=="out" exit 
if "%N%"=="OUT" exit 
set N=(%N%)
goto 4 
:C 
if not exist datp.dll goto 10 
set choie=<nul 
set am=0 
set al=0 
set /p ak=<datp.dll 
set aj=%ak:~1,-1% 
set j=2 
:7 
FOR /F "skip=%j% tokens=2 delims=:" %%i in (帐号登记本.txt) do set al=%%i&goto 8 
:8 
set /a j+=4 
set /a aj-=1 
set /a am+=al 
if %aj%==0 goto 9 
goto 7 
:9 
cls 
echo ★★★★★★★★★★★★★代练号码登记★★★★★★★★★★★★ 
echo  ★★★★★★★★★★★★  帐号和密码  ★★★★★★★★★★★ 
echo. 
echo. 
echo.               当前交易总额为%am%元 
echo. 
echo. 
pause 
goto MRYELLOW 
:10 
cls 
echo ★★★★★★★★★★★★★代练号码登记★★★★★★★★★★★★ 
echo  ★★★★★★★★★★★★  帐号和密码  ★★★★★★★★★★★ 
echo. 
echo. 
echo.               暂时没有任何交易记录!!! 
echo. 
echo. 
pause 
goto MRYELLOW 
:D 
set i=如果需要对目录设置请输入“Y”并回车 
:D1 
set k=<nul 
cls 
dir %cd% 
echo. 
echo. 
echo.   
echo. 
echo.                          %i% 
echo.                     
echo. 
set /p k= 
if "%k%"=="y" set i=目录保护已被解除，请立即完成对目录内文件的操作! & attrib -s %cd% & goto D1 
if "%k%"=="Y" set i=目录保护已被解除，请立即完成对目录内文件的操作! & attrib -s %cd% & goto D1 
start %cd:~0,-3% 
set /p k= 
if "%k%"=="y" set i=目录保护已被解除，请立即完成对目录内文件的操作! & attrib -s %cd% & goto D1 
if "%k%"=="Y" set i=目录保护已被解除，请立即完成对目录内文件的操作! & attrib -s %cd% & goto D1 
cls 
echo. 
echo. 
echo. 
echo.                          目录已重新被锁定! 
set choie=<nul 
attrib +s %cd% 
set /p l= 
goto MRYELLOW