Windows Scripting Host - How to do this in autoit

[wisem2540]

Here is an example script to return printers. 

Option Explicit
Dim objWMIService, objPrinter, colItems, strComputer

strComputer ="."

Set objWMIService = GetObject("winmgmts:\\" & strComputer &
  "\root\CIMV2")
Set colItems = objWMIService.ExecQuery ("SELECT * FROM Win32_Printer")

' On Error Resume Next
For Each objPrinter In colItems
   Wscript.Echo "DeviceID: " & objPrinter.DeviceID
   Wscript.Echo "Caption: " & objPrinter.Caption
   Wscript.Echo "ServerName: " & objPrinter.ServerName
   Wscript.Echo "ShareName: " & objPrinter.ShareName
   Wscript.Echo "DriverName: " & objPrinter.DriverName
   Wscript.Echo "Default: " & objPrinter.Default
Next

WScript.Quit

Can someone point me in the right direction to accomplish this in autoit?  I cannot seem to locate anything relating to this in the help file.

[BrewManNH]

Here's your example converted to AutoIt's syntax, I left the original script lines in but commented out so you can see the conversion needed, it's actually minimal

;~ Option Explicit
Opt("MustDeclareVars", 1)
;~ Dim $objWMIService, $objPrinter, $colItems, $strComputer
Global $objWMIService, $objPrinter, $colItems, $strComputer
;~ strComputer ="."
$strComputer = "."

;~ Set objWMIService = GetObject("winmgmts:\\" & strComputer &   "\root\CIMV2")
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
;~ Set colItems = objWMIService.ExecQuery ("SELECT * FROM Win32_Printer")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Printer")

;~ ' On Error Resume Next
;~ For Each objPrinter In colItems
For $objPrinter In $colItems
;~    Wscript.Echo "DeviceID: " & $objPrinter.DeviceID
    ConsoleWrite("DeviceID: " & $objPrinter.DeviceIDc & @CRLF)
;~    Wscript.Echo "Caption: " & $objPrinter.Caption
    ConsoleWrite("Caption: " & $objPrinter.Caption & @CRLF)
;~    Wscript.Echo "ServerName: " & $objPrinter.ServerName
    ConsoleWrite("ServerName: " & $objPrinter.ServerName & @CRLF)
;~    Wscript.Echo "ShareName: " & $objPrinter.ShareName
    ConsoleWrite("ShareName: " & $objPrinter.ShareName & @CRLF)
;~    Wscript.Echo "DriverName: " & $objPrinter.DriverName
    ConsoleWrite("DriverName: " & $objPrinter.DriverName & @CRLF)
;~    Wscript.Echo "Default: " & $objPrinter.Default
    ConsoleWrite("Default: " & $objPrinter.Default & @CRLF)
    ConsoleWrite("+++++++++++++++++++++++++++++++++++++++++++++++++++++++" & @CRLF)
Next

;~ WScript.Quit
Exit

[JLogan3o13]

There is also the AutoIt version of ScriptOMatic, which is a good resource for any wmi tasks you may have.

'?do=embed' frameborder='0' data-embedContent>>