$hFile = FileOpen(@ScriptDir & '\FileOpen.au3', 0)

; Проверяет, является ли файл открытым, перед тем как использовать функции чтения/записи в файл
If $hFile = -1 Then
	MsgBox(4096, "Ошибка", "Невозможно открыть файл.")
	Exit
EndIf

; Читает по 5 символов за каждый шаг цикла, пока не будет достигнут конец файла EOF
While 1
	$sChars = FileRead($hFile, 5)
	If @error = -1 Then ExitLoop

	If MsgBox(1, "Прочитанный символ:", $sChars) = 2 Then ExitLoop
WEnd

FileClose($hFile)