Batcher

回复 10# 786021512


type "1.txt"
把这行命令加到5楼代码里面，挑个你喜欢的位置，比如第2行下面或者第10行下面。

786021512

回复 9# Batcher


    额，我想说的是怎样结合你的代码，输出来..

Batcher

回复 8# 786021512

@echo off
type "1.txt"
pause
复制代码

786021512

回复 7# Batcher
Thankyou，在请教下，我还想把整个文本给输出，该怎样做呢？

Batcher

回复 6# 786021512


5楼代码
tokens=1-4
改成
tokens=1-3,*

786021512

回复 5# Batcher
感谢！，但是我还想在请教一下，假设
BATHOME(NET589WP1234,666666,ACTION)
在ACTIO后面还有一节呢,这一节我是随机添加的
即
&ACCESS
;******BATHOME*******
BATHOME(NET589WP1234,666666,ACTION,GOOD)
BATHOME(NET892WP1256,666666,ACTION)
BATMAN(NET789WP1235_P1,666666,ACTION)
BATHOME(NET523WP1255,666666,ACTION，GOOD)
BATHOME(NET589WP1266,666666,ACTION)
BATHOME(NET789WP1235_P1,666666,ACTION)
怎样保留上面的信息并输出文本
当然还是要对666666这节进行更改
请谅解我啥都不懂
谢谢大神

Batcher

回复 4# 786021512


外层for循环的dir命令可以去掉，直接type文件名就行。
多次find会导致效率较低，delims设置多个列分隔符就行了。

@echo off
setlocal enabledelayedexpansion
for /f "tokens=1-4 delims=(," %%a in ('type "1.txt" ^| findstr "(NET"') do (
    set str=%%b
    if "%%a" equ "BATHOME" (
        echo %%a(%%b,!str:~3,3!!str:~8,3!,%%d
    ) else (
        echo %%a(%%b,%%c,%%d
    )
)
pause
复制代码

786021512

回复 3# Batcher

    @echo off%
setlocal enabledelayedexpansion

for /f "tokens=*" %%k in ('dir /b test.txt') do  (
         for /f %%l in ('type "%%k"') do set STR=%%l
         for /f "tokens=2 delims=," %%j in ('find "BATHOME" "%%k"') do  set old=%%j
         for /f "tokens=2 delims=(," %%i in ('find "BATHOME" "%%k"') do set new=%%i
         set newa=!new:~3,3!
		 set newc=!new:~8,4!
		 
)  
         echo !STR:%old%=%newa%%newc%!


)
 
PAUSE
复制代码

好人呀

Batcher

回复 1# 786021512


    把你写的只能变其中一行的代码发出来看看，我来帮忙修改。

yhcfsr

BAT

@set @n=0/*&echo off
dir /a-d/s/b *.txt|cscript -nologo -e:jscript "%~f0"
pause&exit /b */

var fso=new ActiveXObject('scripting.FileSystemObject');

while(!WSH.StdIn.AtEndOfStream)
{
	var result='';
	file=WSH.StdIn.ReadLine();//取得文件名
	fo=fso.OpenTextFile(file,1);//读取文件
	while(!fo.AtEndOfStream)
	{
		//正则,替换文件内容
		line=(fo.ReadLine()).replace(/(?=BATHOME)(.*NET(\d{3})WP(\d{4}).*,)\d+(,.*)/gi,'$1$2$3$4');
		result+=line+'\r\n';//保存结果
	}
	fo.close();
	file+='.log';
	fo=fso.CreateTextFile(file,true,false);//创建文件
	fo.Write(result);//输出结果
	fo.close();
}
复制代码