Хеш вконтакте. - Общие вопросы Delphi

dharma · 03.01.2011, 16:47

Помогите пожалуйста! У меня не парсится hash вконтакте.
Набросал следующий код, но он не работает:

Код:

S:=IdHTTP1.Get(’http://http://vkontakte.ru/’);
hash:=Copy(S, Pos(’hash’, S)+4, 18);

По возможности киньте рабочий код, заранее благодарен!

Valio · 03.01.2011, 16:56

Есть предположения что без "печеньки" запрос перенаправится на страницу авторизации и IdHTTP1.Get(’http://http://vkontakte.ru/’); вернёт не то что ты думаешь. Это надо смотреть код контакта.

MoBLer · 03.01.2011, 17:06

Попробуй вот так

Код:

S:=IdHTTP1.Get('http://vkontakte.ru/');
edit1.Text:=Copy(S, Pos('hash:', S)+7, 18);

dharma · 03.01.2011, 17:12

Цитата:

Сообщение от MoBLer

Попробуй вот так

Код:

S:=IdHTTP1.Get('http://vkontakte.ru/');
edit1.Text:=Copy(S, Pos('hash:', S)+7, 18);

Огромное спасибо! Всё заработало

)

03.01.2011, 16:47	#1
dharma Пользователь Регистрация: 03.01.2011 Сообщений: 13	Хеш вконтакте. Помогите пожалуйста! У меня не парсится hash вконтакте. Набросал следующий код, но он не работает: Код: `S:=IdHTTP1.Get(’http://http://vkontakte.ru/’); hash:=Copy(S, Pos(’hash’, S)+4, 18);` По возможности киньте рабочий код, заранее благодарен!

03.01.2011, 16:56	#2
Valio Сливочное масло Участник клуба Регистрация: 01.01.2011 Сообщений: 1,149	Есть предположения что без "печеньки" запрос перенаправится на страницу авторизации и IdHTTP1.Get(’http://http://vkontakte.ru/’); вернёт не то что ты думаешь. Это надо смотреть код контакта. Сливочное масло Valio - компиляция как по маслу

03.01.2011, 17:06	#3
MoBLer Пользователь Регистрация: 30.12.2010 Сообщений: 91	Попробуй вот так Код: `S:=IdHTTP1.Get('http://vkontakte.ru/'); edit1.Text:=Copy(S, Pos('hash:', S)+7, 18);` Я тебе помог, добавь отзыв))))) Статьи по программированию