autoee 发表于 2014-7-2 11:30:14

求助正则写入文件【已解决】

本帖最后由 autoee 于 2014-7-2 13:53 编辑

For $i = 0 To UBound($Test) - 1
               
                FileWriteLine($file, $Test[$i] & @CRLF)
        Next现在写入时候是这样
219.243.220.100
1080
请问怎么才能写成219.243.220.100:1080

hnfeng 发表于 2014-7-2 11:57:16

一维数组好像困难些,建议用二维数组

afan 发表于 2014-7-2 13:01:28

For $i = 0 To UBound($Test) - 2 Step 2
        FileWriteLine($file, $Test[$i] & ':' & $Test[$i + 1] & @CRLF)
Next

autoee 发表于 2014-7-2 21:24:17

For $i = 0 To UBound($Test) - 2 Step 2
        FileWriteLine($file, $Test[$i] & ':' & $Test[$i + 1] & @CRL ...
afan 发表于 2014-7-2 13:01 http://www.autoitx.com/images/common/back.gif


    再麻烦版主,<tr><td>(.*?)</td><td>(.*?)</td><td>匹配回来的数据
219.243.220.100
1080
219.243.220.100
80
可不可以把是1080和80的不要呢

hnfeng 发表于 2014-7-3 09:38:36

回复 3# afan


    厉害,又学到一招

hnfeng 发表于 2014-7-3 09:41:16

回复 4# autoee


    你加个判断就行了
For $i = 0 To UBound($Test) - 2 Step 2
if $Test[$i + 1]<>1080 or $Test[$i + 1]<>80 then
      FileWriteLine($file, $Test[$i] & ':' & $Test[$i + 1] & @CRLF)
endif
Next

ak47gglllk 发表于 2014-7-3 12:02:36

来露个脸,赚钱拿码走人{:face (411):}
页: [1]
查看完整版本: 求助正则写入文件【已解决】