asp使用wmi获取本地服务信息不成功

Question

strComputer = "." 
Set objSWbemServices = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") 
Set objSWbemObjectSet = objSWbemServices.ExecQuery("SELECT * FROM Win32_Service",,48) 

For Each objSWbemObject in objSWbemObjectSet
response.Write objSWbemObject.displayname + "
"
response.Write objSWbemObject.state + "
"
Next

输出为空，但在WMICodeCreator.exe里运行是输出成功的

Answer 1

asp权限是否不够。