FirefoxObj, Per utiillzare gli object di firefox

#include-once

; #INDEX# ===========================================================
; Title .........: FirefoxObj
; AutoIt Version : 3.3.6.0
; Language ......: Italiano
; Description ...: Utilizzo degli object di Firefox
; Author(s) .....: Misterx
; ===================================================================

; #CURRENT# =========================================================
;_FirefoxInit
;_FirefoxNavigate
;_FirefoxRefresh
;_FirefoxStop
;_FirefoxLocation
;_FirefoxBack
;_FirefoxNext
;_FirefoxHome
; ===================================================================

; #FUNCTION# ========================================================
; Name...........: _FirefoxInit
; Description ...: Ritorna l'object di Firefox
; Syntax.........: _FirefoxInit()
; Parameters ....: Nessuno
; Return values .: Successo - Ritorna l'object di Firefox
;                  Errore - Ritorna 0
; ===================================================================
Func _FirefoxInit()
       $obj_load = ObjCreate("Mozilla.Browser.1")
       If $obj_load = @error Then
               Return 0
       Else
               Return $obj_load
       EndIf
EndFunc

; #FUNCTION# ========================================================
; Name...........: _FirefoxNavigate
; Description ...: Và all'url desiderato
; Syntax.........: _FirefoxNavigate($obj_load, $_url)
; Parameters ....: L'object di _FirefoxInit e l'url
; Return values .: Errore - Ritorna 0
; ===================================================================
Func _FirefoxNavigate($obj_load, $_url = "about:blank")
       If Not IsObj($obj_load) Then
               Return 0
       EndIf
       $obj_load.Navigate($_url)
EndFunc

; #FUNCTION# ========================================================
; Name...........: _FirefoxRefresh
; Description ...: Refresh della pagina
; Syntax.........: _FirefoxRefresh($obj_load)
; Parameters ....: L'object di _FirefoxInit
; Return values .: Errore - Ritorna 0
; ===================================================================
Func _FirefoxRefresh($obj_load)
       If Not IsObj($obj_load) Then
               Return 0
       EndIf
       $obj_load.Refresh()
EndFunc

; #FUNCTION# ========================================================
; Name...........: _FirefoxStop
; Description ...: Ferma il caricamento di una pagina
; Syntax.........: _FirefoxStop($obj_load)
; Parameters ....: L'object di _FirefoxInit
; Return values .: Errore - Ritorna 0
; ===================================================================
Func _FirefoxStop($obj_load)
       If Not IsObj($obj_load) Then
               Return 0
       EndIf
       $obj_load.Stop()
EndFunc

; #FUNCTION# ========================================================
; Name...........: _FirefoxLocation
; Description ...: Ritorna l'url corrente
; Syntax.........: _FirefoxLocation($obj_load)
; Parameters ....: L'object di _FirefoxInit
; Return values .: Successo - Ritorna l'url
;                                   Errore - Ritorna 0
; ===================================================================
Func _FirefoxLocation($obj_load)
       If Not IsObj($obj_load) Then
               Return 0
       EndIf
       $local = $obj_load.LocationURL()
       Return $local
EndFunc

; #FUNCTION# ========================================================
; Name...........: _FirefoxBack
; Description ...: Torna indietro di una pagina
; Syntax.........: _FirefoxBack($obj_load)
; Parameters ....: L'object di _FirefoxInit
; Return values .: Errore - Ritorna 0
; ===================================================================
Func _FirefoxBack($obj_load)
       If Not IsObj($obj_load) Then
               Return 0
       EndIf
       $obj_load.GoBack()
EndFunc

; #FUNCTION# ========================================================
; Name...........: _FirefoxNext
; Description ...: Và avanti di una pagina
; Syntax.........: _FirefoxNext($obj_load)
; Parameters ....: L'object di _FirefoxInit
; Return values .: Errore - Ritorna 0
; ===================================================================
Func _FirefoxNext($obj_load)
       If Not IsObj($obj_load) Then
               Return 0
       EndIf
       $obj_load.GoForward()
EndFunc

; #FUNCTION# ========================================================
; Name...........: _FirefoxHome
; Description ...: Ritorna alla homepage
; Syntax.........: _FirefoxHome($obj_load)
; Parameters ....: L'object di _FirefoxInit
; Return values .: Errore - Ritorna 0
; ===================================================================
Func _FirefoxHome($obj_load)
       If Not IsObj($obj_load) Then
               Return 0
       EndIf
       $obj_load.GoHome()
EndFunc