Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.02.2012, 15:28   #1
ivan_90
 
Регистрация: 01.10.2010
Сообщений: 8
Восклицание Определить открытый сайт

Всем привет!
Кто нибудь знает или может быть подскажет, как с помощью delphi определить какой сайт сейчас открыт у пользователя? Т.е. пользователь вышел на сайт, а delphi отобразил что вы зашли на такой-то сайт... В независимости от браузера (Хром, опера...)
Помогите пожалуйста, очень нужно
ivan_90 вне форума Ответить с цитированием
Старый 28.02.2012, 17:48   #2
Кольша
Далеко не
Участник клуба
 
Аватар для Кольша
 
Регистрация: 11.08.2011
Сообщений: 1,512
По умолчанию

ищите как сделать сниффер на делфи а потом переделывайте его
Кольша вне форума Ответить с цитированием
Старый 11.03.2012, 08:46   #3
ivan_90
 
Регистрация: 01.10.2010
Сообщений: 8
Восклицание

Дело в том что сниффер я сделал первым делом... и работает он отлично (правда половину кода пришлось переделать от предложенного)
Беда в том что этот сниффер отлавливает не только открытый сайт, но и ссылки на этот сайт. Т.е. к примеру, мне нужно определить открыт ли у пользователя тот или иной сайт, при его открытии, мне в базу пишется что он открылся (т.е. всё как надо), но если на каком то другом сайте есть реклама на тот сайт, то сниффер тоже это дело отлавливает, а это не есть правильно
ivan_90 вне форума Ответить с цитированием
Старый 11.03.2012, 08:59   #4
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

ну реклама это обычно или картинка или флэш, то есть проверить можно по Content-Type.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 11.03.2012, 17:47   #5
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию

ivan_90 а не выложишь снифер, посмотрю как оно делается
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума Ответить с цитированием
Старый 12.03.2012, 08:56   #6
Aliens_wolfs
Форумчанин
 
Регистрация: 16.12.2009
Сообщений: 902
По умолчанию

Вы в пакете снифера ловите не ссылки Get или Post а Host: и делайте сравнение чтобы одинаковых небыло.
Цитата:
GET /showthread.php?t=189570 HTTP/1.1
User-Agent: Opera/9.80 (Windows NT 5.1; U; MRA 5.9 (build 4876); ru) Presto/2.2.15 Version/10.01
Host: www.programmersforum.ru
Accept-Language: ru-RU,ru;q=0.9,en;q=0.8
Accept-Charset: iso-8859-1, utf-8, utf-16, *;q=0.1
Accept-Encoding: deflate, gzip, x-gzip, identity, *;q=01
Либо фильтруйте чтобы непоказывал .jpg .gif .js .css и т.д.

Пепел Феникса прав, в ответе от сервера по Сontent-type: text/html значит страница, единственно что снифер сложнее получится, т.к. запросы и ответы должны совпадать в очередности

Если вы хотите просто на пользовательском компе смотреть на какие сайты пользователь выходил то почитайте про NetStat через этот модуль видно какие программы делают соединения и можно определить на какие сайты

Последний раз редактировалось Aliens_wolfs; 12.03.2012 в 23:50.
Aliens_wolfs вне форума Ответить с цитированием
Старый 13.03.2012, 09:52   #7
Aliens_wolfs
Форумчанин
 
Регистрация: 16.12.2009
Сообщений: 902
По умолчанию

А вот и пример работы NetStat, программа в таблице показывает протокол, программу, локальный адрес:порт, удаленный адрес:порт, статус подключения и хост подключения, там можно вкл. откл. отображение UDP или TCP и можно все вместе, так же можно вкл. откл. отображение локального адреса, будет показывать только удаленные подкл. Может что то для себя полезное найдете в ней.
Вложения
Тип файла: rar NetStat.rar (228.3 Кб, 36 просмотров)

Последний раз редактировалось Aliens_wolfs; 13.03.2012 в 10:17.
Aliens_wolfs вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перезаписать открытый файл NEoMASTERR Общие вопросы Delphi 3 28.01.2012 08:46
Открытый сокет Fizerator Работа с сетью в Delphi 17 18.01.2012 20:01
Найти открытый документ по части имени vefer Microsoft Office Word 2 09.02.2011 03:18