![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Можно ли автоматизировать заргузку фото на Avito.ru? Там можно только по 1 фото за раз загружать, мультиселект не прокатит(( Все происходит в теле Webbrowser'a. Если да, то какими способами?
|
|
#2
|
||||
|
||||
|
ну если можно 1 фото загрузить и сервер не блокирует дальнейшую загрузку с одного акк/IP, то в цикле должно получиться.
|
|
#3
|
|||
|
|||
|
Цитата:
|
|
#4
|
|||
|
|||
|
можно попробовать установить значения поля (html формы) в имя файла
|
|
#5
|
|||
|
|||
|
Цитата:
|
|
#6
|
||||
|
||||
|
Там сто пудов POST запросом все шлется, вот им и надо отсылать.
|
|
#7
|
|||
|
|||
|
Цитата:
А то я на среднем уровне знаю php код ну и delphi соответственно. |
|
#8
|
||||
|
||||
|
IdHTTP.Post
там поди еще на куки завязка есть, надо еще и куки подбрасывать. |
|
#9
|
||||
|
||||
|
если лень разбираться в html коде странички, сниффером посмотри что передается при загрузке.
|
|
#10
|
|||
|
|||
|
Цитата:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
PostData:TStringList;
html:WideString;
begin
try
PostData:=TStringList.Create;
PostData.Clear;
PostData.Add('phone=8 909 370 91 77');
PostData.Add('location_id=652760');
PostData.Add('category_id=24');
PostData.Add('params[201]=1059');
PostData.Add('params[549]=5696');
PostData.Add('params[499]=5254');
PostData.Add('params[578]=109');
PostData.Add('params[494]=asdasdas qwqw 12');
PostData.Add('service_code=free');
html:=IdHTTP1.Post('http://www.avito.ru/additem',PostData);
PostData.Free;
except
on e:Exception do
PostData.Free;
end;
end;Но мне бы хотябы чтобы то что я отправляю я мог видеть скажет в Webbrowsere.. Так можно сделать? |
|
#11
|
|||
|
|||
|
Цитата:
|
|
#12
|
|||
|
|||
|
Цитата:
|
|
#13
|
|||
|
|||
|
до кнопки же добирался, попробуй добраться до нужного input-a, а потом вызвать что-то навроде setvalue(полное имя файла), у меня такое работало (хотя и не в дельфи)
|
|
#14
|
|||
|
|||
|
Цитата:
|