网站首页 网站建设 IT知识 IT知识教程 关于vbs WebBrowser导航问题

关于vbs WebBrowser导航问题

2021-05-22 21:21:03
实际上属于转贴。。呵呵:-)
原始文章来自微软,微软么,是大家的微软嘛!所以稍微修改了一下,帖到这里。
原文的中文地址是:
http://support.microsoft.com/kb/185538/zh-cn
实际上,这个实现就是获取一个接口,还是叫事件吧。。。。更明显,反正我是分不清这些东西的。
DimWithEventsWeb_V1AsSHDocVwCtl.WebBrowser_V1

163的链接一般都是弹出窗口,就用163吧

PrivateSubForm_Load()
SetWeb_V1=WebBrowser1.Object
WebBrowser1.Navigate2"http:///"
EndSub

如果你想知道弹出窗口的URL呢,那就

PrivateSubWeb_V1_NewWindow(ByValURLAsString,_
ByValFlagsAsLong,_
ByValTargetFrameNameAsString,_
PostDataAsVariant,_
ByValHeadersAsString,_
ProcessedAsBoolean)

Processed=False
MsgBoxURL

EndSub

如果你想让弹出窗口在原来的窗体里显示呢,就

PrivateSubWeb_V1_NewWindow(ByValURLAsString,_
ByValFlagsAsLong,_
ByValTargetFrameNameAsString,_
PostDataAsVariant,_
ByValHeadersAsString,_
ProcessedAsBoolean)

Processed=True
WebBrowser1.NavigateURL
EndSub

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。 如涉及版权问题,请提交至online#300.cn邮箱联系删除。

以上产品还未完全满足我的所有需求,在下方提交我的专属需求
我的专属需求:
*手机号:
*验证码:
img
咨询报价
现在咨询
img

在线咨询

建站在线咨询

img

微信咨询

扫一扫添加
动力姐姐微信

img
img

TOP