Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для FlatX007

Ветеран


Сообщения: 553
Благодарности: 87

Профиль | Отправить PM | Цитировать


Я вобщем сам маленько разобрался ... дело в том что нужно выудить КОД из текстового документа в который записан HTML код.
Файл stat.tmp содержит HTML код страницы.

Написал вот что:
Код: Выделить весь код
#include <file.au3>

$nOffset = 1
$Random = Random(100,1000000)
$TempRandom = @TempDir & '\' & $Random
DirCreate($TempRandom)
FileCopy(@TempDir & '\' & "stat.tmp", $TempRandom & '\' & "balanse.txt")
$file = FileOpen($TempRandom & '\' & "balanse.txt",0)
$HTML = FileRead($file)
$f = StringStripWS($HTML, 8)

While 1
$array = StringRegExp($f, '<td><font class=z11 size=-1><b>(.*?)</b></font></td><td><font class=z11 size=-1>', 1, $nOffset)

    If @error = 0 Then
        $nOffset = @extended
    Else
        ExitLoop
    EndIf
    for $i = 0 to UBound($array) - 1
        msgbox(0, "RegExp Test with Option 1 - " & $i, $array[$i])
    Next
WEnd
Вроде $f = StringStripWS($HTML, 8) - это лишнее ..

Что я написал нетак ?? неработает ....

Отправлено: 12:42, 03-05-2009 | #4