c# - 使用 Shdocvw 访问 Internet Explorer 会导致 UnauthorizedAccessException

Question

我正在开发一个应用程序的一部分，它有一个“查找器”工具，允许用户将查找器拖放到应用程序或 Internet Explorer Web 浏览器上，以便我们的程序可以找到它并执行它需要的操作去做。这部分应用程序在过去几年没有进行任何积极的开发(上次我相信 IE 7 是最新的浏览器)，但它适用于 IE 9 及更低版本。从 IE 10 开始，我们遇到了问题，我特别使用 IE 11。

以下代码定位不同的 Internet 浏览器窗口(包括选项卡)和文件浏览器窗口。我们制作了一个用于额外测试的快速 VB 脚本 -

dim objShell
dim objShellWindows

set objShell = CreateObject("shell.application")
set objShellWindows = objShell.Windows

if (not objShellWindows is nothing) then
WScript.Echo objShellWindows.Count

for each win in objShellWindows
wscript.Echo TypeName(win)
WScript.Echo win.LocationUrl
WScript.Echo win.LocationName
WScript.Echo win.HWND
next

end if

set objShellWindows = nothing
set objShell = nothing

上面的代码将无误地执行，它给出了我们打开的所有选项卡的 URL 和标题栏名称。

下面是我们的 C# 代码。它试图获取主 IE 窗口(而不是选项卡)。 this.Handle 是这个 IE 主窗口的句柄，当用户放下它时，finder 工具会得到它。我们正在尝试遍历打开的窗口并找到用户选择的 Internet Explorer 窗口。这个特定的片段与我们最初的实现略有不同，但最终结果是一样的。一旦它命中 test = window.Item(i)，它就会抛出一个 UnauthorizedAccessException。

 ShellWindows windows = null;
 IWebBrowser2 shellWindow = null;
 IHTMLDocument2 actualDoc = null;

 Type shellApplicationType = Type.GetTypeFromProgID("Shell.Application");
 Shell32.Shell shellInterface = (Shell32.Shell)Activator.CreateInstance(shellApplicationType);
 windows = (ShellWindows)shellInterface.Windows();
 bool found = false;
 for (int i = 0; i < windows.Count; i++)
 {
     try
     {            
         object test;
         try
         {
             test = windows.Item(i); //Exception here
             shellWindow = (IWebBrowser2)test;
         }
         catch
         {
         }
         if (shellWindow != null && (IntPtr)shellWindow.HWND == this.Handle)
         {
            //the rest of the code gets the correct tab from the main IE window

这是我们第一次重新访问程序的这一部分时未经编辑的原始代码。

ShellWindows windows = null;
IWebBrowser2 shellWindow =null;
IHTMLDocument2 actualDoc = null;

windows = new SHDocVw.ShellWindowsClass();
bool found = false;
for (int i = 0; i < windows.Count; i++)
{
     try{
         shellWindow = windows.Item(i) as SHDocVw.IWebBrowser2; //Exception here
         if (shellWindow != null && (IntPtr)shellWindow.HWND == this.Handle)
         {

我还想指出，我尝试了一个遵循此语法的 foreach 循环，而不是 for 循环

foreach(IWebBrowser2 browser in windows)

和

foreach(InternetExplorer browser in windows)

在这些情况下，循环会跳过 IE 窗口。

我查看了 IE 的安全设置。我已禁用增强保护模式并允许跨域。关于这个问题似乎没有很多信息，我们尝试的每一种方法似乎总是以 UnauthorizedAccessException 结束。

编辑:作为对 Hans 回答的回应，我没有在这台机器上运行任何反恶意软件。它是带有最新 SP 和更新(无 Microsoft 安全必需品)的 Windows 7 虚拟机。我尝试在具有类似设置的 32 位计算机上运行该应用程序，但它也失败了。在 IE 11 上测试后，我卸载了 IE 11，重新启动，尝试了 IE 10(它失败了，同样的错误)，卸载了 IE 10，重新启动，尝试了 IE 9，它在没有对系统进行任何其他更改的情况下工作。

这是 Hans 要求的 SSCCE。这段代码实际上可以在我的目标机器上运行。在处理其他需要我注意的任务时，我会在接下来的一两天内回到这篇文章。

我将其构建为 32 位控制台应用程序，并在 64 位计算机上运行。

using System;
using SHDocVw;
using mshtml;

namespace GetBrowserSSCCE
{
    class Program
    {
        static void Main(string[] args)
        {
            ShellWindows windows = null;
            IWebBrowser2 shellWindow = null;

            windows = new SHDocVw.ShellWindowsClass();
            for (int i = 0; i < windows.Count; i++)
            {
                try
                    {
                    shellWindow = windows.Item(i) as SHDocVw.IWebBrowser2;
                    Console.WriteLine(string.Format("Window Found. HWND: {0}\nName: {1}", shellWindow.HWND, shellWindow.Name));
                }
                catch (UnauthorizedAccessException ex)
                {
                    Console.WriteLine("UnauthorizedAccessException caught. Exception Text: " +ex.Message);
                }

            }
            Console.ReadLine();
        }
    }
}

Answer 1

这在您的 C# 程序中失败，但当您从 VBScript 解释器运行它时却没有，这强烈指向环境问题。两者都使用完全相同的 shell 接口(interface)。具体异常(底层错误代码为 0x8007005)以前在互联网上有过报道，但从未被诊断出来。

每当遇到环境问题时，首先应该关注的是计算机上安装的反恶意软件，尤其是与访问权限相关的问题。禁用它并重试。

您应该关注的第二个是与 ShellWindows 相关的怪癖，它不仅枚举 Internet Explorer 窗口，还枚举 Windows Explorer 窗口。您一直在寻找对 IE 的足够访问权限，但这还不够，如果您碰巧打开了一个资源管理器窗口并且 explorer.exe 进程存在访问问题，则此代码也可能会失败。请注意，您的 Activator.CreateInstance() 方法调用不等同于 VBScript 代码，Activator.GetObject() 是。因此，如果这是潜在问题，您的更改实际上会使问题变得更糟。

第三个值得检查的细节是您的流程的细节。默认情况下，您的 VBScript 代码将在启动 64 位版本 Windows 的计算机上的 64 位脚本解释器中运行。但是 C# 项目的默认设置是在 32 位模式下运行。右键单击您的 EXE 项目，属性，构建选项卡并修改平台目标设置，如果看到它，请选中“首选 32 位”复选框。这不是错误代码的解释，但是它会影响反恶意软件入侵的有效性。