Подскажите как вытащить несколько значений со странички.

[vaf]

Добрый день, всех с наступившим, у меня такой вопрос.
Имеется список URL http://kuzneck.info/firm.php?id=107

Нужно вытащить оттуда следующие данные:
1. Автомобили
2. Транспортные услуги
3. ООО Автоколонна № 1178
4. г. Кузнецк ул. Трудовая 1
5. Директор 3-21-50, Гл. Инженер 2-82-71, Гл. Бухгалтер 2-82-71, Диспетчер 3-16-38
Посмотрел через DebugBar, там даже и зацепится не за что
Буду очень благодарен за подсказку.

 

[`p r o x y]

Пример:

$sHtml = BinaryToString(InetRead('http://kuzneck.info/firm.php?id=107'))
If @error Then
	MsgBox(0, 'kuzneck.info', 'Ошибка: '& @error)
Else
	MsgBox(0, 'kuzneck.info', StringRegExpReplace($sHtml, '(?U)(?i)(?s)^.+<table width="90%">.+<td><p><b>(.*)</b></p></td>.+</table>.+$', '\1'))
EndIf

 

[vaf]

а не можешь привести пример StringRegExpReplace для второго значения ? чтобы я мог это все в цикле сделать ? а то дергает только первое значение

 

[madmasles]

vaf
Через IE можно так попробовать:

include <IE.au3>
;#include <Array.au3>

$sMessage = ''
$oIE = _IECreate('http://kuzneck.info/firm.php?id=107')

$oTable = _IETableGetCollection($oIE, 10)
$aTableData = _IETableWriteToArray($oTable)
;ReDim $aTableData[UBound($aTableData)][4]
;_ArrayDisplay($aTableData)
For $i = 0 To 3
	$sMessage &= $aTableData[2][$i] & @CRLF
Next
MsgBox(64, 'Info', $sMessage)
$oLink_1 = _IELinkGetCollection($oIE, 49)
$oLink_2 = _IELinkGetCollection($oIE, 50)
MsgBox(64, 'Links Info', $oLink_1.innertext & ': ' & $oLink_1.href & @CRLF & _
		$oLink_2.innertext & ': ' & $oLink_2.href)
;_IEQuit($oIE)

 

[`p r o x y]

vaf
Это пример, дальше, сами.
Для решений "сделайте все за меня" раздел Стол заказов.

 

[vaf]

madmasles Спасибо, как раз то что нужно, с меня плюсик