Jump to content
Sign in to follow this  
Jochem

wmi and lpt prt

Recommended Posts

Jochem

I am trying to get information about the parallel port of the computers in a network, but I only get an empty array back. Does anyone has an idea about it.

finally I want to see whats inside the lpt port.

#include-once
#include <Array.au3>
#include <String.au3>
 
If Not(IsDeclared("$cI_CompName")) Then
Global $cI_CompName = @ComputerName
EndIf
Global $wbemFlagReturnImmediately = 0x10, $wbemFlagForwardOnly = 0x20
 
_ComputerGetLPT($cI_CompName)
 
Func _ComputerGetLPT(ByRef $aLptconfig)
Local $colItems, $objWMIService, $objItem
$objWMIService = ObjGet("winmgmts:\\" & $cI_Compname & "\root\CIMV2")
If IsObj($objWMIService) Then
$colItems = $objWMIService.ExecQuery("SELECT * Win32_ParallelPort", "CIM_ParallelController", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If IsObj($colItems) Then
_ArrayDisplay($colItems)
MsgBox(4160, "Information", _ArrayToString($colItems,@tab ))
Else
ConsoleWrite("$colItemsisnt an object"  & @crlf)
EndIf
Else
ConsoleWrite("$objWMIService isnt an object" & @crlf)
EndIf
EndFunc

Share this post


Link to post
Share on other sites
water

Please have a look at the tool. It generates AutoIt code to query WMI for you.


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.