From: Jelmer Vernooij <jelmer@samba.org>
Date: Tue, 12 Apr 2005 01:14:54 +0000 (+0000)
Subject: r6306: Add simple WMI client test script
X-Git-Tag: samba-misc-tags/initial-v4-0-unstable~9517
X-Git-Url: http://git.samba.org/?p=samba.git;a=commitdiff_plain;h=690a7d71d8d7c98d2002ab04c289c57ccac835c4;hp=4632b37d0c35c02875264db07f9c4477b3b8e040

r6306: Add simple WMI client test script
---

diff --git a/testprogs/win32/wmi/echoprocessor.vbs b/testprogs/win32/wmi/echoprocessor.vbs
new file mode 100755
index 00000000000..8ce6f7adcd1
--- /dev/null
+++ b/testprogs/win32/wmi/echoprocessor.vbs
@@ -0,0 +1,10 @@
+For Each Host In WScript.Arguments
+	Set WMIservice = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & host & "\root\cimv2")
+
+	Set colsettings = WMIservice.ExecQuery("SELECT * FROM Win32_Processor")
+
+
+	For Each proc In colsettings
+		Wscript.Echo(host & ": " & proc.description)
+	Next
+Next