Updating FFClick to include Click by Text

[LaOrhyUAcMji]

Could this be implemented in the library? Thanks.

`Func _FFClick($sElement, $sMode = "elements", $iIndex = 0, $bLoadWait = True)
Local Const $sFuncName = "_FFClick"

If Not IsInt($iIndex) Then
	SetError(__FFError($sFuncName, $_FF_ERROR_InvalidDataType, "(int) $iIndex: " & $iIndex))
	Return 0
EndIf

If $sMode = Default Then $sMode = "elements"
If $iIndex = Default Then $iIndex = 0

Switch StringLower($sMode)
	Case "elements"
		If StringLeft($sElement, 7) = "OBJECT|" Then $sElement = StringMid($sElement, 8)
	Case "id"
		$sElement = ".getElementById('" & $sElement & "')"
	Case "name"
		$sElement = ".getElementsByName('" & $sElement & "')[" & $iIndex & "]"
	Case "class"
		$sElement = ".getElementsByClassName('" & $sElement & "')[" & $iIndex & "]"
	Case "tag"
		$sElement = ".getElementsByTagName('" & $sElement & "')[" & $iIndex & "]"
	Case "selector"
		$sElement = ".querySelectorAll('" & $sElement & "')[" & $iIndex & "]"
	Case "text"
		$sElement = ".evaluate(""//*[contains(text(), '" & $sElement & "')]"", document, null, XPathResult.FIRST_ORDERED_NODE_TYPE, null).singleNodeValue;"
	Case Else
		SetError(__FFError($sFuncName, $_FF_ERROR_InvalidValue, "(elements|id|name|class|tag) $sMode: " & $sMode))
		Return 0
EndSwitch

If StringLeft($sElement, 1) = "." Then $sElement = "FFau3.WCD" & $sElement

Local $RetVal = _FFCmd("FFau3.simulateEvent(" & $sElement & ",'MouseEvents','click');")
If Not @error And $RetVal <> "_FFCmd_Err" And $RetVal = 1 Then
	Sleep(25)
	If $bLoadWait Then Return _FFLoadWait()
	__FFSetTopDocument()
	Return 1
Else
	SetError(__FFError($sFuncName, $_FF_ERROR_NoMatch, "$sElement: " & $sElement))
	Return 0
EndIf

EndFunc ;==>_FFClick`