Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Подмена User-Agent (EmbeddedWB)

Автор: dredei 29.8.2010, 13:51

Здравствуйте! Пытаюсь в EmbeddedWB подменить User-Agent так:

Код


UserAgent:='Mozilla/5.0 (Windows NT 5.1; rv:2.0b4) Gecko/20100818 Firefox/4.0b4';
UrlMkSetSessionOption(URLMON_OPTION_USERAGENT, PChar(UserAgent), Length(UserAgent), 0);

, но, при заходе на сайт, User-Agent определяет как "M".
В чем проблема???
Или посоветуйте другой способ.
Заранее Спасибо!

Автор: Proxin 29.8.2010, 16:14

pchar(useragent[1])

Автор: dredei 29.8.2010, 16:44

Ругается:

Автор: AntonN 29.8.2010, 21:16

юникод?

Автор: dredei 29.8.2010, 21:23

Вроде. ДЭлфа 2010.

Автор: Proxin 29.8.2010, 21:44

тогда все pchar нужно заменить на pwidechar.

Автор: dredei 30.8.2010, 10:49

Не помогло мне. Все та же ошибка.

Кстати, как только ставлю User Agent Оперский - сбрасывается на IE.
Я понимаю, что мне не нравиться опера, но это перебор smile

Автор: AntonN 30.8.2010, 11:29

приведи текст к ansi

Автор: zhefran 30.8.2010, 12:09

http://zhefran.blogspot.com/2010/03/embeddedwb-user-agent.html

Написано на украинском, но код я думаю разберете!

Автор: dredei 30.8.2010, 12:24

Цитата(zhefran @ 30.8.2010, 12:09)

Написано на украинском

Я сам из Украины, так что не проблема smile

Но я так уже делал и 2ip определяет как ИЕ6 (да и скрипт, который я на пхп написал, тоже определяет, как ИЕ6). Решил перейти на Инди, там без проблем реферер и UA можно сменить.
П.С. Всем спасибо smile