Смена статуса в контакте Делфи

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by life:), 19 Sep 2010.

  1. life:)

    life:) Banned

    Joined:
    9 Sep 2010
    Messages:
    98
    Likes Received:
    18
    Reputations:
    8
    Люди добрые нужна ваша помощь,скажите пожалуйста как организовать то кто поможет мне?
     
    #1 life:), 19 Sep 2010
    Last edited by a moderator: 19 Sep 2010
  2. lamer811

    lamer811 Elder - Старейшина

    Joined:
    8 Nov 2009
    Messages:
    130
    Likes Received:
    39
    Reputations:
    12
    Наработки есть? :)
     
  3. life:)

    life:) Banned

    Joined:
    9 Sep 2010
    Messages:
    98
    Likes Received:
    18
    Reputations:
    8
    Нету хотелось бы от вас помощи может где то кто то видел исходник
     
  4. Artist

    Artist Member

    Joined:
    10 Jul 2010
    Messages:
    89
    Likes Received:
    5
    Reputations:
    0
    Если ты задаешь такой вопрос, значить ты не когда не писал программы под ВКонтакте.
    Это не страшно я росскажу как это все реализовать.
    Будем использовать Delphi7 и для роботы с социальной сетью IdHttp(будем создавать динамичиский)

    Ну конечно нам нужен снифер, для этого отлично подойдет HttpAnalyzerStdV5 .

    Для начала нам нужен алгоритм работы программы.
    1* Первое действие это авторизация.
    2* Получение главной страницы пользователя.
    3* Парсинг activityhash с главной страницы анкеты(Нужно будет для запроса).
    4* Отправка запроса на смену статуса где:
    setactivity="Че у нас будет в статусе";
    activityhash="Сам hash"

    Ну и все, а в сети ты готового примера не найдешь.
     
    1 person likes this.
  5. HakaR

    HakaR Active Member

    Joined:
    23 Jul 2009
    Messages:
    301
    Likes Received:
    200
    Reputations:
    3
    GhostOnline, наверно он будет создавать его в процедуре :D

    ТС,
    Могу скинуть код, только хеш со страницы, надо будет тебе самому спарсить...
     
  6. life:)

    life:) Banned

    Joined:
    9 Sep 2010
    Messages:
    98
    Likes Received:
    18
    Reputations:
    8
    Спасибо кто откликнулся.
    Кто сможет помочь через TeamViewer?Просто хочу с чего то стартануть а не могу,а так я буду смотреть по примеру вашему,для написание других программ.
     
    #6 life:), 20 Sep 2010
    Last edited: 20 Sep 2010
  7. 090808

    090808 Member

    Joined:
    15 Mar 2009
    Messages:
    171
    Likes Received:
    46
    Reputations:
    10
    var
    Kuka,serv:string;
    ......


    Kuka:=http.Get('http://vkontakte.ru/');
    serv:=copy(kuka,pos('activityhash',kuka),pos('>',kuka));
    serv:=Copy(serv,22,32);
    idhttp.Get('http://vkontakte.ru/profile.php?setactivity=status&activityhash='+serv);

    Вот :)
     
  8. life:)

    life:) Banned

    Joined:
    9 Sep 2010
    Messages:
    98
    Likes Received:
    18
    Reputations:
    8
    )))
    можеш показать пример через теам вире?
     
  9. Kandi

    Kandi Member

    Joined:
    18 Nov 2009
    Messages:
    344
    Likes Received:
    17
    Reputations:
    0
    пользуйся на здоровье, учи indy, winapi, winsock ну и конечно же основы Delphi ;)
    Как раз потестишь, делал фастом) хотя время убил нормал) будут ошибки пиши...
    + надеюсь от тебя увидеть :rolleyes:

    P.S. хотя мне бы самому Win API , winsock выучить :D
     
    1 person likes this.
  10. 090808

    090808 Member

    Joined:
    15 Mar 2009
    Messages:
    171
    Likes Received:
    46
    Reputations:
    10
    Мда....А что тут показывать то? Я тебе дал полностью рабочий пример
     
  11. Kandi

    Kandi Member

    Joined:
    18 Nov 2009
    Messages:
    344
    Likes Received:
    17
    Reputations:
    0
    ну что же вы так серьёзны :) человек еще не совсем понимает как работать с пост запросами..а мб и начальным уровнем дельфи :) всё прийдёт с практикой ;)
     
  12. Voland-791

    Voland-791 Member

    Joined:
    1 May 2009
    Messages:
    163
    Likes Received:
    13
    Reputations:
    5
    Вот для mail.ru было бы здорова сделать - "Микро-флудер!)"
     
  13. life:)

    life:) Banned

    Joined:
    9 Sep 2010
    Messages:
    98
    Likes Received:
    18
    Reputations:
    8
    Да Я в Делфи Начинающий,Юзал до этого VB/
    Если бы я знал как организовать код тот я бы не спрашивал о помощи в теам вире.

    Вы понимаите что мне сразу тяжело то?
    Немножко по учусь легче будет..
    Ой прикольно как то получилось но мне это и нужно.Блин сможешь помочь то?
     
    #13 life:), 21 Sep 2010
    Last edited: 21 Sep 2010
  14. Kandi

    Kandi Member

    Joined:
    18 Nov 2009
    Messages:
    344
    Likes Received:
    17
    Reputations:
    0
    я тебе уже и так помог!? или ты хочешь на халяву многопоточный и с прокси? :D
     
  15. life:)

    life:) Banned

    Joined:
    9 Sep 2010
    Messages:
    98
    Likes Received:
    18
    Reputations:
    8
    вы меня не так поняли(
     
  16. 090808

    090808 Member

    Joined:
    15 Mar 2009
    Messages:
    171
    Likes Received:
    46
    Reputations:
    10
    Ну а что тебе помогать то тогда? Тебе дал рабочий пример.
    Почему всё должны сделать за тебя?
    Напрягись, пойми как это работает и сделай сам.
    А тупо взять готовый пример скомпилить его - это идиотизм.
     
  17. life:)

    life:) Banned

    Joined:
    9 Sep 2010
    Messages:
    98
    Likes Received:
    18
    Reputations:
    8
    Ап.
    Вернулся в Делфи
    Ну луюди добрые кто покажет и обяснит то
     
  18. Anifuck

    Anifuck Member

    Joined:
    12 Nov 2010
    Messages:
    78
    Likes Received:
    7
    Reputations:
    0
    )) ты реально не в состоянии код копирнуть?
     
  19. life:)

    life:) Banned

    Joined:
    9 Sep 2010
    Messages:
    98
    Likes Received:
    18
    Reputations:
    8
    не работает
     
  20. Ti Jock

    Ti Jock Member

    Joined:
    5 Apr 2010
    Messages:
    1
    Likes Received:
    6
    Reputations:
    3
    Тебе надо пост в микроблог написать? Для этого апи используй, удобно.