#include <GuiMenu.au3>
$h = WinGetHandle("[CLASS:Gupta:MDIFrame]")
If @error = 0 Then
   ConsoleWrite("I found the window." & @CRLF)
else
   ConsoleWrite("Not finding the window." & @CRLF)
Endif
Sleep(1000)
; get first level menu
$m1 = _GUICtrlMenu_GetMenu($h)
If $m1 = 0 Then
   ConsoleWrite("I found the no menu items." & @CRLF)
else
   ConsoleWrite("There are menu items." & @CRLF)
Endif
ConsoleWrite(IsHWnd($m1) & @CRLF)
; get all the items
$i1count = _GUICtrlMenu_GetItemCount($m1)
ConsoleWrite("Found " & $i1count & " items " & @CRLF)
For $i1 = 0 To $i1count-1
    ConsoleWrite('[' & _GUICtrlMenu_GetItemText($m1,$i1) & ']' & @CRLF)
    $m2 = _GUICtrlMenu_GetItemSubMenu($m1,$i1)
    $i2count = _GUICtrlMenu_GetItemCount($m2)
    For $i2 = 0 To $i2count-1
        ConsoleWrite(@TAB & '[' & _GUICtrlMenu_GetItemText($m2,$i2) & ']' & @CRLF)
        $m3 = _GUICtrlMenu_GetItemSubMenu($m2,$i2)
        $i3count = _GUICtrlMenu_GetItemCount($m3)
        For $i3 = 0 To $i3count-1
            ConsoleWrite(@TAB & @TAB & '[' & _GUICtrlMenu_GetItemText($m3,$i3) & ']' & @CRLF)
            $m4 = _GUICtrlMenu_GetItemSubMenu($m3,$i3)
            $i4count = _GUICtrlMenu_GetItemCount($m4)
            For $i4 = 0 To $i4count-1
                ConsoleWrite(@TAB & @TAB & @TAB & '[' & _GUICtrlMenu_GetItemText($m4,$i4) & ']' & @CRLF)
            Next
        Next
    Next
Next