Сейчас на форуме: hgdagon, asfa (+3 невидимых)

 eXeL@B —› Программирование —› Доступ к http://rapidshare.com/ на Delphi
Посл.ответ Сообщение


Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 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




Ранг: 617.3 (!), 677thx
Активность: 0.540
Статус: Участник

Создано: 02 апреля 2007 22:52
· Личное сообщение · #2

offtop
попробуй спросить на форуме Программы Universal Share Downloader http://usd.mybb.ru/
они постоянно рапиду обходят (правда в последнее время только файнридером)
/offtop



Ранг: 18.1 (новичок), 1thx
Активность: 0.010
Статус: Участник

Создано: 02 апреля 2007 23:07
· Личное сообщение · #3

на php легко сделать




Ранг: 282.8 (наставник), 24thx
Активность: 0.260
Статус: Участник
win32.org.ru

Создано: 03 апреля 2007 08:00
· Личное сообщение · #4

darkcoder пишет:
на php легко сделать

нафег изобретать велосипед имхо, такое уже есть

-----
may all your PUSHes be POPed!





Ранг: 73.2 (постоянный)
Активность: 0.030
Статус: Участник

Создано: 03 апреля 2007 08:58
· Личное сообщение · #5

Isaev пишет:
Сложность в том, что там SSL....
Видимо надо использовать Indy компоненты, но я с ними никогда не работал...

Сложность возникнет в том, что нужно будет искать dll чтобы работать с HTTPS, если стандартные подойдут, то считай тебе повезло

Vovan666 пишет:
Может кто что-нибудь дельное посоветовать?

А в принципе в чем сложность то? ... Получаешь https страницу с использованием комнонента TidHTTP в связке с TidSSLIOHandlerSocket потом пишешь анализатор для выдерания нужной инфы и все,

Offtop begin
Я в свое время писал программку для получения статистики KErio Winroute Firewall через https, послал GET запрос потом результат ( страница ) записал в переменую, получил нужную информацию и все,
Offtop end




Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 03 апреля 2007 21:13
· Личное сообщение · #6

Vovan666 пишет:
попробуй спросить на форуме

Спасибо, интересный форум... Я по этому поводу с Аффтаром USDownloader'a общался, но к сожалению он чел очень занятой и время лишнего совсем нет... А про форум этот я не знал.

ShEriF пишет:
Получаешь https страницу с использованием комнонента TidHTTP в связке с TidSSLIOHandlerSocket потом пишешь анализатор для выдерания нужной инфы и все,

С анализатором проблем то никаких, а вот по поводу послал GET запрос потом результат ( страница )
по подробнее можно, лучше примерчик чиркани, раз делал уже, наверное совсем не трудно

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh





Ранг: 282.8 (наставник), 24thx
Активность: 0.260
Статус: Участник
win32.org.ru

Создано: 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!





Ранг: 73.2 (постоянный)
Активность: 0.030
Статус: Участник

Создано: 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 попытки




Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 04 апреля 2007 21:24
· Личное сообщение · #9

ShEriF пишет:
у меня он почему то подгружает их со 2 попытки


Что-то у меня даже с 3-ей не подгружает... А ssleay32.dll я вообще в компе не нашёл...
Это что? OpenSSL?

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh





Ранг: 990.2 (! ! !), 380thx
Активность: 0.680
Статус: Модератор
Author of DiE

Создано: 04 апреля 2007 22:49
· Личное сообщение · #10

попробуй альтернативный набор компонентов для работы с нетом... там есть несколько примеров,
меня несколько раз выручал

ICS - Internet Component Suite

жаль он больше не развивается...

-----
[nice coder and reverser]





Ранг: 73.2 (постоянный)
Активность: 0.030
Статус: Участник

Создано: 05 апреля 2007 13:25
· Личное сообщение · #11

Isaev пишет:
Что-то у меня даже с 3-ей не подгружает... А ssleay32.dll я вообще в компе не нашёл...
Это что?

У меня Server 2003 стоит там они были сразу, а вообще это библиотеки для работы с SSL.
мои можно скачать тут http://night-sherif.nm.ru/temp/ssl_dll.7z




Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 04 июня 2007 15:39 · Поправил: Isaev
· Личное сообщение · #12

Работает, только пока coockies на месте
Как только стираешь, возвращает страницу авторизации
Как ему правильно pass/login при запросе передать?

Пример в аттаче (4Kb)

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh





Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 04 июня 2007 23:21
· Личное сообщение · #13

Пример в аттаче (4Kb)

933c_04.06.2007_CRACKLAB.rU.tgz - Rapidshare.rar

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh





Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 23 июня 2007 17:10
· Личное сообщение · #14

Всё, разобрался, наконец! Всем спасибо!!!
Немцы помогли... Тоже шарят, блин!

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh





Ранг: 282.8 (наставник), 24thx
Активность: 0.260
Статус: Участник
win32.org.ru

Создано: 23 июня 2007 19:34
· Личное сообщение · #15

Isaev пишет:
Всё, разобрался, наконец! Всем спасибо!!!
Немцы помогли... Тоже шарят, блин!

показывай че накодил

-----
may all your PUSHes be POPed!





Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 24 июня 2007 19:18
· Личное сообщение · #16

Guru_eXe пишет:
показывай че накодил

Собственно говоря интересен был сам факт (достучаться), а кодить можно теперь чего угодно


2b37_24.06.2007_CRACKLAB.rU.tgz - Rapidshare.rar

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh





Ранг: 271.6 (наставник), 2thx
Активность: 0.30
Статус: Участник

Создано: 24 июня 2007 20:30
· Личное сообщение · #17

Isaev
В оффлайне Глючед страшно...

-----
iNTERNATiONAL CoDE CReW





Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 27 июня 2007 14:22
· Личное сообщение · #18

Логично! Добавь проверки на исключения...

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh



 eXeL@B —› Программирование —› Доступ к http://rapidshare.com/ на Delphi
Эта тема закрыта. Ответы больше не принимаются.
   Для печати Для печати