hemichallenger Posted May 23, 2014 Share Posted May 23, 2014 Question: Is there a way after you retrieve the enduser logged on. To also go thru AD and retrieve that enduser telephoneNumber aswell? Func _GetConsoleUser() Local $strComputer = GUICtrlRead ($Input1) $ping = Ping($strComputer, 500) If $ping Then GUICtrlSetData($Progress2,"") For $i = 100 To 100 step 1 GUICtrlSetData($Progress2, $i) Sleep(10) Next $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") If Not @error Then $GCU = ObjGet("winmgmts:{impersonationLevel=Impersonate}!\\" & $strComputer & "\root\cimv2") $colUsers = $GCU.ExecQuery ("SELECT * FROM Win32_Computersystem") For $objUser In $colUsers $strAccount = $objUser.UserName If $strAccount <> "" Then msgbox(64, "Username", "Currently logged on user is: " & $objUser.UserName) EndIf Next EndIf Else MsgBox(16, "Error", "Could not locate computer.") EndIf EndFunc _AD_Open() $aProperties = _AD_GetObjectProperties(Row|Col 0|Col 1[@username, "telephoneNumber") _ArrayDisplay($aProperties, "Active Directory Functions - Example 2 - Properties for user '" & @UserName & "'") _AD_Close() Link to comment Share on other sites More sharing options...
water Posted May 23, 2014 Share Posted May 23, 2014 Welcome to AutoIt and the forum! To query AD use my AD UDF. My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
hemichallenger Posted June 2, 2014 Author Share Posted June 2, 2014 Yes but is it possible after pulling information from WMI and getting domainusername $objUser.UserName. To use that information to somehow query AD for the end users telephone? _AD_Open() $aProperties = _AD_GetObjectProperties(Row|Col 0|Col 1[$objUser.UserName, "telephoneNumber") _ArrayDisplay($aProperties, "Active Directory Functions - Example 2 - Properties for user '" & $objUser.UserName & "'") _AD_Close() Link to comment Share on other sites More sharing options...
water Posted June 2, 2014 Share Posted June 2, 2014 (edited) _AD_Open() $aProperties = _AD_GetObjectProperties($objUser.UserName, "telephoneNumber") _ArrayDisplay($aProperties, "Active Directory Functions - Example 2 - Properties for user '" & $objUser.UserName & "'") _AD_Close() Edited June 2, 2014 by water My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
blckpythn Posted June 2, 2014 Share Posted June 2, 2014 #include <AD.au3> _AD_Open() ConsoleWrite(_AD_GetObjectAttribute(@UserName, "telephoneNumber") & @CRLF) _AD_Close() Works for me. Link to comment Share on other sites More sharing options...
hemichallenger Posted June 12, 2014 Author Share Posted June 12, 2014 When you use $objUser.UserName it shows DomainFirstname.Lastname. How can I get it to just diplay Firstname.Lastname? And leave out the Domain part. Link to comment Share on other sites More sharing options...
water Posted June 12, 2014 Share Posted June 12, 2014 Please check function StringSplit. My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
hemichallenger Posted June 12, 2014 Author Share Posted June 12, 2014 Thank you for pointing me in the right direction. I figured it out. Thanks again. Link to comment Share on other sites More sharing options...
water Posted June 12, 2014 Share Posted June 12, 2014 Glad you got it working My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
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