echo off&color a&cls
setlocal EnableDelayedExpansion
set kj01=echo.---------------------------------------
set lj=data.db
title ,

if exist %lj% goto :zcx
echo 数据库规则以 空格 分列 已知最高支持26列，当前本程序已完成7列
echo.&echo.&echo.快速插入一万条记录
for /l %%i in (1,1,10000) do (
echo %%i !random! !random! !random! !random! !random! !random! >>%lj%
)
:zcx
::::::::::::::::::::计算行数::::::::::::::::::::
set /p list=请输入操作ID^>
echo.数据库建立于：%date% %itme% >db.tmp
for /f "delims=*" %%z in  (%lj%) do (
cls
set /a aa+=1
:::echo 读出来的内容是： %%z
for /f  "tokens=1-7" %%a in ("%%z") do (
      set list1=%%a
      set list2=%%b
      set list3=%%c
      set list4=%%d
      set list5=%%e
      set list6=%%f
      set list7=%%g
echo.正在查找数据...
)
echo.####:!aa!
:::::取到数据后操作。操作完毕后返回继续执行剩下的数据库。
if "!list!"=="!list1!" call :ssok
echo.!list1! !list2! !list3! !list4! !list5! !list6! !list7! >>db.tmp
)
del /s/q %lj%
ren db.tmp %lj%
echo ##记录共计： %aa% 行

pause
exit

:ssok
cls
echo.&echo.&echo.
echo.  客户ID：%list1%
%kj01%
echo.  客户姓名：%list2%
%kj01%
echo.  项目名称：%list3%
%kj01%
echo.  项目总数：%list4%
%kj01%
echo.  项目剩余：%list5%
%kj01%
echo.  上次消费：%list6%
%kj01%
echo.  录入时间：%list7%
%kj01%
echo 记录储存于第：%aa% 行
%kj01%
%kj01%
set /a list5-=1
pause
goto :EOF
复制代码

@echo off&setlocal enabledelayedexpansion
(for /f  "tokens=1-7" %%a in ('type db.txt') do (if %%a equ 996 (set ts=16) else (set ts=%%e)
echo %%a %%b %%c %%d !ts! %%f %%g
))>new.txt
复制代码