Jump to content

Recommended Posts

Posted (edited)

Online

Appear offline

Busy

What I Want My Statue Msn changes each time when click on the buttons of the following script:

#include <GUIConstants.au3>
$Form1 = GUICreate("STATUE CHANGER IN AUTOIT", 160, 138, 193, 125, -1, BitOR($WS_EX_TOOLWINDOW,$WS_EX_WINDOWEDGE))
$Button1 = GUICtrlCreateButton("Online", 40, 16, 75, 25, 0)
$Button2 = GUICtrlCreateButton("Appear offline", 40, 56, 75, 25, 0)
$Button3 = GUICtrlCreateButton("Busy", 40, 96, 75, 25, 0)
GUISetState(@SW_SHOW)
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

Is it possible that - and I want the answer please

and Thanks YOu All

Edited by NewForAutoit
Posted

Did you read what jos has mentioned? We are not going to give you an answer if you just ignore the mods/devs, and countinue to do what they ask you not to do. Wow! Great effort too! You made a GUI! Good job. Congrats.

Posted

This is something I found ages ago, it doesn't do what you want but maybe somebody else will be able to change it to work for what you want.

$Email = InputBox("Email:", "Email:", "", "", 100, 10)
If $Email = "" Then
    MsgBox(0, "Error:", "Input An Email Address")
    Exit
EndIf
$oMessenger = ObjCreate("Messenger.UIAutomation.1")
$Status = $oMessenger.GetContact($Email, $oMessenger.MyServiceId).Status
Switch $Status
    Case 1
        MsgBox(0, "", $Email & " Is Offline")
    Case 2
        MsgBox(0, "", $Email & " Is Online")
    Case 6
        MsgBox(0, "", $Email & " Is Offline")
    Case 10
        MsgBox(0, "", $Email & " Is Busy")
    Case 14
        MsgBox(0, "", $Email & " Will Be Right Back")
    Case 18
        MsgBox(0, "", $Email & " Is Idle")
    Case 34
        MsgBox(0, "", $Email & " Is Away")
    Case 50
        MsgBox(0, "", $Email & " Is On The Phone")
    Case 66
        MsgBox(0, "", $Email & " Is Eating Lunch")
    Case Else
        MsgBox(0, "", $Email & " Is Unknown")
EndSwitch
$oMessenger = ""
My Programs[list][*]Knight Media Player[*]Multiple Desktops[*]Daily Comics[*]Journal[/list]
Posted (edited)

You want the answer...hmm...well...NO!

Do you know why your not getting the answer?

Maybe you should figure that out on your own, fix that, and maybe get some help.

Description... :)

Edited by R6V2

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
×
×
  • Create New...