Custom Query

function ping() does not work on Windows Vista 32 and 64 Bit Version, you can read in this thread its also not working for other people, it always returns 0 instead the correct ping

​http://www.autoitscript.com/forum/index.php?showtopic=75912

$pingtomysite=ping("http://www.google.com", 4000)

with deep tree, _GUICtrlTreeView_Sort does not sort it.

Proposed solution : for detail see post

​https://www.autoitscript.com/forum/topic/192179-solution-proposed-pb-_guictrltreeview_sort-not-sorting-level-1-treeview/

Solution

; #FUNCTION# ====================================================================================================================
; Author ........: Gary Frost (gafrost)
; Modified.......: mlipok, guinness, gillesg
; Ths time optimized ===============================================================================================================================
Func _GUICtrlTreeView_Sort3($hWnd)
    If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

    Local $iItemCount = _GUICtrlTreeView_GetCount($hWnd)
    If $iItemCount Then
        Local $aTreeView[$iItemCount], $i=0
        ; get only A child at each level
        Local $hHandle = _GUICtrlTreeView_GetFirstItem($hWnd)
        $aTreeView[1]=$hHandle
        $aTreeView[0]=2
        __GUICtrlTreeView_SortGetFirstChild($hWnd, $hHandle, $aTreeView )
        redim $aTreeView[$aTreeView[0]]
        $aTreeView[0]=0

        ConsoleWrite(_ArrayToString($aTreeView,@CRLF)&@CRLF)
        for $i =0 to UBound($aTreeView) -1
            _SendMessage($hWnd, $TVM_SORTCHILDREN, 0, $aTreeView[$i], 0, "wparam", "handle") ; Sort the items in root
        NExt
    EndIf

EndFunc   ;==>_GUICtrlTreeView_Sort3

func __GUICtrlTreeView_SortGetFirstChild($hWnd, $hItem, byref $aTreeView)
    Local $hChild = _GUICtrlTreeView_GetFirstChild($hWnd, $hItem)
    if $hChild <> 0 then
        $aTreeView[$aTreeView[0] ]= $hChild
        $aTreeView[0]+=1
        __GUICtrlTreeView_SortGetFirstChild($hWnd,$hChild,$aTreeView)
    EndIf
    local $hNext = _GUICtrlTreeView_GetNextSibling($hWnd, $hItem)
    if $hNext <> 0 then __GUICtrlTreeView_SortGetFirstChild($hWnd,$hnext,$aTreeView)

EndFunc

Hope it help

Example:

Func ABC()
	MsgBox(0, "", "test")
EndFunc

$test = Test
($test)()

This is a problem when using objects:

Func ABC()
	MsgBox(0, "", "test")
EndFunc

$Object = ObjCreate("Scripting.Dictionary")
$Object.Add('ABC', ABC)
($Object.Item('ABC'))()