'卡号归属地</TD>(?s)(.[^>]*)>(.[^<]*)(.*)' & _
'卡 类 型</TD>(?s)(.[^>]*)>(.[^<]*)(.*)' & _
'区 号</TD>(?s)(.[^>]*)>(.[^<]*)(.*)' & _
'邮 编</TD>(?s)(.[^>]*)>(.[^<]*)', 3)
If Not @error Then
$telinfo = $phoNo
$telinfo = StringReplace($phoNo," "," ")
$telinfo = $phoNo
$telinfo = $phoNo
$telinfo = $phoNo
$telinfo = 5
就这看不懂 谢谢,学习一下
页:
1
[2]