No data returned.

chris.harrod · Jul 3, 2007

I have a simple VBS to return some unless data (as a test) and it
works correctly.

Code:

Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = GetObject("winmgmts:
{impersonationLevel=impersonate}!\\" & "computername" & "\root\SMS
\site_PRI")

SetColmachines = objSWbemServices.ExecQuery("select ResourceID FROM
SMS_R_System")

For Each objMachine In ColMachines
ResourceID = objMachine.ResourceID
wscript.echo ResourceID
Next

However, when I turn it into an ASP I get no results. Can someone
tell me what I'm doing wrong?

Code:

<%@ LANGUAGE=VBSCRIPT %>
<html>
<%
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = GetObject("winmgmts:
{impersonationLevel=impersonate}!\\" & "computername" & "\root\SMS
\site_PRI")

SetColmachines = objSWbemServices.ExecQuery("select ResourceID FROM
SMS_R_System")

For Each objMachine In ColMachines
%> test <%
Next
%>
</html>

Anthony Jones · Jul 3, 2007

I have a simple VBS to return some unless data (as a test) and it
works correctly.

Code:

Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = GetObject("winmgmts:
{impersonationLevel=impersonate}!\\" & "computername" & "\root\SMS
\site_PRI")

SetColmachines = objSWbemServices.ExecQuery("select ResourceID FROM
SMS_R_System")

For Each objMachine In ColMachines
ResourceID = objMachine.ResourceID
wscript.echo ResourceID
Next

However, when I turn it into an ASP I get no results. Can someone
tell me what I'm doing wrong?

Code:

<%@ LANGUAGE=VBSCRIPT %>
<html>
<%
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = GetObject("winmgmts:
{impersonationLevel=impersonate}!\\" & "computername" & "\root\SMS
\site_PRI")

SetColmachines = objSWbemServices.ExecQuery("select ResourceID FROM
SMS_R_System")

For Each objMachine In ColMachines
%> test <%
Next
%>
</html>

Turn off anonymous access and turn on window integrated. Now visit the page
from browser running as the user your original code ran under.

chris.harrod · Jul 3, 2007

I already verified it isn't a permissions issue because I can query
for other things. Some classes in WMI work, some do not.

Mark J. McGinty · Jul 3, 2007

Code:
I have a simple VBS to return some unless data (as a test) and it
works correctly.

Code:

Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator") Set objSWbemServices = GetObject("winmgmts: {impersonationLevel=impersonate}!\\" & "computername" & "\root\SMS \site_PRI") SetColmachines = objSWbemServices.ExecQuery("select ResourceID FROM SMS_R_System") For Each objMachine In ColMachines ResourceID = objMachine.ResourceID wscript.echo ResourceID Next

However, when I turn it into an ASP I get no results. Can someone
tell me what I'm doing wrong?

Other than the html tags and the word 'test' I don't see any output to the
response context, replace wscript.echo with Response.Write.

-Mark

Code:

<%@ LANGUAGE=VBSCRIPT %>
<html>
<%
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = GetObject("winmgmts:
{impersonationLevel=impersonate}!\\" & "computername" & "\root\SMS
\site_PRI")

SetColmachines = objSWbemServices.ExecQuery("select ResourceID FROM
SMS_R_System")

For Each objMachine In ColMachines
%> test <%
Next
%>
</html>

trying to use wmi with asp	2	Feb 25, 2006
Need basic help authenticating remote wmi call from an asp webpage	2	Nov 1, 2007
Stop IIS Service	1	Sep 18, 2004
Authentication Question	1	Mar 17, 2005
terminate named Win32_Process	3	Apr 18, 2005
asp page that query Exchange ldap attributes (Error 70 with External account)	1	Apr 23, 2007
How to trap the event of a new process starting with wmi	7	Jul 6, 2006
Collect Excel Data from Website	5	Apr 30, 2022

No data returned.

chris.harrod

Anthony Jones

chris.harrod

Mark J. McGinty

Ask a Question

Similar Threads

Members online

Forum statistics

Latest Threads