VB自动登陆网络站点详解(二):Inet控件与WebBrowser控件配合使用[4]

[入库:2005年8月18日] [更新:2007年3月24日]

本文简介:选择自 lvlvlvlylyly 的 blog

        doevents

    loop

    if combo1.listindex = 1 then

        webbrowser1.navigate url2(combo1.listindex) + c1(combo1.listindex) + "=" + text1.text

    else

        webbrowser1.navigate url2(combo1.listindex)

    end if

end sub

 

大家可以挑选一个自己已经注册过的站点看看效果。

可以看到,登陆成功之后, inetwebbrowser是可以保持住同一个session对话的!不过当我们在webbrowser中显示出来的页面上点击了一个连接之后,请求却不能成功(请读者自己试一下,在登陆成功的站点中任意点击一个与用户相关的连接,弹出来的将是一个“你没有登陆”的页面)。为什么?

本文关键:自动登陆
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top