[решено] StringRegExp. Вытаскивание повторяющихся кусков кода HTML.

Creat0R · Конфигурация компьютера

Цитата Creat0R:

Слишком общее название темы - такие вопросы появляются часто »

ikif · Отправлено: **20:59, 05-12-2009** | #3

Не выходит.
Пробовал :
$array = StringRegExp($KodHtml, "(?s)<TD><IMG onmouseover(?:\s?)+(.*?)(?:\s?)+</TD>.*" , 1,$nOffset )

$array = StringRegExp($KodHtml, "(?s).*<TD><IMG onmouseover(?:\s?)+(.*?)(?:\s?)+</TD>.*" , 1,$nOffset )

$array = StringRegExp($KodHtml, "(?s).*?<TD><IMG onmouseover(?:\s?)+(.*?)(?:\s?)+</TD>.*" , 1,$nOffset )

Берет первый повтор и всё...

Creat0R · Конфигурация компьютера

Цитата ikif:

Не выходит »

Что не выходит, я не на решение указал, а дал предупреждение за нарушение правил:

http://forum.oszone.net/rules.html

Цитата:

В заголовке темы обязательно обозначайте название предмета, которого касается вопрос, а в теле сообщения максимально подробно опишите проблему (приведите аппаратную/программную конфигурацию, а также изложите ситуацию, в которой возникает проблема). Темы с несодержательными или слишком общими заголовками будут закрываться или переноситься в раздел "Зона тестирования" в зависимости от политики конкретного форума.

ikif · Отправлено: **01:21, 06-12-2009** | #5

Подправил.
Мне то понятно что я хочу, поэтому не всегда вижу где что умолчал или не обьяснил.
При первом написании старался описать доступно и подробно, но это с моей колокольни мне так кажется.

Creat0R · Конфигурация компьютера

Цитата ikif:

С этого кода надо выцыпить эти повторы поочереди или массивом.
Каждый из повторов я обозначил разным цветом. »

Что значит "повторы"? Что именно нужно получить на выходе?

Может так:

Код:

$sSource = ClipGet() ;В б.обмена содержится текст странички (исходный код)

$sPattern = '(?s).*?<TD><IMG onmouseover=(.*?)>(?:</A>|)</SPAN>.*?'
$aRet = StringRegExp($sSource, $sPattern, 3)

For $i = 0 To UBound($aRet) -1
    MsgBox(64, 'Title', $aRet[$i])
Next

ikif · Отправлено: **09:58, 06-12-2009** | #7

Огромнейшее спасибо!!!!

Повторы у меня : весь синий кусок текста , это первый повтор. Следующий повтор- весь синий текст и т.д.

Ещё раз извеняюсь , я просто учусь не на русском языке, поэтому трудно иногда выразиться техническим языком.

То что у меня вышло с вашей помощью :

Код:

$sSource = ClipGet() ;В б.обмена содержится текст странички (исходный код)
$nOffset = 2
While 1
	$sPattern = '(?s).*?<TD><IMG onmouseover=(.*?)</TD>.*?'
	$aRet = StringRegExp($sSource , $sPattern, 1, $nOffset)
		If @error = 0 Then
			$nOffset = @extended
		Else
			ExitLoop
		EndIf
	For $i = 0 To UBound($aRet) -1
		MsgBox(64, 'Title', $aRet[$i])
	Next
WEnd

Весь секрет оказался в "?" в конце . Перед <TD> я пробовал ставить "?" , не помогало.

Эти $sPattern основная проблема у меня.
Жаль что тут на форуме нет одной темы с подробным описанием и с множеством примеров (даже в русском help не очень понял , что к чему ).

Ещё раз,раз,раз СПАСИБО

Creat0R · Конфигурация компьютера

Только зачем использовать оффсет и цикл?

Вот тот же результат:

Код:

$sSource = ClipGet() ;В б.обмена содержится текст странички (исходный код)

$sPattern = '(?s).*?<TD><IMG onmouseover=(.*?)</TD>.*?'
$aRet = StringRegExp($sSource, $sPattern, 3)

For $i = 0 To UBound($aRet) -1
    MsgBox(64, 'Title', $aRet[$i])
Next

Цитата ikif:

Жаль что тут на форуме нет одной темы с подробным описанием и с множеством примеров »

Но зато есть поиск (фильтр) - http://forum.oszone.net/forumdisplay...ilter_by=title