关于WEBBROWSER超难问题,请高手帮手,顶着有分

shanlisong 2005-11-29 09:48:01
1:在页面有分帧的情况,我想得到具体其中一个帧的对象,并读取帧的源代码。
2:控制帧对象的刷新时间,每一次刷新,就读取一次帧页面的源代码
...全文
208 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
蒋晟 2006-03-26
  • 打赏
  • 举报
回复
12:处理DocumentComplete事件就可以了。在sender参数不等于浏览器本身的情况下,sender参数就是框架对象(注意会有多层框架的情况)。查询其IWebBrowser2接口就可以访问文档

示例代码
http://support.microsoft.com/kb/q180366/
province_ 2006-03-25
  • 打赏
  • 举报
回复
FRAMES集合就包含了页面里全部框架对象,比较简单的,很多论坛的UPLOAD就是上传文件保存后把文件名返回给父页面的,道理差不多。
lober0000 2006-03-25
  • 打赏
  • 举报
回复
不懂
十月鹰飞 2006-03-25
  • 打赏
  • 举报
回复
看主框架的源代码,从源代码中可以得到指定子框架的页面位置。然后再找一个WEBBROWSER来NAVIGATE一下,再读一下源代吗就OK了吧
supergreenbean 2006-03-24
  • 打赏
  • 举报
回复
Private Sub Form_Load()
WebBrowser1.Navigate2 "http://www.lib.tsinghua.edu.cn/chinese/INTERNET/HTML/Normal/frame/target01.html"
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim oDoc As HTMLDocument
Set oDoc = pDisp.Document

Dim cnt As Long
cnt = oDoc.frames.length

Debug.Print "document ok!"

Dim i As Long

If cnt > 0 Then
Dim oFrame As HTMLWindow2
Dim oSubDoc As HTMLDocument

For i = 0 To cnt - 1
Set oFrame = oDoc.frames.Item(i)
Set oSubDoc = oFrame.Document
Debug.Print "框架" & CStr(i) & " 内容地址:" & oSubDoc.URL

'重新刷新框架内容
oFrame.location = oFrame.location
Next
End If
End Sub
ZOU_SEAFARER 2006-03-24
  • 打赏
  • 举报
回复
好难呀!
shanlisong 2005-11-29
  • 打赏
  • 举报
回复
大虾们帮忙呀!!

1,453

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧