一个违章查询程程序.获取到源码里的文本写到超级列表框内

speakai

求高手把左面的违章信息 写到右面超级列表框呢
最好不要正则,看不懂
违章.rar (1.47 KB, 下载次数: 23)

2013-6-18 21:45 上传

点击文件名下载附件


补充内容 (2013-6-18 21:53):
本人超级菜鸟 真的看不懂正则

Hoibben

speakai 发表于 2013-6-18 21:57
大哥 就要个列子 没必要上程序集吧
这个例子写出来 我就能参照例子写了

[e]
.版本 2
.支持库 EThread
.支持库 iext

.子程序 __启动窗口_创建完毕

启动线程 (&子程序1, , )

.子程序 子程序1
.局部变量 a, 文本型, , "0"
.局部变量 p
.局部变量 r

a ＝ 分割文本 (编辑框1.内容, “<tr onMouseOver=”, )
.计次循环首 (取数组成员数 (a), p)
    处理事件 ()
    r ＝ 超级列表框1.插入表项 (, 到文本 (超级列表框1.取表项数 () ＋ 1), , , , )
    超级列表框1.置标题 (r, 1, 文本_取出中间文本 (a [p], “<td align=” ＋ #引号 ＋ “center” ＋ #引号 ＋ “ >”, “</td>”))
    超级列表框1.置标题 (r, 2, 文本_取出中间文本 (a [p], “<td>”, “</td>”))
    超级列表框1.置标题 (r, 3, 文本_取出中间文本 (a [p], “color:#800080;” ＋ #引号 ＋ “ >”, “</a></td>”))
.计次循环尾 ()

[/e]

直接复制进去，用到精易模块，最佳你懂的。。。

Hoibben

放着简洁高效的正则不用，我很想说去年买了表。。。。@‘一叶知秋 @晓易 @默默` @浅浅` @小岩锅锅 @陈小胖 @江世孝  

小布°

吓尿我了 下载一看 只有排版 没有程序集 这要怎么改

speakai

Hoibben 发表于 2013-6-18 21:54
放着简洁高效的正则不用，我很想说去年买了表。。。。@‘一叶知秋 @晓易 @默默` @浅浅` @小岩锅锅 ...

你去年买了个表?

speakai

禁止IP 发表于 2013-6-18 21:55
吓尿我了 下载一看 只有排版 没有程序集 这要怎么改

大哥 就要个列子 没必要上程序集吧
这个例子写出来 我就能参照例子写了

iphone

- -发全部网页源码文本

宇智波·泉奈

speakai 发表于 2013-6-18 21:55
你去年买了个表?

你只要跟他说啥表，完全秒杀他，信不信！

Hoibben

江世孝 发表于 2013-6-19 01:03
你只要跟他说啥表，完全秒杀他，信不信！

还是基友懂我，亚麻跌。。。

①嗰亽の菰独

。。。。看视频去啊。。。看好就会了。