Delphi 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;




这样一个网站简单的登录就实现了，后面我再介绍更多模拟登录的方法和含有框架的登录方法。

转载请注明出处，谢谢！