Помогите разбить текст на массивы
есть файл с таблицами как можно разбить файл чтобы каждая таблица была в массиве
есть файл с таблицами как можно разбить файл чтобы каждая таблица была в массиве
Код:
#include <Date.au3>
#include <ScreenCapture.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>
#include <StringConstants.au3>
$folder = FileOpenDialog('Add File', @DesktopDir, 'All Files (*.txt)', 0)
;GUICtrlSetData($Input2, $folder)
$hFile = FileOpen($folder, 0)
$text = FileRead($hFile)
FileClose($hFile)
If $hFile = -1 Then
MsgBox(4096, "??????", "?????????? ??????? ????.")
Exit
EndIf
ConsoleWrite($text)
;~ $sPatern = '(?si)Ring On(.+?)3Sigma'
;~ $aRezFull = StringRegExp($text, $sPatern, 3)
;~ _ArrayDisplay($aRezClear)
;$ret = StringRegExp($text, '(?s)Ring"">(.*?)Ring', 3)
;$sPattern = 'Ring(.+?)Ring'
;ConsoleWrite($ret)
; _ArrayDisplay($ret)