[Opensource] Постер на стены групп вконтакте

Discussion in 'Социальные сети' started by Kairos, 18 Sep 2013.

  1. Kairos

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

    Joined:
    5 Oct 2009
    Messages:
    37
    Likes Received:
    21
    Reputations:
    21
    Мне тут посоветовали вынести пост отсюда в отдельную тему. Сделал за 15 минут многопоточный постер на стены групп вконтакте с рандомизацией сообщений. В файл с группами кладутся только айдишники. Работает от 1 аккаунта и без антигейта и проксей. Но все это очень легко добавить. Выкладываю в качестве примера, как просто пишется подобный софт. Если заинтересовала библиотека подробнее можно почитать в блоге.

    Архив с программой и исходником: скачать

    Сам исходник:
    PHP:
    using ...

    namespace 
    VkWallPoster
    {
        public class 
    Job JobBase
        
    {
            public static 
    string Login getset; }
            public static 
    string Password getset; }

            [
    PropertyDescription(DefaultValue="clubs.txt")]
            public static 
    string ClubFile getset; }

            [
    PropertyDescription(Multiline trueDefaultValue "Добрый {день|вечер}")]
            public static 
    string Message getset; }

            
    MessageBuilder msg = new MessageBuilder(MessageMessageBuilderType.Random);
            
    ResourceManager<stringclubs = new ResourceManager<string>(ClubFile);

            public 
    override void StartWork()
            {
                
    Request(String.Format(@"http://login.vk.com/?act=login&q=1&al_frame=1&from_host=vk.com&email={0}&pass={1}"LoginPassword.UrlEncode()), FollowRedirectstruecookiesGlobalCookies);
            }

            public 
    override void DoWork()
            {
                var 
    club clubs.Pop();
                var 
    hash Request("http://vk.com/club" club).Content.Match(@"post_hash"":""(\w+)").GetGroup(1);
                var 
    result Request(String.Format("http://vk.com/al_wall.php?act=post&al=1&type=all&hash={0}&to_id=-{1}&Message={2}"hashclubmsg.GetNext().UrlEncode())).Content.VkSplit()[4];
                
    Log("club{0} - {1}"clubresult == "0" "success" "error " result);
            }
        }
    }
     
  2. Kairos

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

    Joined:
    5 Oct 2009
    Messages:
    37
    Likes Received:
    21
    Reputations:
    21
    Заказчиков? Я написал это нахаляву в качестве примера чуваку, который спрашивал на форуме про постер. Специально все упростил, чтобы новичкам было проще разобраться. Можешь написать лучше? Тогда исходники в студию. Или не надо трепать языком.