[已解决]求助批处理替换文本问题

lonron

1. Location: https://media-zjhz-fy-person.zj6oss.ctyunxs.cn/PERSONCLOUD/96992c80-baea-459e-8589-50b1de713c51.exe?x-amz-CLIENTTYPEIN=UNKNOWN&AWSAccessKeyId=0Lg7dAq3ZfHvePP8DKEU&x-amz-userLevel=0&x-amz-limitrate=50&x-amz-UID=300000229870059&x-amz-APPID=828221&response-content-disposition=attachment%3Bfilename%3D%22%E7%9F%AD%E9%93%BE%E5%A4%A7%E5%B8%88.exe%22%3Bfilename*%3DUTF-8%27%27%25E7%259F%25AD%25E9%2593%25BE%25E5%25A4%25A7%25E5%25B8%2588.exe&x-amz-CLIENTNETWORK=UNKNOWN&x-amz-CLOUDTYPEIN=PERSON&Signature=bpItQBSlrZ9hwiZF%2BzB8eokXzi4%3D&x-amz-SHID=1250015256399&Expires=1683296898&x-amz-FSIZE=600576&x-amz-UFID=32431164142952114

复制代码

将以上保存在 test.txt 内容中的 &x-amz-limitrate=50 删除

我用下面的这个方式没成功，不知道哪里写错了

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. for /f "delims=" %%i in (test.txt) do (
   
4.     set "var=%%i"
   
5.     set "var=!var:&x-amz-limitrate=50=!"
   
6. )
   
7. echo !var!
   
8. pause

复制代码

在第一个=号前加了转义好像也无济于事

czjt1234

1. rem 另存为 ANSI 编码
   
2. ' & cls & cscript.exe /nologo /e:vbscript "%~f0" %* & pause & exit
   
3. 
   
4. Dim oWshShell, oFSO, oStream, s
   
5. 
   
6. Const file    = "test.txt"    '原文件。支持文件拖放，支持文件名作为命令行参数
   
7. Const charset = "GBK"         '文件编码。支持Unicode和UTF-8
   
8. 
   
9. Set oWshShell = CreateObject("WScript.Shell")
   
10. Set oFSO = CreateObject("Scripting.FileSystemObject")
    
11. s = oFSO.GetParentFolderName(WScript.ScriptFullname)
    
12. oWshShell.CurrentDirectory = s
    
13. 
    
14. Set oStream = CreateObject("ADODB.Stream")
    
15. oStream.Type    = 2    'adTypeText
    
16. oStream.Mode    = 3    'adModeReadWrite
    
17. oStream.Charset = charset
    
18. 
    
19. If WScript.Arguments.Count > 0 Then
    
20.     For Each s In WScript.Arguments
    
21.         Call run(s)
    
22.     Next
    
23. Else
    
24.     Call run(file)
    
25. End If
    
26. 
    
27. Sub run(ByVal file)
    
28.     Dim s
    
29.     oStream.Open()
    
30.     oStream.LoadFromFile file
    
31.     s = oStream.ReadText()
    
32.     oStream.Close()
    
33.     s = RePlace(s, "&x-amz-limitrate=50", "")
    
34.     WScript.Echo s
    
35. End Sub

复制代码

hfxiang

回复 1# lonron

这种文本类的处置，俺大多数时候习惯于用gawk（ http://bcn.bathome.net/tool/4.1.0/gawk.exe ）

1. 
   
2. gawk "{gsub(/&x-amz-limitrate=50/,"")}1" test.txt>Out_test.txt
   

复制代码