[SyDr]

Ээээ... Практически ничего не понятно мне из этого. Возможно, догадался я в чём смысл, а возможно и не догадался:

Код:

$ExpToSearch = "число\s(\d*)\sпомогите"
$SearchIn = FileRead("File.txt")
$array = StringRegExp($SearchIn, $ExpToSearch, 3)

For $i = 0 To Ubound($array) - 1
	MsgBox(4096, "Number Is", $array[$i])
Next