[已解决]这个网页中的内容用正则怎么提取

卫和谐

回复 44# 3mile


    我是想要28楼代码那种形式,来提取个人的!

3mile

回复 46# 卫和谐
什么意思?二维数组不合意?

#include <INet.au3>
#include <array.au3>

$str=_INetGetSource ( "http://mms.shm.com.cn/smsRegs/2011jc/ListInfo.aspx",False)
$str=BinaryToString($str,4)
;<!--单位人气-->
$array=StringRegExp($str,'(?ms)\<\!--个人人气--\>.*?/table\>',3)
$str=_ArrayToString($array,@CRLF)
$array=StringRegExp($str,'>\h*([\x{4e00}-\x{9fa5}\d]+)<',3)
Local $out_array[UBound($array)/3][2]
Local $out1[UBound($array)/3]
Local $out2[UBound($array)/3]
Local $k=0

For $i=0 to UBound($array)-1 Step 3
        $out_array[$k][0]=$array[$i+1]
        $out_array[$k][1]=$array[$i+2]
        
        $out1[$k]=$array[$i+1]
        $out2[$k]=$array[$i+2]
        $k+=1
Next
_ArrayDisplay($out_array)
_ArrayDisplay($out1)
_ArrayDisplay($out2)

afan

回复 43# 卫和谐


    不明白你为何要分开取，它们都是成对出现的。

id=[^>]+?>\h*(\S{2,4})</a></t

(?s)id=[^>]+?>\h*\S{2,4}</a></t.+?>\h*(\d+票)

lixiaolong

回复 34# afan

没注意那个了...要考虑很多...向您学习！

afan

回复 49# lixiaolong


    的确需要考虑很多，呵呵~ 也向你学习~

卫和谐

感谢AFAN,有时间好好学习一下正则!

xms77

回复 51# 卫和谐
哇，卫兄人气很高啊，这么多高人帮你啊！哈哈，看来你是公务员啊！

Ycxw2008

"哥玩的不是正则,是折腾"
开个玩笑哈^ ^