analyzing packet help

[kondos]

i have binary packet which i sniffed by this code

$edit = GUICtrlCreateEdit("", 10, 10, 280, 180)
$recv = TCPRecv($socket , 9999)
$binFirst = BinaryMid($recv, 6,4)
If @error Then MsgBox(0, "Ops", "Run proxy and program will close after 3 sec")

If $recv <> "" Then GUICtrlSetData($edit, _
$g_IP & " > " & $binFirst & @CRLF & GUICtrlRead($edit))

i want to print the from byte number 6 to number 10 in $edit

what can i do it's printing most of packet !!!