使用shdocvw關閉彈出窗口？

我以前使用下面的代碼以關閉VBA彈出窗口：使用shdocvw關閉彈出窗口？

Dim k As New shdocvw.ShellWindows ' close menu window 
    Dim c As WebBrowser 
    For Each c In k 
    If c.LocationURL = "http://specificsite.com/x.html" Then c.Quit() 
    Next

你可以看到我要檢查是否彈出打開，然後將其關閉。

我已經遷移到VB.NET e2010，它不起作用。

我發現如何處理事件並使用NewWindow取消彈出窗口的打開。

不幸的是，通過取消打開它後關閉，它會導致主頁面上的JavaScript腳本錯誤。

這怎麼解決？

來源

2011-09-22 Paulo Bueno

我是工作在類似類型的項目，我用SHDOCVW你可以找到它here

你也可以發現這個有用的，這是使用C＃，但你可以把它轉換成VB點擊Here

來源

2011-09-22 17:40:54

兩者似乎的如我所說的使用NewWindow事件，不應該使用，因爲'主'頁面基於彈出窗口給出一個錯誤消息觸發jscript，至於IE是IE，我不能讓沉默。 –

使用shdocvw關閉彈出窗口？

回答

相關問題