AzKay Posted September 24, 2006 Posted September 24, 2006 (edited) CREDITS// Me - For putting it together. w0uter - For making the thread that; zeroZshadow - Posted the $oMessenger = ObjCreate("Messenger.UIAutomation.1") Stuff. WHAT I NEED// Well, Im pretty sure I dont have all the different status's there, So, If you know of one that I dont have up there, Post it Thanks. msnchecker.au3 Edited September 24, 2006 by AzKay # MY LOVE FOR YOU... IS LIKE A TRUCK- #
AzKay Posted September 24, 2006 Author Posted September 24, 2006 (edited) lol doesn't work for mesays my e-mail status is unknownBecause your not meant to check your status, its to check other peoples status.EDIT::Damn, It doesnt tell you if the person blocked you or not though. Edited September 24, 2006 by AzKay # MY LOVE FOR YOU... IS LIKE A TRUCK- #
Koerveter Posted September 25, 2006 Posted September 25, 2006 Doesn't work for me, sorry for asking, do I need anything else then the newest version of autoit, like an addon or something?
user52 Posted December 18, 2006 Posted December 18, 2006 ;object $oMessenger = ObjCreate("Messenger.UIAutomation.1") ;get current user's status $mystatus = $oMessenger.MyStatus() ;get current user's signin name $myname = $oMessenger.MySigninName() ;get status of user $useremail = InputBox("", "Enter email address of a messenger user:", "", "", 100, 10) $userstatus = $oMessenger.GetContact($useremail, $oMessenger.MyServiceId).Status ;display status of current user and chosen user MsgBox(0,"",$myname & "'s current status is: " & GetStatus($mystatus) & @CRLF & $useremail & "'s status is: " & GetStatus($userstatus)) Func GetStatus($status) If $status = 2 Then Return "Online" ElseIf $status = 10 Then Return "Busy" ElseIf $status = 14 Then Return "Be Right Back" ElseIf $status = 34 Then Return "Away" ElseIf $status = 50 Then Return "Phone" ElseIf $status = 66 Then Return "Lunch" ElseIf $status = 6 Then Return "Offline" Else Return "Unknown State" EndIf EndFunc
Skrip Posted December 26, 2006 Posted December 26, 2006 C:\AutoIt3\msnchecker.au3 (7) : ==> Variable must be of type "Object".: $Status = $oMessenger.GetContact($Email, $oMessenger.MyServiceId).Status $Status = $oMessenger^ ERROR What's up 'ere? My versions are up to date. (including beta) [left][sub]We're trapped in the belly of this horrible machine.[/sub][sup]And the machine is bleeding to death...[/sup][sup][/sup][/left]
Impulse08 Posted December 26, 2006 Posted December 26, 2006 Anyway to get this to display for users that are not on your buddy list? I could only get this to work for users I already have on my contact list, users other than that just came up as Unknown. It'd be much more useful if you could use this for non-contacts. -- If the apocalypse comes... beep me.
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