请教TXT搜索替换完后怎么插入新的内容并保存（已解决）

你没有kii · 发表于 2019-1-21 10:27:37

本帖最后由你没有kii 于 2019-1-31 15:09 编辑

      <setting name="agc_mode" value="1"/>
      <setting name="dtx_mode" value="0"/>
      <setting name="vad_level" value="1"/>
      <setting name="echo_control" value="0"/>
      <setting name="noise_suppression" value="0"/>
原文字需改为
      <setting name="agc_mode" value="0"/>
      <setting name="dtx_mode" value="0"/>
      <setting name="vad_level" value="1"/>
      <setting name="echo_control" value="1"/>
      <setting name="noise_suppression" value="1"/>
现用的代码是
$myFile = "D:\桌面\测试.txt"
$content = FileRead($myFile)
Local $text = StringReplace($content,'<setting name="agc_mode" value="1"/>','<setting name="agc_mode" value="0"/>')
Local $text1 = StringReplace($text,'<setting name="echo_control" value="0"/>','<setting name="echo_control" value="1"/>')
Local $text2 = StringReplace($text1,'<setting name="noise_suppression" value="0"/>','<setting name="noise_suppression" value="1"/>')
MsgBox(0, "新字符串为:", $text2)
能输出我需要的结果但无法保存到TXT文件里。

gzh888666 · 发表于 2019-1-21 12:35:28

本帖最后由 gzh888666 于 2019-1-21 13:54 编辑

Global Const $myFile = "D:\桌面\测试.txt"

Example($myFile, '<setting name="agc_mode" value="1"/>', '<setting name="agc_mode" value="0"/>')
Example($myFile, '<setting name="echo_control" value="0"/>', '<setting name="echo_control" value="1"/>')
Example($myFile, '<setting name="noise_suppression" value="0"/>', '<setting name="noise_suppression" value="1"/>')
Func Example($File, $1, $2)
        Local $sFileRead = StringReplace(FileRead($File), $1, $2)
        Local $hFileOpen = FileOpen($File, 2)
        FileWrite($hFileOpen, $sFileRead)
        FileClose($hFileOpen)
EndFunc   ;==>Example

你没有kii · 发表于 2019-1-21 13:45:01

gzh888666 发表于 2019-1-21 12:35

谢谢老板，搞定。11

dalao · 发表于 2019-1-28 21:57:14

学习一下！！！！

		自动登录	找回密码
密码			加入

[网络通信] 请教TXT搜索替换完后怎么插入新的内容并保存（已解决）