批处理如何修改 *.ini 文件的指定内容？

luo1987

CMD 命批处理修改*.ini文件
修改指定某行以
“pos_last_date=” 开头的行
改成pos_last_date=2012-06-13 (当前日期)

luo1987

pos_last_date= 不确为第几行

weichenxiehou

1. gawk "BEGIN{\"date/t\"|getline date} {if($0 ~ /^pos_last_date=/) $0=\"pos_last_date=\" substr(date,1,10);print>FILENAME \".new\"}" *.ini

复制代码

因操作系统可能不同，可能需要改变时间格式。

luo1987

好像不行 我比较菜还请多多指导

luo1987

还是这个不是用CMD执行

weichenxiehou

gawk为第三方工具，需要自行下载，论坛里就有。

luo1987

自已找了个脚本但还是不行
请大侠指点下
、

Const ForReading = 1
Const ForWriting = 2

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("kmjxc.ini", ForReading)

Do Until objTextFile.AtEndOfStream
strNextLine = objTextFile.Readline

intLineFinder = InStr(strNextLine, "pos_last_date")
If intLineFinder <> 0 Then
strNextLine = "pos_last_date="date
End If


strNewFile = strNewFile & strNextLine & vbCrLf
Loop

objTextFile.Close

Set objTextFile = objFSO.OpenTextFile("kmjxc.ini", ForWriting)

objTextFile.WriteLine strNewFile
objTextFile.Close

luo1987

电脑比较不逐个装第三工具
要可以 用另类的方法不
比如用*.BAT 批处理
1、 date /t >X:\date.txt
再用VBS 把date.txt内容替换

luo1987

谢谢 weichenxiehou  
实在不行也就只能逐个安装个第三方工具了

powerbat

修改当前目录下的所有ini文件，保存为*.xxx。检查如无问题可把代码中的“+'.xxx'”去掉，直接修改原文件。

1. @set @n=0//& dir /a-d/b *.ini |cscript -nologo -e:jscript "%~f0" &pause&exit/b
   
2. 
   
3. fso = new ActiveXObject("Scripting.FileSystemObject");
   
4. while (!WScript.StdIn.AtEndOfStream) {
   
5.   f = WScript.StdIn.ReadLine();
   
6.   s = fso.OpenTextFile(f).ReadAll();
   
7.   s = s.replace(/^(pos_last_date=)[^\r\n]*/gm, '$1' + today());
   
8.   with (fso.OpenTextFile(f+'.xxx', 2, true)) {Write(s); Close();}
   
9. }
   
10. function today()
    
11. {
    
12.   var d = new Date();
    
13.   return (
    
14.     d.getFullYear()
    
15.     + '-' + (d.getMonth() + 101).toString().slice(1)
    
16.     + '-' + (d.getDate() + 100).toString().slice(1)
    
17.   );
    
18. }

复制代码

yangfengoo

1. @echo off&setlocal enabledelayedexpansion
   
2. for %%a in (*.ini) do (
   
3.    for /f "tokens=*" %%b in ('type %%a^&del %%a') do (
   
4.       set #=%%b
   
5.       if "!#:~0,14!"=="pos_last_date=" (echo,pos_last_date=%date:~,10%) else (echo,%%b)
   
6.     )>>%%a
   
7. )

复制代码

luo1987

谢谢各位高手
已测试OK

luo1987

谢谢 10楼 11楼 的朋友
加问一个问题
批处理做好了 通过共亨复制一了每台电脑
还做了个 创建快捷方式的 VBS脚本
想通过AT运*.VBS
net use \\pc001\D$ /user adminstrator:123456
AT \\PC001\D$\ D:\Program Files\pos_date\lnk.vbs
提示错误