这是在XP系统的服务器上，为了判断服务器与www.是否网络连通，代码如下：

<%
url = "www.

WMI = "winmgmts:{impersonationLevel=impersonate}"

wqlQuery = "SELECT StatusCode FROM Win32_PingStatus WHERE Address" & _
" = '" & url & "'"

set PingResult = GetObject(WMI).ExecQuery(wqlQuery, "WQL", 48) '总是提示我这句有错误，请高手帮改改（或是对服务器有什么要求，我没有配置对？），谢谢！


Response.write url & " 状态 "
For Each result in PingResult
if clng(result.StatusCode)>0 then
response.write "离线"
else
response.write "在线"
end if
Next
%>

[ 本帖最后由 qb0123126 于 2010-1-5 17:23 编辑 ]

提示的什么错误信息？

可以运行的啊，

应该IIS所用权限不够了.

[ 本帖最后由 icecool 于 2010-1-5 21:37 编辑 ]

错误'80041003'

兄说的怎么加？我不太会，又没有高手，帮我改好了再给我，谢谢啦！2000系统的代码我测试通过了，不知道为什么XP系统就出现问题了，网上关于这段代码的教学很多，有点误人子弟了，呵呵。

还没有解决，顶！