delphi如何用webbrowser模拟登录网站？

 

我们就以如何登录来做示例：

 

1.要登入一个网站，首先要获取网页的源代码，我们可以通过网页菜单--查看--查看源代码来获取。

2.我们找到登录部分的代码：

                        <div id="Heading">登录到博客园 &nbsp;<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" />&nbsp;<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="登  录" οnclick="javascript:WebForm_DoPostBackWithOptions(new WebForm_PostBackOptions(&quot;btnLogin&quot;, &quot;&quot;, true, &quot;&quot;, &quot;&quot;, 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;

 

 

 

 

     

 

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

转载请注明出处，谢谢！