• XSS.stack #1 – первый литературный журнал от юзеров форума

upload файла на рапиду

AHTOLLlKA

(L2) cache
Пользователь
Регистрация
30.03.2006
Сообщения
388
Реакции
14
вот как мне на делфи залить файл на rapidshare.com

Код:
var sl: Tstrings;
begin
sl := TStringList.Create;
sl.Add('filecontent=1.jpg');

try
idhttp1.Post('http://rapidshare.com/cgi-bin/upload.cgi', sl);
finally
sl.Free;
end;
хз правельно не правельно)) как мне еще поллучить в ответе ссылку.. он мне возращает страничку типо how use rapidshare ))

памагите мне я бландинко
 
Не, по идее, если ты всё правильно сделаешь, то следующая страница, которую он тебе выдаст - страница с урлами на твой файл и ссылку удаления... Т.е. тебе нужно будет распарсить ответ и выдрать оттуда ссылко вида:

Код:
http://rapidshare.com/files/87506386/your_file.html

Если эта страница не выдаётся, посмотри все ли ты поля передаёшь... Там же ещё есть радио-боксы с выбором зеркала куда будет заливаться файло... Кроме того, я обратил внимание, что там какой-то айдишник передаётся этой цгишке... Возможно это текущий таймстамп...
 
В итоге у тебя передастся строка filecontent=1.jpg
 
Код:
var sl: Tstrings;
begin
sl := TStringList.Create;

sl.Add('filecontent="c:\1.jpg"');
sl.Add('u=Upload!');
sl.Add('rsuploadid=149451478460279688');

try
idhttp1.Post('http://rapidshare.com/cgi-bin/upload.cgi', sl);
finally
sl.Free;
end;
end;

тоже не катит, щас правельный... насчет ссылки я понимаю что она доложна выдаться там отпарсю все без проблем... ниразу не делал залив на файлообменники.. ))
 
Пожалуйста, обратите внимание, что пользователь заблокирован
там javascript-проверка походу, без него не будет работать.
 
я на Delphi не кодил очеень давно..
можна не скромный вопрос?

а где именно заливка твоего файла? ну присвол ты параметры tl.. что-то не понятно как ты включаешь сам файл =\
 
Антошка , передав серверу имя файла ты думаешь сервер залезет к тебе на компьютер,найдет файл и скачает?

Content-Type: multipart/form-data

Верно. Антошка, снифером посмотри, как происходит залив в браузере.

[mod][TheSADIST:] Тема уже стара как мир. Лучше бы пример привёл, а не...[/mod]
 


Напишите ответ...
  • Вставить:
Прикрепить файлы
Верх