Печать

[r35p3ct [?]]

zip-per  [?]

Вот нужная часть

Есть мнение, что это код вы взяли из браузера, а _INetGetSource получает немного другой код.
Видимо IE, как то по особому его преобразует, сам с таким сталкивался.

Код: AutoIt [Выделить]

consolewrite( $sHTMLMAP)
 

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

[zip-per [?]]

r35p3ct
Спасибо за подсказку, поменял функцию, работает. Но результат все равно не могу вытащить.
Все равно разберусь с этой  .
Обязательно отпишусь в чем проблема была!

[r35p3ct [?]]

Лучше покажи, что в консоль записалось(исходник страницы), и думаю решение сразу появится, намного быстрее.

[zip-per [?]]

Код: AutoIt [Выделить]

$sMAP = _INetGetSource("http://www.ххх.ru/me/")
 MsgBox(0, '', $sMAP, 2)

Выводит исходник, но нужные мне сроки не входят на экран.

Тогда дописываю:

Код: AutoIt [Выделить]

$sMAP = _INetGetSource("http://www.ххх.ru/me/")
 MsgBox(0, '', $sMAP, 2)
 $sMAP2 = StringRegExp($sMAP, ".*?title='Вы находитесь в секторе.*?\[Z\](.*?)'><b>\[Z\](.*?)</b>", 3)
 MsgBox(0, "", $sMAP2[0])

Выдает ошибку:

Код: [Выделить]

MsgBox(0, "", $sMAP2[0])
MsgBox(0, "", $sMAP2^ ERROR
Error: Subscript used with non-Array variable.
Пошел юзать гугл в поисках описания этой проблемы, т.к. в справке никакого Array найти не могу. А что за массив ему нужен тоже не понимаю.

 

[r35p3ct [?]]

zip-per  [?]

Выводит исходник, но нужные мне сроки не входят на экран.

Тогда откуда их StringRegExp возьмет то?)))
Код наверно в фрейме...

[madmasles [?]]

zip-per
Сделайте так:

Код: AutoIt [Выделить]

;...
$sMAP = _INetGetSource("http://www.ххх.ru/me/")
FileWrite(@ScriptDir & '\test.txt', $sMAP)

И напишите здесь тот кусок текста из файла test.txt, в котором то, что Вы ищите.

[Garrett [?]]

zip-per
Сделайте следующее.
Откройте (нужную) страницу в браузере, кликните на странице ПКМ далее:
FF -> "Исходный код страницы"
IE -> "Посмотреть HTML-код"
Оpera -> "Исходный код"
Chrome -> "Просмотр кода страницы"
Выделите вес код и сохраните в файл.
Файл прикрепите к посту.

[zip-per [?]]

Garrett
Конечно спс, за столь подробное описание выдергивание исходника, но если бы я не знал как его выдернуть, то тут мне вообще делать нечего было бы   

Выдернул его обычным способом (по методу Garrett  )
То что получил, прикрепил к сообщению.

Кстати, функция

Код: AutoIt [Выделить]

$sMAP = _INetGetSource("http://www.ххх.ru/me/")
 MsgBox(0, '', $sMAP[0])

Выводит на экран то-же самое.

А вот методом madmasles выдал код главной страницы, с формами для входа. Не думаю, что он интересен будет, не стал выкладывать.

P.S. Уважаемые модераторы, я опять накосячил. Закачал файл на файлообменник. Кнопки удалить не нашел. Удалите его пож-та!
http://autoit-script.ru/index.php?action=downloads;sa=view;down=73

[madmasles [?]]

zip-per
У меня с Вашим файлом работают оба варианта:

Код: AutoIt [Выделить]

$sHTMLMAP = FileRead(@ScriptDir & '\map[1].txt')
$aMAP = StringRegExp($sHTMLMAP, "Вы находитесь в секторе \[Z\] (.+)'><b>", 3)
;$aMAP = StringRegExp($sHTMLMAP, "секторе\s?\[Z\]\s?(.+)'>", 3);у меня и так работает
If Not @error Then
    MsgBox(0, @error, $aMAP[0])
Else
    MsgBox(0, 'Error', @error)
EndIf
$sMAP = StringRegExpReplace($sHTMLMAP, "(?s).*?Вы находитесь в секторе \[Z\] (.+)'><b>?.*", '\1')
;$sMAP = StringRegExpReplace($sHTMLMAP, "(?s).*?секторе\s?\[Z\]\s?(.+?)'>?.*", '\1');и так
MsgBox(0, @extended, $sMAP)

[r35p3ct [?]]

OffTopic

_INetGetSource качает видмо страницу с авторизацией
Чтобы получить нужные данные, сначала залогинься, потом передай куки и получишь, то что нужно, это уже другая, менее легкая тема.

[zip-per [?]]

madmasles
У меня тоже с файлом txt сработал. Но вот со страницей IE не хочет, возвращает "1" - нет совпадений.

r35p3ct
Ты чертовски прав!

Код: AutoIt [Выделить]

_IENavigate ($oIE, "http://www.ххх.ru/map.php",1) ;переходим на страницу где будем искать данные, не обязателен, но что бы навеняка удостовериться, что страница доступна
$sMAP = _INetGetSource("http://www.ххх.ru/map.php") ; присваиваем переменной $sMAP код страницы
FileWrite(@ScriptDir & '\test555.txt', $sMAP) ; сохраняем код страницы в файле txt для проверки переменной $sMAP

$sHTMLMAP = StringRegExp($sMAP, "Вы находитесь в секторе \[Z\] (.+)'><b>", 3) ;Присваиваем переменной найденные данные
If Not @error Then
    MsgBox(0, @error, $sHTMLMAP[0])
Else
    MsgBox(0, 'Error', @error)
EndIf

После того как получил ответ "1", полез читать что в test555.txt. А там как раз главная страница с авторизацией. Я ее получал еще и раньше, выше отписывался, но не придал значения. Как же так? Вход я выполнил до запуска скрипта, по моей логике страница где надо производить поиск должна быть доступна, я на нее браузером перехожу. Почему сервер просит куки? И как теперь ему их отправить?

[madmasles [?]]

zip-per,
Если Вы переходите на нужную Вам страницу при помощи _IENavigate(), то, может, лучше и ее текст читать с помощью _IEBodyReadText() или _IEBodyReadHTML()?

[zip-per [?]]

madmasles
Спасибо! Прочитал страницу ту которую надо, но теперь она видоизменилась  не понял почему правда. Прикрепил ее код к сообщению если кому интересно конечно.
Опять испытываю трудности с StringRegExp. Не находит 

Код: AutoIt [Выделить]

_IENavigate ($oIE, "http://www.ххх.ru/map.php",1)
$sMAP = _IEBodyReadHTML($oIE)
FileWrite(@ScriptDir & '\test555.txt', $sMAP)

$sHTMLMAP = StringRegExp($sMAP, "<B>[Z] (.+)</B></A><BR></TD></TR></TBODY></TABLE></TD>", 3) ; Под (.+) ищем "Energy One"

If Not @error Then
    MsgBox(0, @error, $sHTMLMAP[0])
Else
    MsgBox(0, 'Error', @error)
EndIf

[madmasles [?]]

zip-per

Код: AutoIt [Выделить]

$sHTMLMAP = FileRead(@ScriptDir & '\test555.txt')
$aMAP = StringRegExp($sHTMLMAP, 'Вы находитесь в секторе \[Z\] (.+)" href', 3)
;$aMAP = StringRegExp($sHTMLMAP, 'секторе\s?\[Z\]\s?(.+)"\s?href', 3);у меня и так работает
If Not @error Then
    MsgBox(0, @error, $aMAP[0])
Else
    MsgBox(0, 'Error', @error)
EndIf
$sMAP = StringRegExpReplace($sHTMLMAP, '(?s).*?Вы находитесь в секторе \[Z\] (.+?)" href?.*', '\1')
;$sMAP = StringRegExpReplace($sHTMLMAP, '(?s).*?секторе\s?\[Z\]\s?(.+?)"\s?href?.*', '\1');и так
MsgBox(0, @extended, $sMAP)

[zip-per [?]]

 
Ураа!!! Заработало!!!
Уважаемые, всем огромное спасибо за вашу помощь!!!