GetObjectContext 在 VB6 COM dll 中不返回任何内容，从经典 ASP 调用

Question

我正在使用 VB6 IDE 调试此 Active X dll。我可以看到执行一直到尝试 GetObjectContext。此方法始终不返回任何内容。

这种情况发生在 Windows 7 32 位、IIS 7 上。（该应用程序在其他位置工作，其中之一是带有 IIS 7 的 Windows Server 2008）

我在 Google 上进行了广泛搜索，发现了许多与 COM+ 相关的参考资料，但没有COM+涉及到我的场景。只是来自注册 dll 的普通旧 Server.CreateObject。

我的 ASP 代码如下

SET objCalendar = Server.CreateObject("SSYSDEV.Calendar")
objCalendar.BuildCalendar("ADMINUSERS")
SET objCalendar = Nothing

DLL 中请求的函数的问题行是：

Dim objHttpRequest As ASPTypeLibrary.Request
Set objHttpRequest = GetObjectContext.Item("Request")

一如既往，我们将不胜感激任何帮助或建议。

我仍然无法克服必须使用 VB6 工作的震惊 - 我从未想过会发生这种情况！这就像被拖回到黑暗时代，以一种非常粗糙的方式引起水泡！

PS 我还设置了一个 COM+ 组件，并让 ASP 以这种方式获取对象，在本例中 GetObjectContext 返回一个空对象，其中没有 ASP 对象。所以这没有帮助:-(

Answer 1

我知道这有点晚了，但我遇到了类似的问题，这为我解决了它：

Thread: Problem accessing Request object via COM+

http://forums.iis.net/t/1146404.aspx

摘要：在 COM+ 组件中启用“允许 IIS 固有属性”。

Answer 2

我发现在 IIS 中使用 VB6 组件的 COM+ 方法有点不稳定。我将其添加到我想要在 ASP 中实例化的 VB6 类中::-

Private moScriptCtx As ScriptingContext

Public Sub OnStartPage(SC As ScriptingContext)

    Set moScriptCtx = SC

End Sub

您现在可以将请求、响应、服务器等作为 moScriptCtx 对象的属性进行访问。

您可能想知道如何调用 OnStartPage。在 CreateObject 执行期间，ASP 不会自动为您执行此操作。