webbrowser获取frameset中frame的问题

Blue_Tear 2011-02-08 01:56:57



<frameset rows='1500,*' border='0' framespacing='0' frameborder=0 marginwidth='0' marginheight='0' scrolling="yes">



<frame src='https://221.176.1.140:443/input.php?wlanacip=218.201.153.7&wlanacname=0001.0534.531.00&wlanuserip=111.14.33.15&wlanacssid=&fromlocation=index' name='input' scrolling='yes' marginwidth='0' marginheight='0'> 

</frame> 



<noframes>

<body>

<form name="loginform" action="https://221.176.1.140/wlan/index.php" method="post">



<input  type="hidden" name="wlanacname" value="0001.0534.531.00">

<input  type="hidden" name="wlanuserip" value="111.14.33.15">

<input  type="hidden" name="wlanacssid" value="">

<input  type="hidden" name="actiontype" value="LOGIN">

<input  type="hidden" name="languagetype" value="">

<input  type="hidden" name="logonsessid" value="">

</form>

src =https。。。是一个登陆的页面，如何操作里面的元素，或者怎么才能得到他的document？
我尝试用frames，但找不到。

...全文

362 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

wzhd617 2011-08-19

打赏
举报

[Quote=引用 4 楼 blue_tear 的回复:]

说下吧！原来考虑使用TIdhttp来解决，但是需要考虑的postdata太多，比如主机地址、wlanacname等。所以还是用Twebbrowser来解决，考虑的问题比较少吧。

现在解决了！
Twebbrowser里有一个documentcomplete函数，其中有个参数是IDispatch类型的指针，是一个IWebbrowser对象接口。
简单的意思如下：
if url=你需要的 ……
[/Quote]
哥们具体能给说一下嘛？我也正遇到同样的麻烦！非常感谢，邮箱：274186380@qq.com

Blue_Tear 2011-02-09

打赏
举报

说下吧！原来考虑使用TIdhttp来解决，但是需要考虑的postdata太多，比如主机地址、wlanacname等。所以还是用Twebbrowser来解决，考虑的问题比较少吧。

现在解决了！
Twebbrowser里有一个documentcomplete函数，其中有个参数是IDispatch类型的指针，是一个IWebbrowser对象接口。
简单的意思如下：
if url=你需要的 then
mydoc := (pDisp as IWebbrowser).document; mydoc是全局变量，用于保存document对象。

kye_jufei 2011-02-09

打赏
举报

抓包先看一下xml數據。。。

bdmh 2011-02-08

打赏
举报

你用wpe抓一下包，看看登录时提交的是什么样的数据，那样就可以通过idhttp去，模仿提交了，正确提交后，就返回了那个网页的内容
那个网页估计就是接受你提交的参数，然后去验证

Blue_Tear 2011-02-08

打赏
举报



var

FrameWindow:IHTMLWindow2;

mydoc,mydoc2:IHTMLDocument2;

frame_dispatch :IDispatch ;

begin

   mydoc :=  webBrowser1.Document as  IHTMLDocument2 ;//length为1

   frame_dispatch :=  mydoc.frames.item(0);

   FrameWindow := frame_dispatch as   IHTMLWindow2;

   mydoc2 := FrameWindow.document;//这个值是nil

   Memo1.Lines.Add(mydoc2.body.innerhtml);