筛选重复网址内容剩下保留加到超级列表框

chunyang300

cobi

  

[attach]1371104[/attach]

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
网址组	文本型		0
临时组	文本型		0
i
s

网址组 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (网址组), i)
临时组 ＝ 分割文本 (网址组 [i], “,http://”, )
s ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (s, 0, )
超级列表框1.置标题 (s, 0, 临时组 [1])
如果真 (取数组成员数 (临时组) ≥ 2)
超级列表框1.置标题 (s, 1, “http://” ＋ 临时组 [2])

计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <ignore_js_op> <img src="static/image/filetype/e.png" border="0" class="vm" alt="" /> <span style="white-space: nowrap" id="attach_1371104" onmouseover="showMenu({'ctrlid':this.id,'pos':'12'})"> <a href="/plugin.php?id=le3600_down:show&aid=MTM3MTEwNHxkYTUxOTIyNnwxNzQ2ODUwMTU3fDB8MTQ4NTUwOTc%3D" rel="nofollow" target="_blank" onclick="showWindow('le3600_down', this.href)">筛选重复网址内容剩下保留加到超级列表框.e</a> <em class="xg1">(148.55 KB, 下载次数: 0)</em> </span> <div class="tip tip_4" id="attach_1371104_menu" style="position: absolute; display: none" disautofocus="true"> <div class="tip_c xs0"> <div class="y">2025-5-2 09:49 上传</div> 点击文件名下载附件 </div> <div class="tip_horn"></div> </div> </ignore_js_op> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 网址组, 文本型, , "0"<br /> .局部变量 临时组, 文本型, , "0"<br /> .局部变量 i<br /> .局部变量 s<br /> <br /> 网址组 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (网址组), i)<br />     临时组 ＝ 分割文本 (网址组 <i>, “,http://”, )<br />     s ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (s, 0, )<br />     超级列表框1.置标题 (s, 0, 临时组 [1])<br />     .如果真 (取数组成员数 (临时组) ≥ 2)<br />         超级列表框1.置标题 (s, 1, “http://” ＋ 临时组 [2])<br />     .如果真结束<br /> <br /> .计次循环尾 ()

补充内容 (2025-5-2 09:50):
哈哈多了个：超级列表框1.置标题 (s, 0, )
可删除~


补充内容 (2025-5-2 09:52):
忘了筛选重复。。。。我重新发吧

cobi

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
网址组	文本型		0
临时组	文本型		0
网址	文本型
i
s

超级列表框1.全部删除 ()
网址组 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (网址组), i)
临时组 ＝ 分割文本 (网址组 [i], “,http://”, )
如果真 (取数组成员数 (临时组) ≥ 2)
网址 ＝ “http://” ＋ 临时组 [2]
如果真 (超级列表框1.查找表项 (网址, , , 1) ＝ -1)
s ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (s, 0, 临时组 [1])
超级列表框1.置标题 (s, 1, 网址)


计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 网址组, 文本型, , "0"<br /> .局部变量 临时组, 文本型, , "0"<br /> .局部变量 网址, 文本型<br /> .局部变量 i<br /> .局部变量 s<br /> <br /> 超级列表框1.全部删除 ()<br /> 网址组 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (网址组), i)<br />     临时组 ＝ 分割文本 (网址组 <i>, “,http://”, )<br />     .如果真 (取数组成员数 (临时组) ≥ 2)<br />         网址 ＝ “http://” ＋ 临时组 [2]<br />         .如果真 (超级列表框1.查找表项 (网址, , , 1) ＝ -1)<br />             s ＝ 超级列表框1.插入表项 (, , , , , )<br />             超级列表框1.置标题 (s, 0, 临时组 [1])<br />             超级列表框1.置标题 (s, 1, 网址)<br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()

chunyang300

不行

chunyang300

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
全文分割文本	文本型		0
每行分割文本	文本型		0
计次1	整数型
计次2	整数型
索引	整数型

超级列表框1.全部删除 ()
全文分割文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (全文分割文本), 计次1)
每行分割文本 ＝ 分割文本 (全文分割文本 [计次1], “,”, )
索引 ＝ 超级列表框1.插入表项 (, , , , , )
计次循环首 (取数组成员数 (每行分割文本), 计次2)
超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))
超级列表框1.置标题 (索引, 计次2, 每行分割文本 [计次2])
计次循环尾 ()
计次循环尾 ()
超级列表框1.现行选中项 ＝ 0

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 全文分割文本, 文本型, , "0"<br /> .局部变量 每行分割文本, 文本型, , "0"<br /> .局部变量 计次1, 整数型<br /> .局部变量 计次2, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> 超级列表框1.全部删除 ()<br /> 全文分割文本 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (全文分割文本), 计次1)<br />     每行分割文本 ＝ 分割文本 (全文分割文本 [计次1], “,”, )<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     .计次循环首 (取数组成员数 (每行分割文本), 计次2)<br />         超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))<br />         超级列表框1.置标题 (索引, 计次2, 每行分割文本 [计次2])<br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> 超级列表框1.现行选中项 ＝ 0

在这基怎么修改

lisher

筛选重复网址内容剩下保留加到超级列表框.e (4.74 KB, 下载次数: 4)

2025-5-2 10:54 上传

点击文件名下载附件

补充内容 (2025-5-2 10:54):
写出来没细看啊 你看看对不对吧

yangjie366

cobi 发表于 2025-5-2 09:57
[e=1].版本 2
.支持库 iext

临时组 ＝ 分割文本 (网址组 , “,http://”, )
http前面多了个逗号 肯定报错...........哈哈

小皮卡丘

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
i	整数型
文本	文本型		0
sy	整数型
名称	文本型
网址	文本型

文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
数组_去重复 (文本, )
计次循环首 (取数组成员数 (文本), i)
网址 ＝ 文本_取右边 (文本 [i], “,”, , )
名称 ＝ 文本_取左边 (文本 [i], “,”, , )
sy ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (sy, 0, 名称)
超级列表框1.置标题 (sy, 1, 网址)
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 sy, 整数型<br /> .局部变量 名称, 文本型<br /> .局部变量 网址, 文本型<br /> <br /> 文本 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> 数组_去重复 (文本, )<br /> <br /> .计次循环首 (取数组成员数 (文本), i)<br />     网址 ＝ 文本_取右边 (文本 <i>, “,”, , )<br />     名称 ＝ 文本_取左边 (文本 <i>, “,”, , )<br /> <br />     sy ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (sy, 0, 名称)<br />     超级列表框1.置标题 (sy, 1, 网址)<br /> .计次循环尾 ()

haoren1212

小皮卡丘 发表于 2025-5-2 12:40
[e=0].版本 2
.支持库 iext

刚准备发出来，结果发现你半个小时前就发了

haoren1212

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
元始组	文本型		0
名称	文本型
网址	文本型
i

超级列表框1.全部删除 ()
元始组 ＝ 分割文本 (编辑框1.内容, #换行符, )
数组_去重复 (元始组, )
计次循环首 (取数组成员数 (元始组), i)
名称 ＝ 文本_取左边 (元始组 [i], “,”, , )
网址 ＝ 文本_取右边 (元始组 [i], “,”, , )
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (i － 1, 0, 名称)
超级列表框1.置标题 (i － 1, 1, 网址)
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 元始组, 文本型, , "0"<br /> .局部变量 名称, 文本型<br /> .局部变量 网址, 文本型<br /> .局部变量 i<br /> <br /> 超级列表框1.全部删除 ()<br /> 元始组 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> 数组_去重复 (元始组, )<br /> .计次循环首 (取数组成员数 (元始组), i)<br />     名称 ＝ 文本_取左边 (元始组 <i>, “,”, , )<br />     网址 ＝ 文本_取右边 (元始组 <i>, “,”, , )<br />     超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (i － 1, 0, 名称)<br />     超级列表框1.置标题 (i － 1, 1, 网址)<br /> .计次循环尾 ()

补充内容 (2025-5-2 13:22):
和@小皮卡丘写的一模一样