前两天我看到一个程序,他可以利用百度来自动搜索邮件地址,比如输入‘建筑业’,就好象利用百度把所有关于关键字是‘建筑业’的email都搜索出来了,delphi能作

  • 主题发起人 主题发起人 苦命的人
  • 开始时间 开始时间

苦命的人

Unregistered / Unconfirmed
GUEST, unregistred user!
前两天我看到一个程序,他可以利用百度来自动搜索邮件地址,比如输入‘建筑业’,就好象利用百度把所有关于关键字是‘建筑业’的email都搜索出来了,delphi能作到吗?(200分)<br />前两天我看到一个程序,他可以利用百度来自动搜索邮件地址,比如输入‘建筑业’,就好象利用百度把所有关于关键字是‘建筑业’的email都搜索出来了,delphi能作到吗?
 
delphi能作到吗?答案是:能作到!
delphi该怎样作?在网上可以找到 VC 和 VB 的源代码,修改修改就行。
 
难道没有现成的吗?
 
当然可以了
你搜索"正则表达式"
有控件
 
看的头都大了,也没找到答案.还请大家 帮忙啊?
 
不要告诉我你要spam
 
直接用shellexecute
 
还是不明白。
 
希望有经验的人来说说!!
 
这个问题我正关注!!
完整的例子????
 
自己用个http client 向 http://www.baidu.com 提交 post 关键词。然后,返回的html就看你分析了。
 
自己用个http client 向 http://www.baidu.com 提交 post 关键词

天哪,三代坦克大侠,怎么做啊?
 
这没什么难的,上回我拖csdn的文档中心的资料也就差不多是这样做的啊,
10分钟可以搞定主要代码,不过拖回来的资料要分析,那就看html的结构了.
 
那个软件叫什么名字
 
delphi 5 demo fastNet http demo
Get example
输入: www1.baidu.com/baidu?word=%BD%A8%D6%FE%D2%B5&amp;cl=3
这个 %BD%A8%D6%FE%D2%B5 是 “建筑业”的url编码 就是中文两个字节拆开了
hex格式表示,前面加个%. 或者你查 urlencode ,肯定有很多的net控件包有这个
函数的。
返回的结果用个控件 httpscan 4.02去分析吧。想干什么就干什么。
 
给你 see see 这个:

&lt;FORM name="f" action="http://www.google.com/search" ID="Form1"&gt;
&lt;tbody&gt;
&lt;tr bgcolor="#ffffff"&gt;
&lt;td class="tdh" bgcolor="#0066CC"&gt;
&lt;div align="center"&gt;&lt;font size="-1"&gt; &lt;input type="hidden" value="zh-CN" name="hl" ID="Hidden1"&gt;
&lt;/font&gt;&lt;input class="stedit" onFocus='this.value='' maxlength="256" name="q" size="20" value="请在这输入查找关键字." ID="Text1"&gt;
&lt;/div&gt;
&lt;font size="-1"&gt;&lt;input type="radio" CHECKED value="" name="lr" ID="Radio1"&gt; &lt;/font&gt;
&lt;font color="#CC9966"&gt;所有&lt;/font&gt;&lt;font size="-1"&gt; &lt;input type="radio" value="lang_zh-CN" name="lr" ID="Radio2"&gt;
&lt;/font&gt;&lt;font color="#CC9966"&gt;简体中文&lt;/font&gt;
&lt;div align="center"&gt;
&lt;input border="0" src="img/searchbutton.gif" type="image" name="btnG" value="Google搜索" alt="Google搜索" width="54" height="19" ID="Image1"&gt;
&lt;input border="0" src="img/searchbutton2.gif" type="image" name="btnI" value="手气不错" alt="手气不错" width="54" height="19" ID="Image2"&gt;
&lt;/div&gt;
&lt;/td&gt;
&lt;/tr&gt;
&lt;tr bgcolor="#ffffff"&gt;
&lt;td class="tdh" bgcolor="#0066CC"&gt;
&lt;div align="center"&gt;&lt;a href="http://www.google.com/advanced_search?hl=zh-CN" target="_blank" title="高级查找"&gt;高
级&lt;/a&gt;&lt;a href="http://www.google.com/preferences?hl=zh-CN" target="_blank" title="使用偏好"&gt;
使用偏好&lt;/a&gt;&lt;a href="http://www.google.com/language_tools?hl=zh-CN" target="_blank" title="语言工具"&gt;
语言工具&lt;/a&gt;&lt;/div&gt;
&lt;/td&gt;
&lt;/tr&gt;
&lt;/tbody&gt;
&lt;/FORM&gt;

效果见:http://dbs.myrice.com/main.htm

 
你把那个程序给我看看,我可以帮你试着做一个,因为我也在做这样的程序!
 
前两天找到这个东西:“网页文本邮件搜索器(源码)”,上网搜一下吧,里面还有个可执行文件,效果还不错。大家可以参考一下,
下载地址忘了
 
到网上搜索一个spider 控件就是干这个的。
 
當然可以做.思路是分柝网頁的html.然后找出e_mail地址.我用vb曾經做過一個.效果還可以
delphi沒做過.
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部