Так как я сам не пользуюсь обычно вкотнтакте и лежит у меня скрипт для постинга в вк через мобильную версию, то выложу его на всеобщее обозрение. Скрипт писался примерно месяц назад и не знаю, работает он сейчас или тупит. В общем берите и редактируйте под ваше усмотрение.
Итак, что нужно сделать. Создать папку и файлы - пути и названия смотрите на скрине.
Файл LOG.txt создастся сам - в нем будут храниться информация о текущем пользователе вк, который сейчас работает и номер группы, в которую идет постинг. Зная номер группы, можно продолжить постинг именно с этой группы, в случае аварийной остановки скрипта.
Файл с группами.
В папке foto должна лежать 1 фото обязательно с именем vkimage.jpg
Само фото может отсутствовать, если не хотите размещать.
В файл textpost.txt записываете ваши объявление - нужно написать одно и то же объявление разными формулировками и разместить каждое из них в отдельную строку. Нужно сформировать 10 объявлений. Размещаться будет случайное из 10.
Ну и наконец, в файл vklogin.txt размещаете построчно ваши логины и пароли от аккаунтов вк.
Например:
+79083680252;Brokeпbrow;
+79061186882;Dqвsopus;
+79603669572;poуtyai17;
Ну и на самый конец сам скрипт. Дописывайте и доделывайте под свои нужды, так как вам угодно. Хотя сам скрипт работает, но доделать его нужно все таки скорее всего через прокси, так как через 10-15 постингов аккант вк заморозят.
var bazalogin = "d:\\new.spm.vk\\vklogin.txt";//база с логинами и паролями для вконтакте
var bazagroup = "d:\\new.spm.vk\\groups.txt";//база ссылок открытых групп вк
var bazatext = "d:\\new.spm.vk\\textpost.txt";//текст в одной строке для отправки в группу вк
var data,login,parol,urlgroup,textpost,k1,logfile;
//========================================================
data="SET !DATASOURCE_DELIMITER ;"+"\n";//берем текст для постинга в группу
data+="CMDLINE !DATASOURCE "+bazatext+"\n";
data+="SET !DATASOURCE_COLUMNS 1"+"\n";
data+="SET !LOOP "+1+"\n";
data+="ADD !EXTRACT {{!COL1}}"+"\n";
iimPlayCode(data);
textpost = iimGetLastExtract(1).replace(/\s+/g, "<SP>");
//--------------------------------------------------------
for (i=1;i<=1;i++) {//сколько аккаунтов вк, если 10 то поставить i<=10
//iimPlayCode("CLEAR");
data="SET !DATASOURCE_DELIMITER ;"+"\n";//подключаем базу с логинами и паролями от вк
data+="CMDLINE !DATASOURCE "+bazalogin+"\n";
data+="SET !DATASOURCE_COLUMNS 2"+"\n";
data+="SET !LOOP "+i+"\n";
data+="ADD !EXTRACT {{!COL1}}"+"\n";
data+="ADD !EXTRACT {{!COL2}}"+"\n";
iimPlayCode(data);
login = iimGetLastExtract(1);
parol = iimGetLastExtract(2);
//---------------------------------------------------------
data="URL GOTO=https://m.vk.com/"+"\n";//заходим на вк с логином и паролем
data+="TAG POS=1 TYPE=INPUT:TEXT ATTR=NAME:email CONTENT="+login+"\n";
data+="TAG POS=1 TYPE=INPUT:PASSWORD ATTR=NAME:pass CONTENT="+parol+"\n";
data+="TAG POS=1 TYPE=INPUT:SUBMIT ATTR=*"+"\n";
iimPlayCode(data);
//---------------------------------------------------------
k1=15;urlgroup="q";//число k1 можно менять - то есть если поставить 15 - то начнется постинг в группу из файла с 16ой строки
while (urlgroup!=null) {k1++;
data="SET !DATASOURCE_DELIMITER ;"+"\n";//подключаем базу с группами и берем построчно адреса, пока не попадется пустая строка - то есть до конца
data+="CMDLINE !DATASOURCE "+bazagroup+"\n";
data+="SET !DATASOURCE_COLUMNS 1"+"\n";
data+="SET !LOOP "+k1+"\n";
data+="ADD !EXTRACT {{!COL1}}"+"\n";
iimPlayCode(data);
urlgroup = iimGetLastExtract(1);
iimDisplay("Добавляем в "+k1+" группу");
data="URL GOTO="+urlgroup+"\n";
data+="WAIT SECONDS=9"+"\n";
data+="TAG POS=1 TYPE=TEXTAREA ATTR=NAME:message CONTENT="+textpost+"\n";
data+="TAG POS=1 TYPE=INPUT:FILE ATTR=* CONTENT=D:\\new.spm.vk\\foto\\vkimage.jpg"+"\n";
data+="WAIT SECONDS=10"+"\n";//задержка на выгрузку фото к сообщению, если медленный интернет или большое фото - то увеличить по усмотрению
data+="TAG POS=1 TYPE=INPUT:SUBMIT ATTR=*"+"\n";
data+="WAIT SECONDS=15"+"\n";
iimPlayCode(data);
//------------------------------------------------------
//запись лога в файл - пока пишется только порядковый номер группы, в который был постинг. Далее возможности можно расширить.
//это нужно на случай если нештатно выключился комп. По файлу можно посмотреть число k1 - номер, на котором остановился постинг и продолжить с этого места.
logfile = 'CODE:SET !ERRORIGNORE YES' + '\n';
logfile += 'SET !EXTRACT_TEST_POPUP NO' + '\n';
logfile += 'SET !EXTRACT NULL' + '\n';
logfile += 'SET !EXTRACT '+ k1 + '\n';
logfile += 'SAVEAS TYPE=EXTRACT FOLDER=d:\\new.spm.vk\\ FILE=LOG.txt' + '\n';
iimPlay(logfile);
}
}
Вот такой вот небольшой код может постить в вк. Нужно только подстроиться под это. Все скрипты у меня выполняются в режиме Быстро. Какие вам нужны настройки - смотрите сами.
Итак, что нужно сделать. Создать папку и файлы - пути и названия смотрите на скрине.
Файл LOG.txt создастся сам - в нем будут храниться информация о текущем пользователе вк, который сейчас работает и номер группы, в которую идет постинг. Зная номер группы, можно продолжить постинг именно с этой группы, в случае аварийной остановки скрипта.
Файл с группами.
Само фото может отсутствовать, если не хотите размещать.
Например:
+79083680252;Brokeпbrow;
+79061186882;Dqвsopus;
+79603669572;poуtyai17;
Ну и на самый конец сам скрипт. Дописывайте и доделывайте под свои нужды, так как вам угодно. Хотя сам скрипт работает, но доделать его нужно все таки скорее всего через прокси, так как через 10-15 постингов аккант вк заморозят.
var bazalogin = "d:\\new.spm.vk\\vklogin.txt";//база с логинами и паролями для вконтакте
var bazagroup = "d:\\new.spm.vk\\groups.txt";//база ссылок открытых групп вк
var bazatext = "d:\\new.spm.vk\\textpost.txt";//текст в одной строке для отправки в группу вк
var data,login,parol,urlgroup,textpost,k1,logfile;
//========================================================
data="SET !DATASOURCE_DELIMITER ;"+"\n";//берем текст для постинга в группу
data+="CMDLINE !DATASOURCE "+bazatext+"\n";
data+="SET !DATASOURCE_COLUMNS 1"+"\n";
data+="SET !LOOP "+1+"\n";
data+="ADD !EXTRACT {{!COL1}}"+"\n";
iimPlayCode(data);
textpost = iimGetLastExtract(1).replace(/\s+/g, "<SP>");
//--------------------------------------------------------
for (i=1;i<=1;i++) {//сколько аккаунтов вк, если 10 то поставить i<=10
//iimPlayCode("CLEAR");
data="SET !DATASOURCE_DELIMITER ;"+"\n";//подключаем базу с логинами и паролями от вк
data+="CMDLINE !DATASOURCE "+bazalogin+"\n";
data+="SET !DATASOURCE_COLUMNS 2"+"\n";
data+="SET !LOOP "+i+"\n";
data+="ADD !EXTRACT {{!COL1}}"+"\n";
data+="ADD !EXTRACT {{!COL2}}"+"\n";
iimPlayCode(data);
login = iimGetLastExtract(1);
parol = iimGetLastExtract(2);
//---------------------------------------------------------
data="URL GOTO=https://m.vk.com/"+"\n";//заходим на вк с логином и паролем
data+="TAG POS=1 TYPE=INPUT:TEXT ATTR=NAME:email CONTENT="+login+"\n";
data+="TAG POS=1 TYPE=INPUT:PASSWORD ATTR=NAME:pass CONTENT="+parol+"\n";
data+="TAG POS=1 TYPE=INPUT:SUBMIT ATTR=*"+"\n";
iimPlayCode(data);
//---------------------------------------------------------
k1=15;urlgroup="q";//число k1 можно менять - то есть если поставить 15 - то начнется постинг в группу из файла с 16ой строки
while (urlgroup!=null) {k1++;
data="SET !DATASOURCE_DELIMITER ;"+"\n";//подключаем базу с группами и берем построчно адреса, пока не попадется пустая строка - то есть до конца
data+="CMDLINE !DATASOURCE "+bazagroup+"\n";
data+="SET !DATASOURCE_COLUMNS 1"+"\n";
data+="SET !LOOP "+k1+"\n";
data+="ADD !EXTRACT {{!COL1}}"+"\n";
iimPlayCode(data);
urlgroup = iimGetLastExtract(1);
iimDisplay("Добавляем в "+k1+" группу");
data="URL GOTO="+urlgroup+"\n";
data+="WAIT SECONDS=9"+"\n";
data+="TAG POS=1 TYPE=TEXTAREA ATTR=NAME:message CONTENT="+textpost+"\n";
data+="TAG POS=1 TYPE=INPUT:FILE ATTR=* CONTENT=D:\\new.spm.vk\\foto\\vkimage.jpg"+"\n";
data+="WAIT SECONDS=10"+"\n";//задержка на выгрузку фото к сообщению, если медленный интернет или большое фото - то увеличить по усмотрению
data+="TAG POS=1 TYPE=INPUT:SUBMIT ATTR=*"+"\n";
data+="WAIT SECONDS=15"+"\n";
iimPlayCode(data);
//------------------------------------------------------
//запись лога в файл - пока пишется только порядковый номер группы, в который был постинг. Далее возможности можно расширить.
//это нужно на случай если нештатно выключился комп. По файлу можно посмотреть число k1 - номер, на котором остановился постинг и продолжить с этого места.
logfile = 'CODE:SET !ERRORIGNORE YES' + '\n';
logfile += 'SET !EXTRACT_TEST_POPUP NO' + '\n';
logfile += 'SET !EXTRACT NULL' + '\n';
logfile += 'SET !EXTRACT '+ k1 + '\n';
logfile += 'SAVEAS TYPE=EXTRACT FOLDER=d:\\new.spm.vk\\ FILE=LOG.txt' + '\n';
iimPlay(logfile);
}
}
Вот такой вот небольшой код может постить в вк. Нужно только подстроиться под это. Все скрипты у меня выполняются в режиме Быстро. Какие вам нужны настройки - смотрите сами.
Комментариев нет:
Отправить комментарий