老马求助！

everyone · 发表于 2009-7-23 20:26:11

我需要做一个东西，让所弹出来的窗口转到webbrowser 控件中 现在遇到的问题特别的奇怪，
 
不管是不是用数组（因为可能要弹出多个页，所以要开控件数组）都会有一个实时错误 -1(ffffffff)  网上根本没有这种错误可查，用on error resume next 也没用，问是什么原因非要出这种错误不可？有没有办法实现我想要的功能？ 
rivate Sub Command1_Click() W1.Navigate 一个有弹出的页面 End Sub 
Private Sub W1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Set ppDisp = W2.Object 
End Sub 
运行，一两次还不会有这种错误一般6次以上就肯定会有这种莫名其秒的错误我实在是想不通原因，可我还非常需要这种功能，告诉我，我应该怎么办？

马大哈 · 发表于 2009-7-24 22:30:09

代码发我邮箱里吧,在资料里面.
 
我的QQ满了.

everyone · 发表于 2009-7-24 13:49:28

这种情况只出现了ide下，生成后就没有了，但还有新的问题，就是会无端的失效，而直接弹出来IE窗口，运行时间越长越出，还不是每次都出，无法预知，所以我想把完整的代码给你，加我Q行不行。我的Q8611307
 
另外，这样不行！<a href=#this onclick="window.open('http://www.m5home.com/','','width=300,height=200,resizable=no');">打开窗口</a>
 
要这样，<script>window.open("http://www.m5home.com/");</script> 每次都弹出来才行而且这只是弹一个的情况，我需要处理弹更多的情况，而不让它弹出来，但却起到了弹的作用。有办法吗？

[此贴子已经被作者于2009-7-24 13:55:01编辑过]

马大哈 · 发表于 2009-7-24 02:35:39

我这里没有出现你所说的情况.
 
<div class="msgheader">QUOTE:</div><div class="msgborder">我的测试代码(窗体中放入两个WebBrowser控件)： 

Option Explicit
Private Sub Form_Load()     WebBrowser1.Navigate App.Path & "\1.htm" End Sub
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)     Set ppDisp = WebBrowser2.Object End Sub 


</div>

<div class="msgheader">QUOTE:</div><div class="msgborder">1.htm中的代码： 

<html>
<head> <meta http-equiv="Content-Language" content="zh-cn"> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>新建网页 1</title> </head>
<body>
<a href=#this onclick="window.open('http://www.m5home.com/','','width=300,height=200,resizable=no');">打开窗口</a>
</body>
</html></div>
 
我拼命地点,没有出现过这问题.
 
建议你检查一下你系统中安装的浏览器插件.以前在装了3721的机器上会出现莫名其妙的非法操作.
 
另,我的系统是WIN2003 SP2 + IE6,无任何浏览器插件与安全软件

[此贴子已经被作者于2009-7-24 2:38:18编辑过]

everyone · 发表于 2009-7-28 17:49:44

已经发完几天了，有结果了吗？

账号		自动登录	找回密码
密码			加入我们

老马求助！

论坛牛人

贡献奖

关注奖

最佳版主

进步奖

人气王

疯狂作品奖

精英奖

赞助论坛勋章

乐于助人勋章