假设有程序A会用到多个配置文件,每个配置文件都有相同的名字set.inf。配置文件中记录了公司名称,产品系列,产品型号和其他一些配置信息。并且现在知道每个配置文件中的公司名称都是一样的。现在,出于某种需要,我们想把每个set.inf中的公司名称都改成另外一个名字。请问如何解决?
1.使用VC
其实这是一个很不好的提议,原因很简单:作为一个VC程序员,我讨厌使用VC来解决工作中的所有问题。动不动就搞一个MFC程序,感觉很不好,相比之下我更喜欢尝试其他解决方案,譬如脚本。
当然了,如果用VC实现,也很简单。使用CStdioFile,然后ReadString然后替换,然后WriteString,基本没什么难度(我也就因此不再写任何代码)。
2.使用批处理
可能很少有人使用批处理程序来解决类似问题,然而它确实能解决这样的问题。关键就在于,这样的批处理程序不好写(至少在我看来不太好写,我也不会写),以下是我在www.verybat.cn论坛上讨到的解决方案。
setlocal
ENABLEDELAYEDEXPANSION
:: 启用延缓环境变,批处理不能记住上次变量的值启用这个就行了!
set zhi = 0
FOR / R %%i IN ( a . txt ) DO (
for / f " delims= " %%j in ( %%i ) do (
set str = %%j
set / a zhi = !zhi! + 1
rem用于判断是不是第一行
set onestr = !str:~ 0 , 1 !
rem提取第一行第一个字的内容
set onereplace = !onestr :a = 替换的值!
rem将第一个字替换成指定的值 , 这里假设第一个值为a
if !zhi! == 1 ( set replaces = !onereplace!!str:~ 1 , 99999 !
rem如果是第一行的内容将替换好的第一个字符和他后面的内容给replaces
echo !replaces: = ! >> %%~dpi2 . txt
rem消除replaces中的空格,启用延缓环境变量两个变量一起输出中间会有个空格
)
)
set zhi = 0
:: 为下一个a.txt做准备
more + 1 " %%i " >> %%~dpi2 . txt
echo y| move %%~dpi2 . txt %%~dpia . txt
)
:: 启用延缓环境变,批处理不能记住上次变量的值启用这个就行了!
set zhi = 0
FOR / R %%i IN ( a . txt ) DO (
for / f " delims= " %%j in ( %%i ) do (
set str = %%j
set / a zhi = !zhi! + 1
rem用于判断是不是第一行
set onestr = !str:~ 0 , 1 !
rem提取第一行第一个字的内容
set onereplace = !onestr :a = 替换的值!
rem将第一个字替换成指定的值 , 这里假设第一个值为a
if !zhi! == 1 ( set replaces = !onereplace!!str:~ 1 , 99999 !
rem如果是第一行的内容将替换好的第一个字符和他后面的内容给replaces
echo !replaces: = ! >> %%~dpi2 . txt
rem消除replaces中的空格,启用延缓环境变量两个变量一起输出中间会有个空格
)
)
set zhi = 0
:: 为下一个a.txt做准备
more + 1 " %%i " >> %%~dpi2 . txt
echo y| move %%~dpi2 . txt %%~dpia . txt
)
3.正则表达式
熟悉正则表达式的人肯定会首先由文本替换而想到正则表达式,并由此而想到perl,python,.net等多种实现方式。我使用的是JScript,使用JScript进行文本替换的主体代码大概如下,当然,稍加修改就可以完成功能:
var
fso, f, str;
var ForReading = 1 , ForWriting = 2 ;
fso = new ActiveXObject( " Scripting.FileSystemObject " );
objArgs = WScript.Arguments;
for (i = 0 ; i < objArgs.length; i ++ )
... {
f = fso.OpenTextFile(objArgs(i), ForReading);
while(!f.AtEndOfStream)
...{
str = f.ReadLine();
str = str.replace(//s/g, "");
WScript.echo(str);
}
}
var ForReading = 1 , ForWriting = 2 ;
fso = new ActiveXObject( " Scripting.FileSystemObject " );
objArgs = WScript.Arguments;
for (i = 0 ; i < objArgs.length; i ++ )
... {
f = fso.OpenTextFile(objArgs(i), ForReading);
while(!f.AtEndOfStream)
...{
str = f.ReadLine();
str = str.replace(//s/g, "");
WScript.echo(str);
}
}