Remo1075 Posted October 4, 2009 Posted October 4, 2009 Hi, I would like to start using WMI query alot more but am a novice at getting results back and processing them. I have found some script and changed it slightly for what I need. Now I need to be able to query the results, like if $result = "name domain.com" then msgbox() else other msgbox() Any tips on where to start with WMI and autoit would also be cool. ;$strComputer = InputBox(" Computer Name", "Insert Computername to Query:", @ComputerName) $strComputer ="Localhost" $objWMIService = ObjGet("winmgmts:{impersonationLevel=Impersonate}!\\" & $strComputer & "\root\cimv2") If Not IsObj($objWMIService) Then Exit ;Get Computername $colSYSTEM = $objWMIService.ExecQuery ("SELECT * FROM Win32_Computersystem") For $objSystem in $colSystem ConsoleWrite ($objSystem.Name & " " & $objSystem.Domain & @CRLF) Next ConsoleWrite(@CRLF) exit
Remo1075 Posted October 4, 2009 Author Posted October 4, 2009 Hi, I would like to start using WMI query alot more but am a novice at getting results back and processing them. I have found some script and changed it slightly for what I need. Now I need to be able to query the results, like if $result = "name domain.com" then msgbox() else other msgbox() Any tips on where to start with WMI and autoit would also be cool. ;$strComputer = InputBox(" Computer Name", "Insert Computername to Query:", @ComputerName) $strComputer ="Localhost" $objWMIService = ObjGet("winmgmts:{impersonationLevel=Impersonate}!\\" & $strComputer & "\root\cimv2") If Not IsObj($objWMIService) Then Exit ;Get Computername $colSYSTEM = $objWMIService.ExecQuery ("SELECT * FROM Win32_Computersystem") For $objSystem in $colSystem ConsoleWrite ($objSystem.Name & " " & $objSystem.Domain & @CRLF) Next ConsoleWrite(@CRLF) exit Nevermind I found it out myself, maybe come in usefull for anyone else getting to grips to WMI. $strComputer ="Localhost" $4 = "test.com" $1 = ObjGet("winmgmts:{impersonationLevel=Impersonate}!\\" & $strComputer & "\root\cimv2") If Not IsObj($1) Then Exit ;Get Computername $2 = $1.ExecQuery ("SELECT * FROM Win32_Computersystem") For $3 in $2 $result = ($3.Domain) Next if $result = $4 Then msgbox(0, "", "Welcome to the domain") Else MsgBox(16,"Error", "Something Went Horribly Wrong, Try Again...",3) EndIf
water Posted October 5, 2009 Posted October 5, 2009 Hi,the AutoIt Scriptomatic tools mimics the M$ Scriptomatic tools. It uses a lot of WMI functions and creates the AutoIt code for the queries. Might me a good place to learn WMI or get some ideas. My UDFs and Tutorials: Spoiler UDFs: Active Directory (NEW 2024-07-28 - Version 1.6.3.0) - Download - General Help & Support - Example Scripts - Wiki ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki Task Scheduler (2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs: Excel - Example Scripts - Wiki Word - Wiki Tutorials: ADO - Wiki WebDriver - Wiki
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now