• Home
  • History
  • Annotate
  • Line#
  • Navigate
  • Raw
  • Download
  • only in /asuswrt-rt-n18u-9.0.0.4.380.2695/release/src/router/samba-3.5.8/testprogs/win32/wmi/
1For Each Host In WScript.Arguments
2	Set WMIservice = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & host & "\root\cimv2")
3
4	Set colsettings = WMIservice.ExecQuery("SELECT * FROM Win32_Processor")
5
6
7	For Each proc In colsettings
8		Wscript.Echo(host & ": " & proc.description)
9	Next
10Next
11