VB开发IIS程序的问题(没多少分了，望见谅)

Question

用VB6 sp5开发IIS程序，在运行时，总是显示如下错误信息，请问是怎么回事呢？错误类型：
Server 对象, ASP 0178 (0x800A0005)
检查权限时，对 Server.CreateObject 的调用失败。拒绝对此对象的访问。
/IISTest/WebClass1.ASP, 第 14 行

Answer 1

请注意，此时还没有运行任何个人代码，错误是发生在系统自生成的代码上，WebClass1.asp里的代码如下：
<%
Server.ScriptTimeout=600
Response.Buffer=True
Response.Expires=0If (VarType(Application("~WC~WebClassManager")) = 0) Then
Application.Lock
If (VarType(Application("~WC~WebClassManager")) = 0) Then
Set Application("~WC~WebClassManager") = Server.CreateObject("WebClassRuntime.WebClassManager")
End If
Application.UnLock
End If*!*错误既发生在下一行
Application("~WC~WebClassManager").ProcessNoStateWebClass "IISTest.clsFirst", _
Server, _
Application, _
Session, _
Request, _
Response
%>页面上显示的错误信息是：
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误