【已解决】替换文本指定行指定位置的内容（某行某个字段）？

qq692172929

自动生成data.db 例子
例如需要修改data.db 里面的第996行的 第五列 为 原来的值减一 其他内容不动。

代码：

1. echo off&color a&cls
   
2. setlocal EnableDelayedExpansion
   
3. set kj01=echo.---------------------------------------
   
4. set lj=data.db
   
5. title ,
   
6. 
   
7. if exist %lj% goto :zcx
   
8. echo 数据库规则以 空格 分列 已知最高支持26列，当前本程序已完成7列
   
9. echo.&echo.&echo.快速插入一万条记录
   
10. for /l %%i in (1,1,10000) do (
    
11. echo %%i !random! !random! !random! !random! !random! !random! >>%lj%
    
12. )
    
13. :zcx
    
14. ::::::::::::::::::::计算行数::::::::::::::::::::
    
15. set /p list=请输入操作ID^>
    
16. echo.数据库建立于：%date% %itme% >db.tmp
    
17. for /f "delims=*" %%z in  (%lj%) do (
    
18. cls
    
19. set /a aa+=1
    
20. :::echo 读出来的内容是： %%z
    
21. for /f  "tokens=1-7" %%a in ("%%z") do (
    
22.       set list1=%%a
    
23.       set list2=%%b
    
24.       set list3=%%c
    
25.       set list4=%%d
    
26.       set list5=%%e
    
27.       set list6=%%f
    
28.       set list7=%%g
    
29. echo.正在查找数据...
    
30. )
    
31. echo.####:!aa!
    
32. :::::取到数据后操作。操作完毕后返回继续执行剩下的数据库。
    
33. if "!list!"=="!list1!" call :ssok
    
34. echo.!list1! !list2! !list3! !list4! !list5! !list6! !list7! >>db.tmp
    
35. )
    
36. del /s/q %lj%
    
37. ren db.tmp %lj%
    
38. echo ##记录共计： %aa% 行
    
39. 
    
40. pause
    
41. exit
    
42. 
    
43. :ssok
    
44. cls
    
45. echo.&echo.&echo.
    
46. echo.  客户ID：%list1%
    
47. %kj01%
    
48. echo.  客户姓名：%list2%
    
49. %kj01%
    
50. echo.  项目名称：%list3%
    
51. %kj01%
    
52. echo.  项目总数：%list4%
    
53. %kj01%
    
54. echo.  项目剩余：%list5%
    
55. %kj01%
    
56. echo.  上次消费：%list6%
    
57. %kj01%
    
58. echo.  录入时间：%list7%
    
59. %kj01%
    
60. echo 记录储存于第：%aa% 行
    
61. %kj01%
    
62. %kj01%
    
63. set /a list5-=1
    
64. pause
    
65. goto :EOF
    

复制代码

读出数据并存了变量。可是怎么修改数据 然后储存到原来的位置呢？

本帖仅用于有规定规律列的，列数可以修改。本帖仅供参考。

happy886rr

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

复制代码

回复 1# qq692172929

qq692172929

回复 2# happy886rr


    我现在是读到了，每个字段， 问题是我修改后怎么储存会去。

qq692172929

@pcl_test
请教，为何是 没按版规发帖了？我这不属于求助帖？

qq692172929

回复  qq692172929
happy886rr 发表于 2016-3-26 11:56

你的意思是边读边存搜索到记录后 进行操作，操作完成后继续读剩下的数据 然后一并写到新 文本里？

pcl_test

回复 4# qq692172929

原标题太笼统随意；贴出那么长的代码与需求豪不相干，你要把新的需求整合到你原有代码中，就要把完整的需求和效果说清楚；在相应楼层点回复，少引用

qq692172929

干脆点，本帖由提问贴改成实例贴好了。自己解决了。
其次版主的说法俺不服。涉嫌随意扣分。