Jump to content

Zedna

MVPs
  • Posts

    9,903
  • Joined

  • Last visited

  • Days Won

    10

Zedna last won the day on January 14 2024

Zedna had the most liked content!

7 Followers

About Zedna

  • Birthday 10/02/1972

Profile Information

  • Member Title
    AutoIt rulez!
  • Location
    Czech republic

Recent Profile Visitors

6,349 profile views

Zedna's Achievements

  1. Just simple useful improvement to previous script "Color Selector": -> set foreground color of testing label "@@##TEST##@@" to inverse color of its background color: GUICtrlSetBkColor($BTNCOLL, "0X" & $1RH & $1GH & $1BH) GUICtrlSetBkColor($BTNCOLR, "0X" & $2RH & $2GH & $2BH) ;GUICtrlSetColor($BTNCOLR, "0X" & $1RH & $1GH & $1BH) ;GUICtrlSetColor($BTNCOLL, "0X" & $2RH & $2GH & $2BH) GUICtrlSetColor($BTNCOLL, "0X" & Hex(16777215 - Dec($1RH&$1GH&$1BH),6)) ; 16777215 = Dec("FFFFFF") GUICtrlSetColor($BTNCOLR, "0X" & Hex(16777215 - Dec($2RH&$2GH&$2BH),6)) ; 16777215 = Dec("FFFFFF")
  2. Try to use/run _SQLite_ErrMsg() to get potential more detailed error message, typically after _SQLite_Exec().
  3. 1) look at my old topic about Send/ControlSend cripled national characters problem 2) Try to search this forum for "telnet", there are some useful topics about directly calling telnet without Send/ControlSend ...
  4. I wonder that "Sleep" is not the same as "Locked workstation" ...
  5. 1) post your code 2) look here: https://www.autoitscript.com/wiki/FAQ#Why_doesn't_my_script_work_on_a_locked_workstation?
  6. Not tested yours, but you my look at my older probably very similar project "Frame":
  7. Try to search for "powerbuilder" in this forum, there are quite lots of related topics ... https://www.autoitscript.com/forum/search/?q=powerbuilder&quick=1
  8. Try add ControlFocus(): WinWaitActive("Setup - CPGit") ControlFocus("Setup - CPGit","&Next >","TNewButton1") $res = ControlClick("Setup - CPGit","&Next >","TNewButton1") ...
  9. Add COM/OLE error checking to see error description and avoid hard crash ... $objErr = ObjEvent("AutoIt.Error","MyErrFunc") $orionURL = 'http://'&$ipAddress&':5001/' $jsonData = '[{ "request": { "TokenName": "bitCMDGrantEnter", "LaneNumber":"'&$laneNumber&'", "Value": "true"}}]' $oHTTP = ObjCreate("MSXML2.XMLHTTP") $oHTTP.Open("POST", $orionURL, False) $oHTTP.SetRequestHeader("Content-Type", "application/json") $oHTTP.Send($jsonData) ; ----ERRROR RIGHT HERE--------- If @error Then Exit ; ... Func MyErrFunc() MsgBox(48, 'COM Error', $objErr.description) SetError(1) EndFunc
  10. Look here at my CUI progressbar
  11. Based on that I think there was some problem/mistake with BOM (few binary nonvisible bytes at start of files defining UTF coding, BOM is not mandatory for UTF files).
  12. Look at my MouseClickFast & MouseMoveFast maybe it can help you - but no waranty 🙂
  13. Here is my function _TreeView_GetAll() which gets whole content of TreeView control, in this case even from external application: Here you can see how to simply traverse the whole TreeView ... #Include <String.au3> #Include <GuiTreeView.au3> $sAll = _TreeView_GetAll('OLE/COM Object Viewer', '', 'SysTreeView322') FileDelete('treeview_get_all.txt') FileWrite('treeview_get_all.txt', $sAll) ;~ClipPut($sAll) Func _TreeView_GetAll($title, $text, $classNN, $expand = False, $indent = ' ', $bullet = '') ; $bullet = '- ' $hWnd = ControlGetHandle($title, $text, $classNN) $sAll = '' If $expand Then _GUICtrlTreeView_Expand($hWnd) ; Expand All $hItem = _GUICtrlTreeView_GetFirstItem($hWnd) While $hItem <> 0x00000000 $sItem = _GUICtrlTreeView_GetText($hWnd, $hItem) $level = _GUICtrlTreeView_Level($hWnd, $hItem) $sIndent = _StringRepeat($indent, $level) $sAll &= $sIndent & $bullet & $sItem & @CRLF $hItem = _GUICtrlTreeView_GetNext($hWnd, $hItem) WEnd Return $sAll EndFunc
  14. Check the result of WinActivate(), it may return 0 if window is not found ...
×
×
  • Create New...