Что нового

Написание бота для olike

kilohel

Новичок
Сообщения
19
Репутация
1
Всем привет. Застрял на том моменте, где нужно нажать на сылочку "Мне нравиться" код этой сылки меняется в зависимости под чем стоит "Мне нравиться" под темой или под фоткой.

Меня хватило только для того чтобы написать нажатие на кнопку "Поставить мне нравиться и заработать 1"

Код:
$oIE = _IECreate("http://olike.ru/earn.php")
_IELoadWait($oIE)

$oLinks=_IETagNameGetCollection($oIE, 'p')

For $oLink In $oLinks
   $sPropLink=_IEPropertyGet($oLink, 'outerhtml')
	If Not @error Then
        If StringInStr($sPropLink, 'Поставить "Мнe нрaвитcя" и заработать ') Then
		 _IEAction($oLink, 'click')
			ExitLoop
	  EndIf
	  EndIf
   Next


После нажатия этой кнопки открывается отдельное окошко в котором то и нужно жмакнуть "Мне нравиться"

Вот html код кнопок которые встречаются на сылке мне нравиться

Код:
ajax.preload('al_photos.php', {"act":"show","list":"album157532731_0","photo":"157532731_296219020"}, ["album157532731_0",2,1.000000,[{"id":"157532731_296219020","base":"http:\/\/cs307113.vk.me\/v307113731\/","commcount":0,"commshown":0,"comments":"","date":"20 января 2013","tags":[0],"tagged":[],"album":"<a href=\"album157532731_0\" onclick=\"return nav.go(this, event)\">Фотографии со страницы Артёма<\/a>","author":"<a class=\"mem_link\" href=\"\/artya_kent89\">Артём Головчук<\/a>","likes":146,"actions":{"spam":1,"comm":1,"save":1},"hash":"3a62702eb4c2850e2a","x_src":"http:\/\/cs307113.vk.me\/v307113731\/476f\/aubizxTp5wY.jpg","x_":["476f\/aubizxTp5wY",450,600],"o_src":"http:\/\/cs307113.vk.me\/v307113731\/4770\/VDXNITxrgWk.jpg","o_":["4770\/VDXNITxrgWk",130,173],"p_src":"http:\/\/cs307113.vk.me\/v307113731\/4771\/gIKD2ciV6kA.jpg","p_":["4771\/gIKD2ciV6kA",200,267],"q_src":"http:\/\/cs307113.vk.me\/v307113731\/4772\/wKc-Ifb4l98.jpg","q_":["4772\/wKc-Ifb4l98",320,427],"r_src":"http:\/\/cs307113.vk.me\/v307113731\/4773\/mfoYckztPfo.jpg","r_":["4773\/mfoYckztPfo",450,600]},{"id":"157532731_298494224","base":"http:\/\/cs417926.vk.me\/v417926731\/","commcount":4,"commshown":4,"comments":"<div class=\"clear_fix pv_comment reply_replieable\" id=\"pv_comment157532731_27\" onclick=\"Photoview.commentClick(this, event, 141829296)\" onmouseover=\"Wall.replyOver('157532731photo_27pv')\" onmouseout=\"Wall.replyOut('157532731photo_27pv')\"><div class=\"reply_table\">\n  <div class=\"fl_l pv_thumb\">\n    <a href=\"\/id141829296\" onclick=\"return nav.go(this, event)\"><img src=\"http:\/\/cs417926.vk.me\/v417926296\/572d\/BBRPISUOfio.jpg\" \/><\/a>\n  <\/div>\n  <div class=\"fl_l pv_comm\">\n    \n    <a href=\"\/id141829296\" onclick=\"return nav.go(this, event)\" class=\"author\">Ангелина Дашкевич<\/a>\n    <div id=\"wpt157532731photo_27pv\"><div class=\"pv_commtext\">хорошо повыходили)))))молодец Артём мы все за тебя)*<\/div><\/div>\n    <div class=\"like_wrap fl_r\" onclick=\"Wall.like('157532731photo_comment27pv', 'f7d9841ed5d28b8c01'); event.cancelBubble = true;\" onmouseover=\"Wall.likeOver('157532731photo_comment27pv')\" onmouseout=\"Wall.likeOut('157532731photo_comment27pv')\">\n  <span class=\"like_link fl_l\" id=\"like_link157532731photo_comment27pv\">Мне нравится<\/span>\n  <i class=\"no_likes fl_l\" id=\"like_icon157532731photo_comment27pv\"><\/i>\n  <span class=\"like_count fl_l\" id=\"like_count157532731photo_comment27pv\"><\/span>\n<\/div>\n    <div class=\"pv_commdata\" id=\"wpe_bottom157532731photo_27pv\">\n      <span class=\"fl_l pv_commdate\">24 фев в 15:44<span class=\"sdivide\">|<\/span><a class=\"_reply_lnk\">Ответить<\/a><\/span>\n      <div class=\"fl_r progress\" id=\"pv_progress157532731_27\"><\/div>\n    <\/div>\n  <\/div>\n  \n<\/div><\/div><div class=\"clear_fix pv_comment reply_replieable\" id=\"pv_comment157532731_28\" onclick=\"Photoview.commentClick(this, event, 157532731)\" onmouseover=\"Wall.replyOver('157532731photo_28pv')\" onmouseout=\"Wall.replyOut('157532731photo_28pv')\"><div class=\"reply_table\">\n  <div class=\"fl_l pv_thumb\">\n    <a href=\"\/artya_kent89\" onclick=\"return nav.go(this, event)\"><img src=\"http:\/\/cs307113.vk.me\/v307113731\/5cdd\/HFUYUuSikPw.jpg\" \/><\/a>\n  <\/div>\n  <div class=\"fl_l pv_comm\">\n    \n    <a href=\"\/artya_kent89\" onclick=\"return nav.go(this, event)\" class=\"author\">Артём Головчук<\/a>\n    <div id=\"wpt157532731photo_28pv\"><div class=\"pv_commtext\"><a href=\"\/id141829296\" class=\"mem_link\" mention=\"\" mention_id=\"id141829296\" onclick=\"return mentionClick(this, event)\" onmouseover=\"mentionOver(this)\">Ангелина<\/a>, )<\/div><\/div>\n    <div class=\"like_wrap fl_r\" onclick=\"Wall.like('157532731photo_comment28pv', '48d405883b3946f00b'); event.cancelBubble = true;\" onmouseover=\"Wall.likeOver('157532731photo_comment28pv')\" onmouseout=\"Wall.likeOut('157532731photo_comment28pv')\">\n  <span class=\"like_link fl_l\" id=\"like_link157532731photo_comment28pv\">Мне нравится<\/span>\n  <i class=\"no_likes fl_l\" id=\"like_icon157532731photo_comment28pv\"><\/i>\n  <span class=\"like_count fl_l\" id=\"like_count157532731photo_comment28pv\"><\/span>\n<\/div>\n    <div class=\"pv_commdata\" id=\"wpe_bottom157532731photo_28pv\">\n      <span class=\"fl_l pv_commdate\">24 фев в 15:45<span class=\"sdivide\">|<\/span><a class=\"_reply_lnk\">Ответить<\/a><\/span>\n      <div class=\"fl_r progress\" id=\"pv_progress157532731_28\"><\/div>\n    <\/div>\n  <\/div>\n  \n<\/div><\/div><div class=\"clear_fix pv_comment reply_replieable\" id=\"pv_comment157532731_29\" onclick=\"Photoview.commentClick(this, event, 147472131)\" onmouseover=\"Wall.replyOver('157532731photo_29pv')\" onmouseout=\"Wall.replyOut('157532731photo_29pv')\"><div class=\"reply_table\">\n  <div class=\"fl_l pv_thumb\">\n    <a href=\"\/fox_alesya\" onclick=\"return nav.go(this, event)\"><img src=\"http:\/\/cs403816.vk.me\/v403816131\/635e\/gCTroOPzoes.jpg\" \/><\/a>\n  <\/div>\n  <div class=\"fl_l pv_comm\">\n    \n    <a href=\"\/fox_alesya\" onclick=\"return nav.go(this, event)\" class=\"author\">Алеся Кузьмич<\/a>\n    <div id=\"wpt157532731photo_29pv\"><div class=\"pv_commtext\">офигенные)))<\/div><\/div>\n    <div class=\"like_wrap fl_r\" onclick=\"Wall.like('157532731photo_comment29pv', '10b6df2d8ccbf9a925'); event.cancelBubble = true;\" onmouseover=\"Wall.likeOver('157532731photo_comment29pv')\" onmouseout=\"Wall.likeOut('157532731photo_comment29pv')\">\n  <span class=\"like_link fl_l\" id=\"like_link157532731photo_comment29pv\">Мне нравится<\/span>\n  <i class=\"no_likes fl_l\" id=\"like_icon157532731photo_comment29pv\"><\/i>\n  <span class=\"like_count fl_l\" id=\"like_count157532731photo_comment29pv\"><\/span>\n<\/div>\n    <div class=\"pv_commdata\" id=\"wpe_bottom157532731photo_29pv\">\n      <span class=\"fl_l pv_commdate\">1 мар в 19:22<span class=\"sdivide\">|<\/span><a class=\"_reply_lnk\">Ответить<\/a><\/span>\n      <div class=\"fl_r progress\" id=\"pv_progress157532731_29\"><\/div>\n    <\/div>\n  <\/div>\n  \n<\/div><\/div><div class=\"clear_fix pv_comment reply_replieable\" id=\"pv_comment157532731_30\" onclick=\"Photoview.commentClick(this, event, 157532731)\" onmouseover=\"Wall.replyOver('157532731photo_30pv')\" onmouseout=\"Wall.replyOut('157532731photo_30pv')\"><div class=\"reply_table\">\n  <div class=\"fl_l pv_thumb\">\n    <a href=\"\/artya_kent89\" onclick=\"return nav.go(this, event)\"><img src=\"http:\/\/cs307113.vk.me\/v307113731\/5cdd\/HFUYUuSikPw.jpg\" \/><\/a>\n  <\/div>\n  <div class=\"fl_l pv_comm\">\n    \n    <a href=\"\/artya_kent89\" onclick=\"return nav.go(this, event)\" class=\"author\">Артём Головчук<\/a>\n    <div id=\"wpt157532731photo_30pv\"><div class=\"pv_commtext\"><a href=\"\/fox_alesya\" class=\"mem_link\" mention=\"\" mention_id=\"id147472131\" onclick=\"return mentionClick(this, event)\" onmouseover=\"mentionOver(this)\">Алеся<\/a>, спс<\/div><\/div>\n    <div class=\"like_wrap fl_r\" onclick=\"Wall.like('157532731photo_comment30pv', '111b16df74b4472acb'); event.cancelBubble = true;\" onmouseover=\"Wall.likeOver('157532731photo_comment30pv')\" onmouseout=\"Wall.likeOut('157532731photo_comment30pv')\">\n  <span class=\"like_link fl_l\" id=\"like_link157532731photo_comment30pv\">Мне нравится<\/span>\n  <i class=\"no_likes fl_l\" id=\"like_icon157532731photo_comment30pv\"><\/i>\n  <span class=\"like_count fl_l\" id=\"like_count157532731photo_comment30pv\"><\/span>\n<\/div>\n    <div class=\"pv_commdata\" id=\"wpe_bottom157532731photo_30pv\">\n      <span class=\"fl_l pv_commdate\">1 мар в 19:22<span class=\"sdivide\">|<\/span><a class=\"_reply_lnk\">Ответить<\/a><\/span>\n      <div class=\"fl_r progress\" id=\"pv_progress157532731_30\"><\/div>\n    <\/div>\n  <\/div>\n  \n<\/div><\/div>","date":"24 февраля 2013","tags":[0],"tagged":[],"album":"<a href=\"album157532731_0\" onclick=\"return nav.go(this, event)\">Фотографии со страницы Артёма<\/a>","author":"<a class=\"mem_link\" href=\"\/artya_kent89\">Артём Головчук<\/a>","likes":29,"actions":{"spam":1,"comm":1,"save":1},"hash":"34745ddbc59fe2daa9","x_src":"http:\/\/cs417926.vk.me\/v417926731\/4504\/WrlttpjH4do.jpg","x_":["4504\/WrlttpjH4do",604,453],"y_src":"http:\/\/cs417926.vk.me\/v417926731\/4505\/jYgm2bEQlHg.jpg","y_":["4505\/jYgm2bEQlHg",807,605],"z_src":"http:\/\/cs417926.vk.me\/v417926731\/4506\/nVUf9-98YYo.jpg","z_":["4506\/nVUf9-98YYo",1280,960],"o_src":"http:\/\/cs417926.vk.me\/v417926731\/4507\/n2HrTL2XFVA.jpg","o_":["4507\/n2HrTL2XFVA",130,98],"p_src":"http:\/\/cs417926.vk.me\/v417926731\/4508\/VhRUivl00GA.jpg","p_":["4508\/VhRUivl00GA",200,150],"q_src":"http:\/\/cs417926.vk.me\/v417926731\/4509\/j8MY--5bOwc.jpg","q_":["4509\/j8MY--5bOwc",320,240],"r_src":"http:\/\/cs417926.vk.me\/v417926731\/450a\/iAekcpHIl5w.jpg","r_":["450a\/iAekcpHIl5w",510,383]}],{"commlimit":16384,"lang":{"reply_to_post":"Комментировать..","wall_more_replies":["","еще %s комментарий","еще %s комментария","еще %s комментариев"],"wall_all_replies":"все комментарии","wall_M_replies_of_N":["","%s комментарий из {link}{all}{\/link}","%s последних комментария из {link}{all}{\/link}","%s последних комментариев из {link}{all}{\/link}"],"wall_reply_as_group":"от имени сообщества","photos_X_comms":["","%s комментарий","%s комментария","%s комментариев"],"photos_onthisphoto":"На этой фотографии","photos_yourcomment":"Ваш комментарий","photos_delete_tag":"Удалить отметку","photos_tagperson":"Отметить человека","photos_select_tag_area":"Выделите область, где изображен человек, и он будет подписан на фотографии.","photos_typename":"Введите имя","photos_tags_me":"Я","photos_confirm_tag":"Подтвердить","photos_load_to_profile":"Поместить на мою страницу","photos_in_closed_album":"Комментарии к этой фотографии скрыты настройками приватности.","photos_edit":"Редактировать","photos_rotate":"Повернуть:","photos_album_name":"Альбом:","photos_author":"Отправитель:","photos_added":"Добавлена","photos_i_like":"Мне нравится","photos_download_hq":"Загрузить оригинал на диск","photos_larger":"Увеличить фотографию","photos_smaller":"Уменьшить фотографию","photos_photo_num_of_N":"Фотография %s из %s","photos_view_one_photo":"Просмотр фотографии","photos_show_prev_comments":["","Показать предыдущий %s комментарий","Показать предыдущие %s комментария","Показать предыдущие %s комментариев"],"photos_edit_desc":"Редактировать описание","photos_edit_desc_intro":"Введите описание","photos_share_from_view":"Поделиться","photos_send_to_fr":"Отправить другу","photos_save_to_alb":"Сохранить к себе в альбом","photos_repeat_album":"Смотреть еще раз","photos_place_label":"Место:","photos_edit_add_place":"Указать место","photos_fullscreen":"На весь экран","photos_slideshow":"Показ слайдов","photos_seconds":["","%s секунда","%s секунды","%s секунд"],"global_add_media":"Прикрепить","dont_attach":"Не прикреплять","profile_mention_not_found":"Страница не найдена","profile_mention_start_typing":"Начните вводить имя друга или название сообщества"},"maxtags":35,"hash":"a7c2d305d6d33c18e9","names":{"141829296":["<a href=\"\/id141829296\" class=\"mem_link\">Ангелине Дашкевич<\/a>","Ангелина, "],"157532731":["<a href=\"\/artya_kent89\" class=\"mem_link\">Артёму Головчуку<\/a>","Артём, "],"147472131":["<a href=\"\/fox_alesya\" class=\"mem_link\">Алесе Кузьмич<\/a>","Алеся, "]},"media":[["photo","Фотографию"],["video","Видеозапись"],["audio","Аудиозапись"],["doc","Документ"]],"share":{"url":"http:\/\/cs6075.vk.com\/upload.php","hash":"5eb3198e633c2a12b6517f3c8c593df0","rhash":"747360a5f81c94e5f680cba0853a75a9","timehash":"1364276543_268957c60cb0076592"}}]);
showPhoto('157532731_296219020', 'album157532731_0', {root: 1, noHistory: 1})  ;(function () {
    var cb = function () {Notifier.init({"queue_id":"events_queue9952892","timestamp":"395960376","key":"3hp7mGYuxCKR35qC6mcAROwRXP0X4r2Qh2C9Njzt8bhFtPkwQvBJn7Hp","uid":9952892,"version":9,"flash_url":"\/swf\/queue_transport.swf","debug":false,"instance_id":"MzcwMjkw","server_url":"http:\/\/q20.queuev4.vk.com\/im892","frame_path":"http:\/\/q20.queuev4.vk.com\/q_frame.php?6","frame_url":"im892","refresh_url":"http:\/\/vk.com\/notifier.php","fc":{"version":23,"state":{"clist":{"min":true,"x":false,"y":false},"tabs":[],"version":23},"state_hash":"1364276543_6d38426aa1d552e02a"}})}
    if (vk.loaded) cb(); else addEvent(window, 'load', cb);
  })();
    }
Но если все это сложно, то хотябы нажатие на вот эту

Код:
<div id="pv_like_wrap" class="fl_l" onmouseover="Photoview.likeOver()" onmouseout="Photoview.likeOut()" onclick="Photoview.like()">  <span class="fl_l" id="pv_like_link">Мне нравится</span>  <i class="fl_l" id="pv_like_icon" style="opacity: 1;"></i>  <span id="pv_like_count" class="fl_l">136</span></div>

За ранее благодарен всем кто попробует разгадать загадку ))
 
Автор
K

kilohel

Новичок
Сообщения
19
Репутация
1
ЛЮДИ ДОБРЫЕ ПРОФЕССИОНАЛЫ СВОЕГО ДЕЛА, ПОМОГИТЕ КТО СКОЛЬКО МОЖЕТ !! :smile:
 

gercheg

Новичок
Сообщения
3
Репутация
0
Кто его знает, написал тоже самое что и ты на Imacrose, всё зашибись советую.
Просто и быстро.
 

xklx

Новичок
Сообщения
50
Репутация
3
Нажать на кнопки не составляет труда, однако я не смог добиться атача к новому окну которое вылазиет после нажатия на кнопку 'Поставить "Мнe нрaвитcя" и заработать'
 

worldofsea

Новичок
Сообщения
4
Репутация
0
Блин вот в этом вся загвоздка. может в новом окне нажать контрл F находим мне ндравится и кликаем по нему.


Добавлено:
Сообщение автоматически объединено:

Написал урв простой контрл ф не нужен. Делиться не буду :blum:
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,320
worldofsea [?]
Написал урв простой контрл ф не нужен. Делиться не буду
Предупреждение За нарушение общих правил (пункт В.8):
Так как эта конференция называется "Русское сообщество AutoIt", язык общения на ней - Русский. Названия фирм или программных продуктов, аббревиатуры и т.д. должны быть написаны так, как они пишутся в оригинале, например не следует писать УСБ вместо USB. На форуме крайне не рекомендуется намеренно искажать русский язык и использовать "сетевой жаргон" на подобии "Аффтар выпей йадау!".


С уважением, ваш Глобальный модератор.






Добавлено:
Сообщение автоматически объединено:

worldofsea,
Вы на "бан" претендуете?
 

MnM

Post-Hardcore
Сообщения
679
Репутация
90
OffTopic:
Мне вот интересно кто заметил :smile:
 

C2H5OH

AutoIT Гуру
Сообщения
1,473
Репутация
333
Та все, наверное, заметили.
А шо делать?! Они сейчас повсюду...

worldofsea,
это сайт не сервисной службы AutoIt, и не онлайн курсы по программированию. Это частная территория. Здесь нарушение правил просто недупустимо. Это всё равно что ты в чьём-то блоге вызывающе себя ведёшь по отношению к владельцу.
:(
 

mysres

Новичок
Сообщения
6
Репутация
0
Код:
$oIE = _IECreate('http://olike.ru/',0,1,1);открываем сайт указанный в переменной $sUrl
For $i = 0 to 10
Sleep(1000)
$oTags = _IETagNameGetCollection ($oIE, "p")
For $Tag In $oTags
    If StringInStr ($Tag.innerText, 'Поставить "Мнe нрaвитcя" и заработать') Then
	_IEAction($oIE,'invisible')
	 _IEAction($Tag,'click')
	ExitLoop
Endif
Next
;;;;;;;;присоединяемся к открытому окну vk.com;;;;;;;;
$oIE2 = _IEAttach("vk.com","URL")
MsgBox(0,"",@error)
While @error = 7
$oIE2 = _IEAttach("vk.com","URL")
WEnd
_IEAction($oIE2,'invisible')
_IELoadWait($oIE2)
Sleep(1000)
$Tag = _IEGetObjById($oIE2,'pv_like_count')
If @error = 0 Then
_IEAction($Tag,'click')
EndIf
If @error = 7 Then
$body = _IEBodyReadHTML($oIE2)
$z = StringRegExp($body,'id="([0-9a-zA-Z-_]*)">Мне',3)
$Tag = _IEGetObjById($oIE2,$z[0])
_IEAction($Tag,'click')
EndIf
Sleep(1000)
_IEAction($oIE2,'quit')
Next
_IEAction($oIE,'visible')
MsgBox(0,"","finish")
 

valldar

Новичок
Сообщения
32
Репутация
2
Также в свое время писал ботов для этого сервиса.
Писал в двух версиях:
1. Через WinHTTP
Преимущества: быстрый, без лишних окон
Недостатки: 99.999% вероятность бана
2. Через IE.au3
Преимущества: беспалевный
Недостатки: постоянно открыто окно IE, относительно долгий

Первая версия
Код:
#include <WinHttp.au3>
#include <String.au3>
#include <array.au3>

HotKeySet('{esc}', '_quit')
Func _quit()
	Exit
	EndFunc

Global $Olike_cookie,$vk_cookie,$hOpen,$hConnect,$sdata, $link, $vk_ctype, $olike_ctype, $letter,$o_referer,$o_AcceptEncoding,$o_accept, $resp
$cook='cDRGN=821712638; PHPSESSID=ncij07raalhl37122ek3i9qvk4; TejndE37EDj24212=MTM1MTExNjE0NDE3NDI0MjEyODUx; svspr=http://olike.ru/earn.php; svsds=5; MG_24212=5; _ym_visorc=b; emails=watchkazan%40yahoo.com; password=48c2e59aaddac10037cf20ed2a0a983a'
$Olike_cookie='Cookie: '&$cook
$vk_cookie='Cookie: remixlang=0; remixflash=11.4.402; remixdt=0; remixseenads=1; remixfeed=*.*.ph%2Cvd%2Ctp.*.*.*.*.*; remixsid=ebfc2ebeee58a4d63cef4f3746339747a513edb2fb6bb3e3bcc99f116fa13388a14d'
$vk_ctype='Content-Type: application/x-www-form-urlencoded'
$olike_ctype='Content-Type: text/html'
$o_referer='Referer: http://olike.ru/earn.php'
$o_AcceptEncoding='Accept-Encoding: gzip, deflate'
$o_accept='Accept: text/html, application/xhtml+xml, */*'
$v_XRequested='X-Requested-With: XMLHttpRequest'


$hOpen = _WinHttpOpen('Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; Trident/5.0)') 
_WinHttpSetTimeouts ($hOpen, Default,Default, Default,Default)
$Olike_Connect = _WinHttpConnect($hOpen, 'olike.ru')
$vk_Connect = _WinHttpConnect($hOpen, 'vk.Com')
While 1
_olike()
Sleep(5000)
WEnd
Func _olike()
	$f=1
	While $f=1
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Option(6) = False ;WinHttpRequestOption_EnableRedirects
$oHTTP.Open("GET", "http://Olike.ru/lot-redirect.php")
$oHTTP.SetRequestHeader('Cookie',$cook)
$oHTTP.Send()
$oHTTP.WaitForResponse
$resp    = $oHTTP.Responsetext
;MsgBox(0,'',$resp)
If StringInStr($resp, '<meta name="sprypayUrlChecker') Then
	ToolTip ('Нет заказов', @DesktopWidth-175, @DesktopHeight-87)	
	Sleep(13000)
	$f=1
	ToolTip ('', @DesktopWidth-175, @DesktopHeight-87)	
Else
	$f=0
	$sNewLocation = $oHTTP.GetResponseHeader("Location")
EndIf
WEnd

	$link=StringTrimLeft($sNewLocation, 14)
	$letter=StringLeft($link,1)

	_vklike()
EndFunc

Func _vkLike()	
	$sData = _WinHttpSimpleRequest($vk_Connect, 'get', '/'&$link,Default,Default, $vk_cookie)	
	If $letter='p' Then
	$hash=_StringBetween($sdata, 'hash":"','","')
	Sleep(500)
	;MsgBox(0,'',$hash[0])
	$sData = _WinHttpSimpleRequest($vk_Connect, 'post', '/like.php' ,Default,'act=a_do_like&al=1&from=photo_viewer&hash='&$hash[0]&'&object='&$link, $vk_ctype&@CRLF&$vk_cookie&@CRLF&$v_XRequested&@CRLF&'Accept: */*')
Else
	$hash=_StringBetween($sdata, 'onclick="wall.like','<span class')
	Sleep(500)
	;MsgBox(0,'',$hash[0])
	$hash=StringTrimRight($hash[0], 7)
	$hash=StringRight($hash,18)
	;MsgBox(0,'',$hash)
	$sData = _WinHttpSimpleRequest($vk_Connect, 'post', '/like.php' ,Default,'act=a_do_like&al=1&from=wall_one&hash='&$hash&'&object='&$link&'&wall=1', $vk_ctype&@CRLF&$vk_cookie&@CRLF&$v_XRequested&@CRLF&'Accept: */*')
	EndIf
EndFunc

Вторая версия
Код:
#include <Ie.au3>
#include <Opera.au3>
#include <array.au3>

HotKeySet('{esc}', '_quit')
Func _quit()
	Exit
EndFunc

Global $oie

WinActivate('Заработай бесплатно Лайки вконтакте')
$oie=_IEAttach ('Заработай бесплатно Лайки вконтакте')
If @Error<>0 Then
	MsgBox(0,'1',@Error)
	Exit
EndIf
While 1
$links=_IELinkGetCollection($oIE)
;_ArrayDisplay($links)
For $link In $links
If StringInStr(_IEPropertyGet($Link, 'outerhtml'), 'поставить') Then
	_IEAction($link, 'click')	
	_IELoadWait($oie)
	ExitLoop
	Sleep(1000)
EndIf
Next

While 1
	If WinActive('Пока нет новых заказов - Windows Internet Explorer') Then
		MouseMove(1188, 8,0)
MouseClick('left',1188, 8,1)
	WinWaitClose ('Пока нет новых заказов - Windows Internet Explorer')
	Opt("WinTitleMatchMode", 2) 
	WinActivate('Windows Internet Explorer')
EndIf
	$0=PixelSearch(309, 71,1037, 209,0x45688E)
	If Not @Error Then;	
_pixsearch()
ExitLoop
EndIf
WEnd
Send('^ц')
Sleep(500)
WEnd

Func _pixsearch()
	  $1=_IEDocReadHTML($oie)
	  If Not StringInStr($1,'Мне нравится') Then
		  MsgBox(0,'','No like')
		  Return
		  EndIf
	  
	  For $i = 5 to 1 step -1
  $con2 = PixelSearch(360, 101,1075, 738,0xC9D8E6,0,3);поиск сердечка
    if not @error Then
		 MouseMove($con2[0],$con2[1],0)
        MouseClick("left",$con2[0],$con2[1],1,1)
		  MouseMove($con2[0]+100,$con2[1]+100,0)        
        Sleep(2000)        
ExitLoop		  
    Else
        MouseWheel("down",10)
    EndIf
    Sleep(1000)
 Next
	EndFunc

Оба скрипта писались в 2012 году, работают ли они сейчас не проверял.
 
Верх