Leaderboard

Magnifying glasses: on

OMG what an awesome feature

I'm sure that Nine will take as much pleasure as me when reading this

Open a new autoit script, save it, then press F1. Or use the online help: https://www.autoitscript.com/autoit3/docs/

I'll feed you the fish 🙂 #include <Misc.au3> #include <MsgBoxConstants.au3> ;Opt("SendKeyDelay", 0) Local $hDLL = DllOpen("user32.dll") While 1 If _IsPressed("44", $hDLL) Then MsgBox(0,'a',"Press x key") ExitLoop EndIf Sleep(25) WEnd DllClose($hDLL)

Hi Dan, Thanks for your review i noticed my mistake. Here is an improved version of my fonction to get Table content : Func _WD_GetTableContent($sSession, $aElements, $Separator, $ContainHeader = "") Local $BaseElement Local $LineNumber Local $ColNumber Local $i local $j Local $sValue Local $TmpValue Local $StartCell $BaseElement = $aElements $aElements = _WD_FindElement($sSession, $_WD_LOCATOR_ByXPath, $BaseElement & "/tbody/tr", "", True) $LineNumber = UBound($aElements) $aElements = _WD_FindElement($sSession, $_WD_LOCATOR_ByXPath, $BaseElement & "/tbody/tr[1]/td", "", True) $ColNumber = UBound($aElements) Local $sArray = [$LineNumber] $aElements = _WD_FindElement($sSession, $_WD_LOCATOR_ByXPath, $BaseElement & "/tbody/tr/td", "", True) ;~ _ArrayDisplay($aElements) $CellNumber = UBound($aElements) If $ContainHeader = "" Then $StartCell = 0 Else $StartCell = $ColNumber EndIf For $i = $StartCell To $CellNumber - 1 $sElement = $aElements[$i] $TmpValue = _WD_ElementAction($sSession, $sElement, 'Text') $sValue = $sValue & "##" & $TmpValue $j = $j + 1 If $j = $ColNumber Then _ArrayAdd($sArray, $sValue) $sValue = "" $j = "" EndIf Next For $i = 1 To UBound($sArray) - 1 $TmpValue = $sArray[$i] $TmpValue = StringMid($TmpValue, 3) $TmpValue = StringReplace($TmpValue, "##", $Separator) $sArray[$i] = $TmpValue Next Return $sArray EndFunc ;==>_WD_GetTableContent

Looks like it works too! ContinueLoop Case $Button4 PrintMessage("OK4-1") if (1) Then ContinueLoop ;"BREAK CASE" PrintMessage("OK4-2")