qq123123 发表于 2011-4-13 03:54:47

afan 的百度搜索代码，有个正则不会写，或者有更好的方法吗？

本帖最后由 qq123123 于 2011-4-13 14:46 编辑

抱歉，我很少发帖，不知道按到那里，设置了收费。和大家说声抱歉

今天看了 afan的百度搜索代码，学习了一下，在修改了一下，有个正则不会学，希望大家指导！

题目：不停更换关键词，搜索出存在百度的邮箱地址。
比如下面网页搜索出来的地址gailxiaohuihui@sina.com
    ！ kidkaodou0909@sina.com

我使用的方法是:#include <IE.au3>

$oIE = _IECreate ("about:blank",1,0,0,-1);打开网页，可以隐藏IE
_IENavigate ($oIE, "http://www.baidu.com/s?wd="&"爱"&" @sina.com", 1 )

                       
$sText = _IEBodyReadText($oIE)
MsgBox(0,0,$sText)
ClipPut($sText)
                        正则应该怎么写，才能准确的提取上面脚本显示出来的邮箱地址？？？？？？？

kadingxiaodi 发表于 2011-4-13 07:08:25

回帖查看一下，看一下再说

水木子 发表于 2011-4-13 08:05:21

是这样吗？感觉不对！
#include <IE.au3>
#include <Array.au3>

$oIE = _IECreate("about:blank", 1, 0, 0, -1);打开网页，可以隐藏IE
_IENavigate($oIE, "http://www.baidu.com/s?wd=" & "爱" & " @sina.com", 1)

$sText = _IEBodyReadText($oIE)
$aText = StringRegExp($sText, '\w+@\w+\.com', 3)
_ArrayDisplay($aText)

tryhi 发表于 2011-4-13 08:15:08

这是提问帖吗？居然收费？

happytc 发表于 2011-4-13 08:16:13

我朝，你的提问真珍贵呀，不但要隐藏，还要收费！

newuser 发表于 2011-4-13 08:25:41

{:face (229):}回复 1# qq123123

问问题也收费?

大绯狼 发表于 2011-4-13 14:22:41

本来我还有代码的 看见收费 就算了

love5173 发表于 2011-4-13 14:39:11

估计楼主只是想让斑竹看而已，花钱找罪受，我可不干

lxz 发表于 2011-4-14 08:40:07

回帖看一下 .....
页: [1]
查看完整版本: afan 的百度搜索代码，有个正则不会写，或者有更好的方法吗？