jxwhmir 发表于 2015-6-6 02:35:55

多个相同字符串中间内容提取出来并替换空格代码

谁能帮我写个代码:
多个相同字符串中间内容提取出来并替换为空格代码
例子:
$1 = 123321123
$2 =122233215
$3 =这里即是要提取出来的内容,并用空格代替,这里要提取的内容会不一样
有多个要提取出来的内容不单单是提取出来一个

#include<string.au3>
#include<file.au3>
$txt = @ScriptDir & "\" & "11.txt"
$datt = FileRead($txt )
$a = "〖CS%0,100,0,0〗"
$b = "〖CS〗"
$jsl ="yyyy" ;这里是结尾的地方出现这几个字母以后就不用提了
Local$amount1

$start1 = StringInStr($datt, $a, 0, 1)
      If $start1 > 0 Then
                $start1 = $start1 + StringLen($a);查找$a的结束位置
      Else
               MsgBox(64, "提示", "没有找到 "&'"'&$a&'"'&" 相同的字符" )
      EndIf
      $end1 = StringInStr($datt, $b, 0, 1, $start1);从$a的结束位置开始查找$b的位置
      If $end1 > 0 Then
                       
                     $amount1 = $end1 - $start1;获得中间部分字符的数量
               $results1= StringMid($datt, $start1, $amount1);返回结果
               FileWrite(@ScriptDir & "\" & "file.txt", $results1&" ")
      Else
               MsgBox(64, "提示", "没有找到 "&'"'&$b&'"'&" 相同的字符" )
                   EndIf
这是根据别的大神内容修改的,但是只能提取第一个内容,后面的不提取了,帮我写个能提取到结尾的地方 谢谢 ,有奖
页: [1]
查看完整版本: 多个相同字符串中间内容提取出来并替换空格代码