VPF::Вставка картинки (на Стенку вКонтакте)

Natapro

Дата 17.11.2009, 03:08 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 460
Регистрация: 13.9.2009
Где: Украина

Репутация: нет
Всего: нет

--------------------

Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...

Экскалупатор

Дата 17.11.2009, 03:11 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24

Natapro,

Цитата

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

diadiavova

Дата 17.11.2009, 03:13 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

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

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

Exai1e

Дата 17.11.2009, 11:45 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 908
Регистрация: 3.12.2006
Где: Moscow

Репутация: нет
Всего: 30

Natapro, имхо те еще рано что то самой писать, если даже скопипастить готовый код не можешь. Начни с базового изучения языка, как методы объявить, хотя бы даже =)
зы. то что пишут друзья бла бла от тебя приходит спам, может быть не из за скаченной программы для отправки картинок на стену или как там ее. Может у тя давно сидит червяк который этим делом занимается, и попал он к тебе совсем не через скаченную программу для отправки картинок бла бла бла.
Найди себя в списке http://habrahabr.ru/blogs/virus/75345/ smile

Это сообщение отредактировал(а) Exai1e - 17.11.2009, 11:49

--------------------

"Решение зависит от выбранного геморроя" © Snowy
"у нас как в армии - либо работает, либо так и задумано"

antG

Дата 17.11.2009, 21:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 18.9.2009

Репутация: нет
Всего: нет

Недавно как раз разбирал этот вопрос(отправка картинки на стену вконтакте).
Это реализуется POST запросами на сайт vkontakte.ru
Вот эта сатья всё разьяснила

Вот исходники такой программы, правда на delphi

Это сообщение отредактировал(а) antG - 17.11.2009, 21:32

Экскалупатор

Дата 17.11.2009, 21:42 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24

antG, про делфи девушка ничего не вкурсе(на прошлой странице темы я ей уже предлагал), так что это не поможет...

antG

Дата 17.11.2009, 22:10 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 18.9.2009

Репутация: нет
Всего: нет

Да ладно наф)там разбираться то пробижался глазами по коду ОПА ВОТ Запрос ОПА вот че туда добавить нада...)))

Добавлено через 8 минут и 53 секунды
Самое основное

Код


procedure TForm1.imgConnect(Sender: TObject; Socket: TCustomWinSocket);
var tmp,value:ansistring;
begin
ftext:=''; stext:='';
load2:= '----OLEG-ANDREEV-PAVEL-DUROV-GRAFFITI-POST' + #10 +
 'Content-Disposition: form-data; name="Signature"' + #10#10 +
 'thefucking32bits.idontknowwhatwr'                 + #10 +
 '----OLEG-ANDREEV-PAVEL-DUROV-GRAFFITI-POST'      + #10 +
 'Content-Disposition: form-data; name="Filedata"; filename="graffiti.png"' + #10 +
 'Content-Type: image/png' +#10#10;

 if(drawid='') then drawid:='0';
 if(drawgid='') then drawgid:='0';
load1:='POST http://vkontakte.ru/graffiti.php?to_id='+drawid+'&group_id='+drawgid+' HTTP/1.1' + #10 +
 'Host: vkontakte.ru'   + #10 +
 'User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1;) Firefox/2.0.0.3' + #10 +
 'Accept: text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,/*;q=0.5' + #10 +
 'Accept-Language: ru,en-us;q=0.7,en;q=0.3' + #10 +
 'Accept-Encoding: gzip,deflate' + #10 +
 'Accept-Charset: windows-1251,utf-8;q=0.7,*;q=0.7' + #10 +
'Keep-Alive: 300'   + #10 +
'Connection: keep-alive'  + #10 +
 cookie + #10   +
 'Referer: http://vkontakte.ru/swf/Graffiti.swf?12' + #10 +
 'Content-type: multipart/form-data; boundary=--OLEG-ANDREEV-PAVEL-DUROV-GRAFFITI-POST' + #10 +
 'Content-Length: ';
        tmp:=file_get_contents(tempfile);
   label4.Caption:='Загрузка..';
        value:=load1
        +inttostr(length(tmp)+length(load2)+43)
        + #10#10
        +StringReplace(load2,'thefucking32bits.idontknowwhatwr',
        signature,[]);

        stext:= value+'<Файл картинки>'+#10+'----OLEG-ANDREEV-PAVEL-DUROV-GRAFFITI-POST'+#10;
        Socket.SendText(value+tmp+#10+'----OLEG-ANDREEV-PAVEL-DUROV-GRAFFITI-POST'+#10);

      // value+tmp+#10+'----OLEG-ANDREEV-PAVEL-DUROV-GRAFFITI-POST'+#10;

   label4.Caption:='Ожидание ответа';
   ProgressBar1.Position:=100;
   form1.Enabled:=true;
   
end;

procedure TForm1.imgRead(Sender: TObject; Socket: TCustomWinSocket);
begin
ftext:=ftext+socket.ReceiveText;

//Если воообще хз что
if(pos(' 302 ',ftext)=0) and (pos(' 413 ',ftext)=0) then
excpt('Неожиданный ответ от сервера. Возможно слишком большой размер '
+'картинки','')

//паганый размер
else if (pos(' 413 ',ftext)<>0) then
excpt('Сервер ответил что большой размер изображения. Напишите автору на [email protected]','')

//если, вроде, все хорошо
else 
 navigate('http://vkontakte.ru/graffiti.php?act=last');
 label4.Caption:='Готово';
//Закрытие, если открыт. баян.
 if(socket.Connected) then  socket.Close;

end;

diadiavova

Дата 17.11.2009, 22:49 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

Цитата(antG @ 17.11.2009, 21:32

)

Вот эта сатья всё разьяснила

Когда я писал

Цитата(diadiavova @ 17.11.2009, 03:13

)

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

Речь шла именно об этой статье, ссылка в 4-м посте этого топика. О дельфийских исходниках, тоже вроде как упоминалось. Прочитал бы топик прежде чем постить, что ли. smile

Это сообщение отредактировал(а) diadiavova - 17.11.2009, 22:49

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

diadiavova

Дата 18.11.2009, 00:41 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

Короче говоря, немного почитал об этих API...всё оказалось не так просто. Они ориентированы на флеш-приложения, зарегистрированные вконтакте. Стало быть надо пользоваться первоначальным вариантом - грузить страницы загнрузки в браузер и эмулировать клики и прочие действия пользователя, или делать тоже самое через Request/Response.Последний вариант лучше, но и сложнее, в нём долго разбираться, и ИМХО, оно того не стоит.

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

Экскалупатор

Дата 18.11.2009, 00:55 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24

diadiavova,

Цитата

ИМХО, оно того не стоит.

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

diadiavova

Дата 18.11.2009, 10:54 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

Ну тут в общем-то у каждого в сети свои потребности. Хотя я посмотрел тот вконтактовский интерфейс вставки картинки на стену, там всё делается в несколько кликов и на самом деле процесс автоматизации этой операции имхо бессмысленен, потому что разбираться в нём долго, а толку мало.

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

Natapro

Дата 20.11.2009, 13:38 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 460
Регистрация: 13.9.2009
Где: Украина

Репутация: нет
Всего: нет

Цитата(antG @ 17.11.2009, 22:10)

Да ладно наф)там разбираться то пробижался глазами по коду ОПА ВОТ Запрос ОПА вот че туда добавить нада...)))

Ну если для вас это всё так просто, очень тяжело скинуть уже в готовом виде ?

--------------------

Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB .NET \| Следующая тема »