worfire Posted August 28, 2012 Posted August 28, 2012 hello everyone. I wonder how can I make a script where I indicated an ip of a machine that is inside my network and I identify with that which the User is connected to this machine. is how?
MrMitchell Posted August 28, 2012 Posted August 28, 2012 PSTools psloggedon.exe can do it, not sure how through pure AutoIt, though.http://technet.microsoft.com/en-us/sysinternals/bb897545.aspxpsloggedon.exe -x 1.2.3.4
water Posted August 28, 2012 Posted August 28, 2012 Should be possible using WMI.Google returns scripts like this one. If they work you jsut have to translate them to AutoIt. 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
Moderators JLogan3o13 Posted August 28, 2012 Moderators Posted August 28, 2012 (edited) The script Water points to is actually one of the ones I looked at when doing this for the SCCM front end in my signature. This is the final product that I use; works for machine name or IP: $PC = InputBox("Who's Logged On?", "Please enter the asset tag.") $WMI = ObjGet("winmgmts:{impersonationLevel=impersonate}!\\" & $PC & "\root\cimv2") $colSessions = $WMI.ExecQuery("Select * from Win32_LogonSession Where LogonType = 2") If $colSessions.Count = 0 Then MsgBox(0, "", "No interactive user found" ) Else For $element in $colSessions $colList = $WMI.ExecQuery("Associators of " _ & "{Win32_LogonSession.LogonId=" & $element.LogonId & "} " _ & "Where AssocClass=Win32_LoggedOnUser Role=Dependent" ) For $item in $colList MsgBox(0, "", "User: " & $item.Name) MsgBox(0, "", "FullName: " & $item.FullName) MsgBox(0, "", "Domain: " & $item.Domain) Next Next EndIf Edited February 28, 2013 by JLogan3o13 "Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball How to get your question answered on this forum!
DavidLago Posted February 28, 2013 Posted February 28, 2013 Hello JLogan3o13. The lines seems to make perfect sense, Though, I get this when tryint to run it: C:UsersdavidlDesktopTEST1.au3 (22) : ==> Variable must be of type "Object".: $colSessions = $WMI.ExecQuery("Select * from Win32_LogonSession Where LogonType = 2") $colSessions = $WMI^ ERROR I have no idea what is it about, Can you instruct me?
water Posted February 28, 2013 Posted February 28, 2013 Looks like the editor ate the slashes. Should be:$WMI = ObjGet("winmgmts:{impersonationLevel=impersonate}!\\" & $PC & "\root\cimv2") 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
Moderators JLogan3o13 Posted February 28, 2013 Moderators Posted February 28, 2013 Water is quite right; I have updated my original post. Sorry for the confusion. "Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball How to get your question answered on this forum!
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