如何为.NET 6 WPF应用实现COM接口以支持VBScript外部调用？

你的方向完全正确——要让运行中的WPF应用被VBS脚本操控，必须实现进程外COM本地服务器（Local Server），而不是你当前做的进程内组件。下面从.NET 4.7的POC开始，一步步解决问题：

一、修改.NET 4.7 WPF项目，实现进程外COM服务器 #

1. 保留并调整COM接口与类 #

你的ITestCom和TestCom类基础没问题，但要注意：如果要操控WPF UI，所有UI操作必须切换到WPF的UI线程（用Dispatcher）。修改TestCom类如下：

[ComVisible(true)]
[InterfaceType(ComInterfaceType.InterfaceIsDual)]
[Guid("337FF551-2BDA-47B3-B5EE-6DE8171012A2")]
public interface ITestCom
{
    void runtest();
    void UpdateCounter(int increment);
    void ShowStatus(string message);
}

[ComVisible(true)]
[Guid("5615E7EA-6F89-4474-AFD6-2DD4E52996F6")]
[ClassInterface(ClassInterfaceType.None)]
[ProgId("TestCom.Tester")]
public class TestCom : ITestCom
{
    public void runtest()
    {
        Debug.WriteLine("Hello World.");
        // 切换到UI线程更新界面
        Application.Current.Dispatcher.Invoke(() =>
        {
            if (Application.Current.MainWindow is MainWindow mainWindow)
            {
                mainWindow.ShowStatus("Test Complete");
            }
        });
    }

    public void UpdateCounter(int increment)
    {
        Application.Current.Dispatcher.Invoke(() =>
        {
            if (Application.Current.MainWindow is MainWindow mainWindow)
            {
                mainWindow.Counter += increment;
            }
        });
    }

    public void ShowStatus(string message)
    {
        Application.Current.Dispatcher.Invoke(() =>
        {
            if (Application.Current.MainWindow is MainWindow mainWindow)
            {
                mainWindow.StatusMessage = message;
            }
        });
    }
}

2. 添加COM工厂与Win32 API调用 #

进程外COM服务器需要手动注册类对象，供COM运行时激活。首先导入必要的Win32 API，实现IClassFactory接口：

导入Win32函数与定义接口

using System.Runtime.InteropServices;

// COM工厂接口（系统定义的GUID）
[ComImport]
[Guid("00000001-0000-0000-C000-000000000046")]
[InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
public interface IClassFactory
{
    void CreateInstance(IntPtr pUnkOuter, ref Guid riid, out IntPtr ppvObject);
    void LockServer(bool fLock);
}

// Win32 COM函数
public static class ComNative
{
    [DllImport("ole32.dll")]
    public static extern int CoRegisterClassObject(ref Guid rclsid, IClassFactory pUnkServer, uint dwClsContext, uint flags, out uint lpdwRegister);

    [DllImport("ole32.dll")]
    public static extern int CoRevokeClassObject(uint dwRegister);

    [DllImport("ole32.dll")]
    public static extern int CoInitializeEx(IntPtr pvReserved, uint dwCoInit);

    [DllImport("ole32.dll")]
    public static extern void CoUninitialize();

    public const uint CLSCTX_LOCAL_SERVER = 0x4;
    public const uint REGCLS_SINGLEUSE = 0x2; // 每次创建实例启动新进程
    public const uint REGCLS_MULTIPLEUSE = 0x1; // 允许多个客户端连接同一进程
}

实现COM工厂类

[ComVisible(true)]
[Guid("YOUR-NEW-GUID-HERE")] // 生成一个新的GUID（工具->创建GUID）
public class TestComFactory : IClassFactory
{
    public void CreateInstance(IntPtr pUnkOuter, ref Guid riid, out IntPtr ppvObject)
    {
        ppvObject = IntPtr.Zero;

        // 不支持聚合
        if (pUnkOuter != IntPtr.Zero)
        {
            Marshal.ThrowExceptionForHR(-2147221232); // CLASS_E_NOAGGREGATION
        }

        // 创建TestCom实例并返回
        var testCom = new TestCom();
        Marshal.QueryInterface(Marshal.GetIUnknownForObject(testCom), ref riid, out ppvObject);
    }

    public void LockServer(bool fLock)
    {
        // 控制服务器生命周期：锁定时阻止应用退出，解锁时允许退出
        Application.Current.Dispatcher.Invoke(() =>
        {
            if (fLock)
            {
                // 可以增加引用计数
                ((App)Application.Current).ServerLockCount++;
            }
            else
            {
                ((App)Application.Current).ServerLockCount--;
                // 如果引用计数为0，退出应用
                if (((App)Application.Current).ServerLockCount <= 0)
                {
                    Application.Current.Shutdown();
                }
            }
        });
    }
}

3. 在WPF应用启动/退出时处理COM注册 #

修改App.xaml.cs，在启动时注册COM类对象，退出时注销：

public partial class App : Application
{
    private uint _comRegistrationCookie;
    public int ServerLockCount { get; set; } = 0;

    protected override void OnStartup(StartupEventArgs e)
    {
        base.OnStartup(e);

        // 初始化COM（单线程单元，适配WPF UI线程）
        ComNative.CoInitializeEx(IntPtr.Zero, 0); // COINIT_APARTMENTTHREADED

        // 注册COM类对象
        var clsid = typeof(TestCom).GUID;
        var factory = new TestComFactory();
        int result = ComNative.CoRegisterClassObject(ref clsid, factory, ComNative.CLSCTX_LOCAL_SERVER, ComNative.REGCLS_MULTIPLEUSE, out _comRegistrationCookie);
        
        if (result != 0)
        {
            Marshal.ThrowExceptionForHR(result);
        }

        // 显示主窗口（如果不是COM激活启动）
        if (!e.Args.Any(arg => arg.Equals("-Embedding", StringComparison.OrdinalIgnoreCase)))
        {
            MainWindow = new MainWindow();
            MainWindow.Show();
        }
    }

    protected override void OnExit(ExitEventArgs e)
    {
        // 注销COM类对象
        if (_comRegistrationCookie != 0)
        {
            ComNative.CoRevokeClassObject(_comRegistrationCookie);
        }
        ComNative.CoUninitialize();
        base.OnExit(e);
    }
}

4. 手动添加注册表项 #

regasm默认注册的是进程内组件，所以需要手动添加LocalServer32键，告诉COM运行时你的WPF EXE是本地服务器。创建一个.reg文件（替换路径和GUID为你的实际值）：

Windows Registry Editor Version 5.00

; CLSID项
[HKEY_CLASSES_ROOT\CLSID\{5615E7EA-6F89-4474-AFD6-2DD4E52996F6}]
@="TestCom.Tester"

; LocalServer32：指定COM服务器的EXE路径
[HKEY_CLASSES_ROOT\CLSID\{5615E7EA-6F89-4474-AFD6-2DD4E52996F6}\LocalServer32]
@="C:\\Full\\Path\\To\\Your\\WpfApp.exe"
"ServerExecutable"="C:\\Full\\Path\\To\\Your\\WpfApp.exe"

; ProgId映射
[HKEY_CLASSES_ROOT\TestCom.Tester]
@="TestCom.Tester"

[HKEY_CLASSES_ROOT\TestCom.Tester\CLSID]
@="{5615E7EA-6F89-4474-AFD6-2DD4E52996F6}"

双击导入注册表（需要管理员权限）。

5. VBS脚本测试 #

编写VBS脚本，现在运行它会连接到已运行的WPF实例（如果用REGCLS_MULTIPLEUSE），或者启动新实例：

Set comObj = CreateObject("TestCom.Tester")
comObj.runtest()
comObj.UpdateCounter(1)
comObj.ShowStatus("VBS触发状态更新")

二、关键概念解释 #

• 进程外COM服务器：你的WPF应用作为独立进程运行，VBS通过COM的代理/存根机制和它通信——这就是“封送”：把VBS中的参数序列化后传递到WPF进程，执行完再把返回值序列化回传。
• LocalServer32：注册表项是COM运行时的“地址簿”，告诉它某个CLSID对应的对象在哪个EXE里，客户端请求创建对象时，COM会启动该EXE并建立通信通道。
• IClassFactory：COM用来创建对象的标准接口，你需要实现它来返回你的业务类实例，同时通过LockServer控制应用的生命周期（防止客户端还在使用时应用意外退出）。

三、.NET 6.0适配要点 #

.NET 6+在Windows上完全支持COM互操作，步骤和.NET 4.7基本一致，只需注意：

1. 在项目文件（.csproj）中添加<UseWPF>true</UseWPF>确保是WPF项目，无需额外的COM宿主配置（进程外不需要EnableComHosting）。
2. Win32 API导入语法不变，但要确保项目目标框架是net6.0-windows。
3. 避免使用单文件发布（可能导致COM激活失败，如需单文件需额外配置）。

四、UI操控注意事项 #

COM调用默认在后台线程执行，而WPF UI只能在UI线程更新，所以所有UI操作必须通过Application.Current.Dispatcher.Invoke切换到UI线程，否则会抛出跨线程异常。

内容的提问来源于stack exchange，提问作者NiteFiddle