Facebook login / chat

[akira2891 3]

Hi, im trying to make a small facebook messenger, but normally that i have problem since im here

How to get all friend and chat with them ? over TCP or UDP ?

And now window is not hidden but in future will be and process too.

Im not so good in explaining things but here is code

expandcollapse popup

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GUIListBox.au3>
#include <IE.au3>

Global $window = _IECreate('https://www.facebook.com/', 0, 0, 1), $Form1, $login, $email, $password, $stayLogged

Local $oWbn = _IEGetObjById($window, "pagelet_welcome_box")

If IsObj($oWbn) = 0 Then
;~  MsgBox(0, '', 'not logged')

    $Form1 = GUICreate("Facebook messenger", 359, 210, 338, 218)
    GUICtrlCreateGroup("", 10, 8, 337, 137)
    GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
    GUICtrlCreateLabel("Email :", 64, 36, 40, 19)
    $email = GUICtrlCreateInput("", 107, 32, 217, 23)
    GUICtrlCreateLabel("Password :", 41, 73, 63, 19)
    $password = GUICtrlCreateInput("", 107, 70, 217, 23, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
    $stayLogged = GUICtrlCreateCheckbox("Stay logged", 107, 104, 97, 17)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $login = GUICtrlCreateButton("Login", 10, 156, 337, 41)
    GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
    GUISetState(@SW_SHOW)

Else
    GUIDelete($Form1)

    ; if already logged in show other form
;~  MsgBox(0, '', 'logged in')
    $Form2 = GUICreate("Facebook Chat", 448, 466, 299, 146)
    $friendlist = GUICtrlCreateList("", 16, 16, 417, 266)
    $chatwindow = GUICtrlCreateList("", 16, 296, 417, 97)
    $text = GUICtrlCreateInput("", 16, 392, 417, 21)
    $sendBtn = GUICtrlCreateButton("Send", 360, 424, 75, 25)
    $logout = GUICtrlCreateButton("Logout", 16, 424, 75, 25)
    GUISetState(@SW_SHOW)

EndIf


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $login
            _checkLogin()
        Case $sendBtn
            _sendMsg()

    EndSwitch
WEnd

; check login
Func _checkLogin()

    If IsObj($oWbn) = 0 Then ; if not logged in

        ; check if empty fields
        If GUICtrlRead($email) == '' Or GUICtrlRead($password) == '' Then
            MsgBox(64, 'Info', 'Please enter email and password')
        Else
            #cs
                - opens hidden internet explorer window
                - opens facebook page
                - get ID's form, email, password, remember me, and submit button
                - set values from GUI
                - submit form
            #ce
            $formID = _IEGetObjById($window, 'login_form')
            $emailID = _IEGetObjById($window, 'email')
            $passID = _IEGetObjById($window, 'pass')
            $rememberID = _IEGetObjById($window, 'persist_box')
            $loginBtnID = _IEGetObjById($window, 'u_0_v')

            _IEFormElementSetValue($emailID, GUICtrlRead($email)) ; set email
            _IEFormElementSetValue($passID, GuictrlRead($password)) ; set password

            ; check for stay logged checkbox
            If GUICtrlRead($stayLogged) = $GUI_CHECKED Then
                _IEFormElementCheckBoxSelect($formID, 'persistent', '', 1, 'byIndex')
                Sleep(1000)
            EndIf

            _IEFormSubmit($formID) ; submit form

        EndIf ;=> login form

    EndIf ;=> if not logged in

EndFunc ;=> check login


; send message
Func _sendMsg()
    GUICtrlSetData($chatwindow, GUICtrlRead($text))
EndFunc

 

Edited September 16, 2015 by akira2891

[javiwhite 15]

Hey Akira2891,

Facebook have tools that can assist you in building your messenger client. The last time I looked into this, they were using a facebook chat API. However a quick search shows that they've depreciated the api, and removed XMPP permissions for the messenger.

At first glance it seems like they're forcing developers to link to their messenger app and integrate with it, as opposed to allowing developers to integrate with it directly. (Notice here).

I'm not trying to discourage you, But the only way I can think of doing this, is to do utilise the Graph API they currently have (Found here); That contains Get requests for retrieving friends lists/ Messages etc... It may actually even be able to handle POST responses for messages; I haven't looked to in depth.

I would suggest reading the documentation on facebook's developer site, head over to W3Schools and school yourself on GET vs POST HTTP requests, and look into HTTP GET/POST requests on the forums here for examples on how to use them within AutoIT, (Example)

what you're trying to achieve is no small task, And I honestly believe that using the API will, although initially be harder to comprehend and implement successfully, would be a much better approach than trying to hide the facebook website in the background, And trying to send messages through the messenger portion of the website.

If you are still considering using a hidden browser window as your approach to this, then i would suggest you use www.messenger.com as this is facebooks website version of it's Messenger app.

Hopefully my ramblings help you, And best of luck.

Javi

[akira2891 3]

I saw they removed API for messenger that day when they shut off their tool, so it will be hard way to get this to work especialy because i didnt worked with facebook API's never.

I have a decent knowledge in php but i will try to make it without php, because for php i need hosting to upload a script with code.

But again i think it's a best way to hide browser in background.

Anyway thanks for your reply.

 

 

 

[guinness 1,465]

Why are you re-inventing the wheel?

[akira2891 3]

Why u ask that ? Is there any working facebook messenger ? For windows

[Jfish 116]

because for php i need hosting to upload a script with code.

Without opinion on the OP ... try XAMMP on your PC for your PHP needs - you don't need hosting to run it ... I use it for all my PHP stuff.

https://www.apachefriends.org/index.html