![]() |
eXeL@B —› Программирование —› Доступ к http://rapidshare.com/ на Delphi |
Посл.ответ | Сообщение |
|
Создано: 02 апреля 2007 22:30 · Личное сообщение · #1 http://rapidshare.com/ Free-Zone / Eigene RapidShare-Ordner erstellen - чтобы создать свою папку Free-Zone / Collector's Zone betreten - чтобы войти в неё после входа в самом верху видим отчёт типа: Hallo, UserName! Du hast bis jetzt XXX Punkte gesammelt. Um Punkte zu sammeln... и т.д. Число XXX меняется в зависимости от того, сколько файлов у тебя из папки скачали Требуется эту число программно считать? Сложность в том, что там SSL.... Видимо надо использовать Indy компоненты, но я с ними никогда не работал... Может кто что-нибудь дельное посоветовать? На других сайтах никто ничего предложить не смог... Но сказали, что реально реализовать... Есть у нас толковые программеры??? ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh ![]() |
|
Создано: 02 апреля 2007 22:52 · Личное сообщение · #2 |
|
Создано: 02 апреля 2007 23:07 · Личное сообщение · #3 |
|
Создано: 03 апреля 2007 08:00 · Личное сообщение · #4 |
|
Создано: 03 апреля 2007 08:58 · Личное сообщение · #5 Isaev пишет: Сложность в том, что там SSL.... Видимо надо использовать Indy компоненты, но я с ними никогда не работал... Сложность возникнет в том, что нужно будет искать dll чтобы работать с HTTPS, если стандартные подойдут, то считай тебе повезло ![]() Vovan666 пишет: Может кто что-нибудь дельное посоветовать? А в принципе в чем сложность то? ... Получаешь https страницу с использованием комнонента TidHTTP в связке с TidSSLIOHandlerSocket потом пишешь анализатор для выдерания нужной инфы и все, ![]() Offtop begin Я в свое время писал программку для получения статистики KErio Winroute Firewall через https, послал GET запрос потом результат ( страница ) записал в переменую, получил нужную информацию и все, Offtop end ![]() |
|
Создано: 03 апреля 2007 21:13 · Личное сообщение · #6 Vovan666 пишет: попробуй спросить на форуме Спасибо, интересный форум... Я по этому поводу с Аффтаром USDownloader'a общался, но к сожалению он чел очень занятой и время лишнего совсем нет... А про форум этот я не знал. ShEriF пишет: Получаешь https страницу с использованием комнонента TidHTTP в связке с TidSSLIOHandlerSocket потом пишешь анализатор для выдерания нужной инфы и все, С анализатором проблем то никаких, а вот по поводу послал GET запрос потом результат ( страница ) по подробнее можно, лучше примерчик чиркани, раз делал уже, наверное совсем не трудно ![]() ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh ![]() |
|
Создано: 04 апреля 2007 07:45 · Личное сообщение · #7 Isaev пишет: а вот по поводу послал GET запрос потом результат ( страница ) по подробнее можно в инете много всего нашел, но както все туманно, обычно просто посылают погуглить, вот нашел пару линкоы: e-dok.narod.ru/delphi/question1/lan/lan-133.html forum.ishodniki.ru/action=printpage;topic=7248.0 forum.ru-board.com/topic.cgi?forum=33&topic=6220 Еще нашел компонент для дельфи HTTPGet 1.94, толком не смотрел, видел только там есть два метода получения - Файл и Строка, вот линка, ковыряй короче: mirror01.jino-net.ru/274476 ----- may all your PUSHes be POPed! ![]() |
|
Создано: 04 апреля 2007 12:00 · Поправил: ShEriF · Личное сообщение · #8 Isaev пишет: а вот по поводу послал GET запрос потом результат ( страница ) по подробнее можно, лучше примерчик чиркани Вот процедурка: procedure TForm1.btn1Click(Sender: TObject); var sResult: string; begin // Получим результат запроса в текстовую пременную sResult := idhttp.Get( 'https://Адрес/' ); // Переменная содержит требуемую страницу ( ее HTML код ), если не было ошибок // сдесь просто вывел содержимое в Мемо поле mmo1.Text := sResult; end; Скачать пример 215 kb http://night-sherif.nm.ru/temp/idHTTP_Simple.rar Смотри могут быть траблы с библиотеками libeay32.dll, ssleay32.dll у меня он почему то подгружает их со 2 попытки ![]() ![]() |
|
Создано: 04 апреля 2007 21:24 · Личное сообщение · #9 |
|
Создано: 04 апреля 2007 22:49 · Личное сообщение · #10 |
|
Создано: 05 апреля 2007 13:25 · Личное сообщение · #11 |
|
Создано: 04 июня 2007 15:39 · Поправил: Isaev · Личное сообщение · #12 |
|
Создано: 04 июня 2007 23:21 · Личное сообщение · #13 Пример в аттаче (4Kb) ![]() ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh ![]() |
|
Создано: 23 июня 2007 17:10 · Личное сообщение · #14 |
|
Создано: 23 июня 2007 19:34 · Личное сообщение · #15 |
|
Создано: 24 июня 2007 19:18 · Личное сообщение · #16 Guru_eXe пишет: показывай че накодил Собственно говоря интересен был сам факт (достучаться), а кодить можно теперь чего угодно ![]() ![]() ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh ![]() |
|
Создано: 24 июня 2007 20:30 · Личное сообщение · #17 |
|
Создано: 27 июня 2007 14:22 · Личное сообщение · #18 |
![]() |
eXeL@B —› Программирование —› Доступ к http://rapidshare.com/ на Delphi |
Эта тема закрыта. Ответы больше не принимаются. |