thwillert / ffau3 Goto Github PK

V0.6.0.1b-15 (by Danp2)
- Fixed: Restored declaration of return variable in _FFCmd
- Fixed: SelectWin check of individual tabs by Title

V0.6.0.1b-14 (by Danp2)
- Changed: _FFWindowOpen to allow private browsing
- Changed: _FFWindowGetHandle to improve functionality
- Fixed: _FFTableWriteToArray
- Fixed: __FFStartProcess
- Fixed: __FFWaitForRepl

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