1.webbroser介绍
该组件是一个浏览器组件,可以显示一个指定地址的网页、设置网页打开时的主页以及对网页进行相关的操作,同时也可以对HTML文件进行剪切、复制、粘贴、删除等操作。该 组件在Internet组件页中,属于TWebbrowser类。 它放在程序当中,可以像操作网页一样操作webbrowser控件。
2.webbrowser有哪些应用
webbrowser目前大多数都是完成自动提交或定时处理某种操作,例如:
1.网页数据采集 ,从别人的论坛里面把帖子采集出来,放到我们的论坛里面,例如火车头采集器;
2.发帖,不断的到百度贴吧或者其他论坛去发帖也称灌水;
3.网购,例如淘宝上限时秒抢之类的;
4.投票,不断的变换IP去投票;
5.抢火车票,不断的刷新火车票,一有票就提示抢购;
6.开发浏览器,像原来的的360,腾讯,搜狗浏览器都是基于IE内核开发出来的;
3.同类控件
1.Indy中的idhttp 特点不可见,使用麻烦,有阻塞,但效率高;
2.ICS跟idhttp差不多
3.TEmbeddedwb第三方控件,跟webbrowser差不多,功能更强大,缺点是没有相关使用说明或资料;
本人目前使用的就是TEmbeddedWB,主要是该控件屏蔽弹窗很牛逼,而且能截获弹出窗口的信息,不管是不是带不带框架的,后续的介绍也都是基于TEmbeddedWB展开,它和webbroser的使用方法都差不多,有区别的会特意注明。
搞了N久的Webbroser,今天终于有心情把它总结出来贡献给大家,希望能帮助到那些使用webbrowser的人们,转载请注明出处,谢谢! 未完待续
delphi如何用webbrowser模拟登录网站?
我们就以如何登录博客园来做示例:
1.要登入一个网站,首先要获取网页的源代码,我们可以通过网页菜单--查看--查看源代码来获取。
2.我们找到登录部分的代码:
<div
id="Heading">登录到博客园 <a
href="/register.aspx?ReturnUrl=http://home.cnblogs.com/"
title="注册成为博客园用户">立即注册</a></div>
<label class="MyLabel">用户名</label>
<div class="line"><input name="tbUserName" type="text"
id="tbUserName" class="Textbox" /> <a
href="/GetUsername.aspx" tabindex="-1"
class="tb_right">找回用户名</a></div>
<span id="Required_UserName" style="color:Red;visibility:hidden;">用户名不能为空</span>
<label class="MyLabel">密码</label>
<div class="line"><input name="tbPassword" type="password"
id="tbPassword" class="Textbox" /> <a href="/GetMyPassword.aspx"
tabindex="-1" class="tb_right">找回密码</a></div>
<span id="Required_Password"
style="color:Red;visibility:hidden;">密码不能为空</span>
<div>
<span class="chk"><input id="chkRemember" type="checkbox"
name="chkRemember" /><label
for="chkRemember">保存密码</label></span><br />
<input type="submit" name="btnLogin" value="登 录"
onclick="javascript:WebForm_DoPostBackWithOptions(new
WebForm_PostBackOptions("btnLogin",
"", true, "", "",
false, false))" id="btnLogin" class="Button" style="margin-top: 8px"
/>
因为这个网页是不含框架的,所以可以直接获取到源代码,如果含有框架的网页,后续会讲到如何获取含框架的网页源代码。
3.加入我们已经有用户了,没有的话可以申请个做测试用,我们登录就是输入账号密码点击登录就可以了。
代码如下:
webbrowser1.OleObject.document.all.item('tbUserName').value := '你的用户名';
webbrowser1.OleObject.document.all.item(tbPassword).value := '你的密码;
webbrowser1.OleObject.document.all.item(chkRemember).Click;
这样一个网站简单的登录就实现了,后面我再介绍更多模拟登录的方法和含有框架的登录方法。
转载请注明出处,谢谢!