|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
17.03.2016, 20:14 | #1 |
Форумчанин
Регистрация: 31.12.2006
Сообщений: 114
|
Многопоточная проверка сайтов
Всем доброго времени суток, хотел бы подсказку от знатоков, хочу сделать многопоточную проверку сайтов методом http, запускаю, в итоге то-ли потоки путаются то ли еще что то.
Код:
|
17.03.2016, 20:38 | #2 |
Старожил
Регистрация: 26.04.2008
Сообщений: 2,689
|
Какая каша? Кашу маслом не испортишь, а потоки синхронизацией не испортишь
Нет гарантий, что в Код:
Код:
Но ещё и сама проверка Код:
А тут точно всё норм? Код:
|
17.03.2016, 21:09 | #3 | |
Форумчанин
Регистрация: 31.12.2006
Сообщений: 114
|
Цитата:
Вот так пробую не выходит Ах да самое интересное, если к ответу серера добавить переменную cur или acc то начинается она с 4, т.к запускаю в 3и потока... т.е получается проверка нижней части списка сайтов ок, сверху не все подхватывает.. предполагаю что это из за количества потоков которые запускаю.. ЗЫ убрал критическую секцию результат тот же что и с ней, т.е КС не выполняет свою функцию.. Код:
Последний раз редактировалось niva622; 17.03.2016 в 22:50. |
|
18.03.2016, 09:59 | #4 |
Форумчанин
Регистрация: 31.12.2006
Сообщений: 114
|
А можно перенести в тему "Работа с сетью в Delphi" А то видимо ответа я не получу еще долго) Спасибо
|
18.03.2016, 10:05 | #5 |
Форумчанин
Регистрация: 02.02.2016
Сообщений: 290
|
Мы просматриваем темы через "новые сообщения". Нам без разницы, где оно размещено, главное что название было адекватное. Поэтому на скорость ответа перемещение ни как не повлияет.
|
18.03.2016, 10:08 | #6 | |||
Старожил
Регистрация: 26.04.2008
Сообщений: 2,689
|
Цитата:
Цитата:
Цитата:
Последний раз редактировалось eoln; 18.03.2016 в 10:10. |
|||
18.03.2016, 10:47 | #7 | ||
Лис
Старожил
Регистрация: 18.09.2015
Сообщений: 2,409
|
Для niva622
Цитата:
О-нашёл:переменная rez - опять таки у вас не локальная. Вот и чехарда с результатом. Надо подумать над её синхронизацией, думаю тут лучше всего использовать SendMessage(). Цитата:
Достаточно много таких серверов которые с временем ответа около 0,5 секунды. Так что выбор тайм-аута зависит от задачи, но 300 мс не чуть не хуже любой другой цифры. Всегда найдётся медленные сервера, которые не успевают ответить. А вообще максимальное время ответа в районе 60 с. Хотя обычный браузер уже через 10 секунд даст отказ. ConnectTimeout надо сделать в 2 раза больше чем ReadTimeout. Так как в TCP используется двух этапное рукопожатие. ReadTimeout=300 ConnectTimeout=600
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
У дзен программиста программа делает то что он хотел, а не то что он написал . Последний раз редактировалось Pavia; 18.03.2016 в 10:56. |
||
18.03.2016, 10:51 | #8 | ||
Форумчанин
Регистрация: 31.12.2006
Сообщений: 114
|
Цитата:
execute private rez:integer; ЗЫ если что то неправильно говорю извините, самоучка.. Цитата:
Еще вопрос а как лучше создать 3и потока ? я делаю это через цикл for.. Последний раз редактировалось niva622; 18.03.2016 в 11:26. |
||
18.03.2016, 22:31 | #9 |
Форумчанин
Регистрация: 31.12.2006
Сообщений: 114
|
Хм ну спустя 2а дня все таки разобрался, вообщем смысл такой, решил выводить не одним списком рабочий/не рабочий, а создать 2а поля, в одно кидать рабочие сервера в другой нерабочие.. Видимо по другому в принципе не возможно, т.к потоки идут кучно.. и и по порядку их разложить не реально... Всем спасибо..
|
18.03.2016, 22:48 | #10 | |
Форумчанин
Регистрация: 02.02.2016
Сообщений: 290
|
Цитата:
Кроме того в вашем коде имеется банально бесполезные вещи. Например Код:
Этот код Код:
Код:
|
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Проверка сайтов на наличие слова на странице | VitProff | Работа с сетью в Delphi | 12 | 11.10.2014 13:02 |
многопоточная сортировка в winapi | Arrioh | Помощь студентам | 0 | 09.06.2013 23:40 |
Многопоточная загрузка | RelictOs | Общие вопросы Delphi | 0 | 04.01.2013 14:52 |
многопоточная сортировка слиянием | gagarin614 | Помощь студентам | 0 | 03.10.2012 16:03 |
Многопоточная программа | kakawkin | Общие вопросы Delphi | 4 | 05.06.2011 00:33 |