Unable to read text from file

[ChrisL]

This is awful sorry!

#include <string.au3>

$file = FileOPen("DAT62230.4AT",16)
$data = StringReplace(FileRead($file),"00","")
$data= BinaryToString($data)
FileClose($file)
;FileWrite("temp.txt",$data)

$number = StringRegExp($data,"[0-9]{6}[Y]",1)
If IsArray ($number) then $number = StringtrimRight($number[0],1)
$sampleReport = _StringBetween($data,Chr(03) & "…", " ")
If IsArray($sampleReport) then $sampleReport = $sampleReport[0]
$name = _StringBetween($data,"2_"," ¨")
If IsArray($name) then $name = StringtrimLeft($name[0],2)

Msgbox(0,"",$name & @crlf & $sampleReport & @crlf &  $number)