2

次のコードを使用して、VBA でポップアップ ウィンドウを閉じていました。

    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 によるスクリプト エラーが発生します。

これはどのように解決できますか？

4

1 に答える 1

1

私はshdocvwを使用した同様の種類のプロジェクトに取り組んでいました。ここで見つけることができます

これは c# を使用している場合にも役立ちますが、VB に変換できますここをクリック

于 2011-09-22T17:40:54.917 に答える