找回密码
 加入
搜索
查看: 1812|回复: 4

[网络通信] 【解决】请教,文本-相同内容合并

  [复制链接]
发表于 2016-9-7 19:31:19 | 显示全部楼层 |阅读模式
本帖最后由 wenquan79 于 2016-10-15 20:33 编辑

请教一下将文本相同内容合并的代码怎么写,谢谢!

原文本内容:
04-565-112045 RES00.16512 C1,C2,C3,C4,
04-565-112045 RES00.16512 C5,C6,C7,C8,
04-565-112047 RES00.16512 CA,CB,CC,CD,
04-565-112047 RES00.16512 CE,CF,CG,CG,

希望文本内容:
04-565-112045 RES00.16512 C1,C2,C3,C4,C5,C6,C7,C8,
04-565-112047 RES00.16512 CA,CB,CC,CD,CE,CF,CG,CG
发表于 2016-9-8 06:23:18 | 显示全部楼层
本帖最后由 Huiseyu 于 2016-9-8 06:52 编辑
先上个图, 因为这题花了我不少时间额...另外你"希望文本内容"末尾是不是少了个逗号,和我的不一样,,,
;~..
#include'array.au3'
$str = clipget()                                                        ;读取字符串
msgbox(4096 ,'原文本内容' ,$str)                                ;显示字符串
$FindList = stringregexp($str,'(.*\.\d+)\s',3);
global $xiwang
for $i = 0 to ubound($FindList) - 1
stringregexpreplace($str,$FindList[$i] ,$FindList[$i])
        $Single_find = stringregexp($str,$FindList[$i]&'(.*)',3)
        $result = _arraytostring($Single_find,'')                 ;合并后者
$xiwang &= $FindList[$i]&$result&@crlf
next;

msgbox(4096 ,'希望文本内容',stringregexpreplace($xiwang ,'(?m)(^.*\r\n)(?=(?:^.*\r\n)*\1)',''))
;~ 关于删除重复行,搜索了无数个贴(有点跑题..),最终引用
;~ http://www.autoitx.com/forum.php ... =%D6%D8%B8%B4%D0%D0
;~ 稍作修改

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×

评分

参与人数 1金钱 +10 收起 理由
heroxianf + 10 厉害

查看全部评分

 楼主| 发表于 2016-9-8 07:10:33 | 显示全部楼层
回复 2# Huiseyu
感谢!我后面是漏了逗号了,
再次见识到表达式的威武!
先学习理解一下,不懂再讨教,感谢 !
发表于 2016-9-8 08:14:48 | 显示全部楼层
回复  Huiseyu
感谢!我后面是漏了逗号了,
再次见识到表达式的威武!
先学习理解一下,不懂再讨教,感 ...
wenquan79 发表于 2016-9-8 07:10



    第7行代码是多余的...一开始的思路,忘删了
发表于 2016-9-8 09:04:44 | 显示全部楼层
处理文本的要留一脚,学习学习。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-26 03:12 , Processed in 0.083474 second(s), 28 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表