关于ADSI的一个问题。对于你不难,对于我现在很难! 求救!
问题如下:
=============================源代码如下:=================================
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<%
myServer = Request.ServerVariables( "SERVER_NAME" )
Response.Write "Server = " & myServer
ADSIPath = "IIS://" & myServer & "/W3SVC/1/ROOT"
Set defaultSite = getObject( ADSIPath )
for each thing in defaultSite
Response.write "<p><b>" & thing.Name & "</b>"
Response.write "<br>" & thing.Class
Response.write "<br>" & thing.Path
next
%>
</BODY>
</HTML>
================================运行结果如下:========================
Server = abc
Microsoft VBScript 运行时错误 错误 '800a0046'
没有权限: 'getObject'
ListVDirs.asp,行13
======================================================================
请问大虾,为什么没有权限,该怎样才有权限?
我用的是win2000 个人版