#include <IE.au3>

$Url = 'https://vi-vn.facebook.com/'
$User = 'nick điền vào đây   '
$Pwd = 'pass điền vào đây'

$test = _IEAutoLogin($Url, $User, $Pwd)

Func _IEAutoLogin($sUrl, $sUsername, $sPwd)

$oIE = _IECreate($sUrl)
_IEErrorNotify(False)
_IEErrorHandlerRegister()
$oForms = _IEFormGetCollection($oIE)
If @error Then
  Return SetError(1, _IEErrorHandlerDeRegister(), $oIE)
Else
  $Index = 0
  For $oForm In $oForms
  $oFormElements = _IEFormElementGetCollection($oForm)
  If IsObj($oFormElements) Then
    $IndexElement = 0
    For $oElement In $oFormElements
    If $oElement.Type = 'password' Then
      $oPwd = _IEFormElementGetObjByName($oForm, $oElement.Name)
      _IEFormElementSetValue($oPwd, $sPwd)
      For $i = $IndexElement - 1 To 0 Step -1
      $oUser = _IEFormElementGetCollection($oForm, $i)
      If $oUser.Type = 'text' Then
        _IEFormElementSetValue($oUser, $sUsername)
        ExitLoop
      EndIf
      Next
      If $oForm.action <> "0" And Not StringInStr($oForm.action, '.php') Then
      _IEFormSubmit($oForm, 0)
      _IELoadWait($oIE)
      Else  ;click
      For $i = $IndexElement + 1 To $IndexElement + 10
        $oButton = _IEFormElementGetCollection($oForm, $i)
        If $oButton.Type = 'submit' Then
        _IEAction($oButton, "click")
        ExitLoop
        EndIf
      Next
      EndIf
      Return SetExtended(_IEErrorHandlerDeRegister(), $oIE)
    EndIf
    $IndexElement += 1
    Next
  EndIf
  $Index += 1
  Next
EndIf
Return SetError(2, _IEErrorHandlerDeRegister(), $oIE)
EndFunc