|
[Урок] Узнаем онлайн ВК или нет
|
|
| [CM]Werevolf |
Дата: Суббота, 14.06.2014, 22:28 | Сообщение # 1
|
Боец
Сообщений: 255
Статус: Offline
|
Привет. Я решил рассказать, как проверить онлайн у человека ВК.
Код InputBox, var, Введите ID пользователя, Введите ID пользователя. ; Сюда вводим ид пользователя
FileAppend, , %A_WorkingDir%\Online.txt ; Создаем файл Online.txt в папке со скриптом
UrlDownloadToFile, http://vk.com/%var%, Online.txt ; Скачиваем HTML код страницы
FileRead, String, Online.txt ; Проверям построчно созданный файл Online.txt
If string contains Online ; Ищем слово "Online"
{
MsgBox, Пользователь онлайн. ; Если нашли, то пишем "Пользователь онлайн"
}
else ; или
{
MsgBox, Пользователь оффлайн. ; Если не нашли, то пишем "Пользователь оффлайн"
}
FileDelete, Online.txt ; Удаляем, созданный файл.
Cheater CM - 07.08.2014
R178832205026 - WebMoney
410011146154167 - Money Yandex
|
|
|
|
|
| Jamely |
Дата: Воскресенье, 15.06.2014, 18:06 | Сообщение # 2
|
Сообщений: 1603
Статус: Offline
|
1) Неверно будет показывать, т.к. тупо ищется слово "Online", а оно может быть либо в статусе, либо на стене
2) Файл проверяется не построчно (как указывается в комментариях), а сразу полной строкой. Да и вообще не нужно здесь проверять построчно
3) Накидал за пару секунд:
Код #CommentFlag // // Директива CommentFlag меняет вид комментариев с символа ";" на другой, в данном случае "//" // Мне просто удобнее такой вид комментариев =) TempDir := A_Temp "\vk-status-checker" // Обозначение пути к папке для временного хранения скачиваемого файла TempFile := TempDir "\online.txt" // Обозначение пути ко временному хранению скачиваемого файла FileCreateDir, %TempDir% // Создание временной папки, ибо URLDownloadToFile не умеет создавать папки ShowInputBox: // Обозначение метки InputBox, id, Чекер статуса ВКонтакте, Введите ID/ник пользователя // Создание GUI с полем для ввода в него ID/ника пользователя ВКонтакте if id= // Если ничего не было введено, то... { Msgbox, 0x10, Чекер статуса ВКонтакте, Введите ID/ник пользователя Goto, ShowInputBox // Переход к метке ShowInputBox } URLDownloadToFile, https://api.vk.com/method/getProfiles?uids=%id%&fields=online, %TempFile% // Скачивание содержимого указанной страницы во временный файл FileRead, status, %TempFile% // Считывание содержимого временного файла в переменную "status" if status contains "online":1 { Msgbox, 0x40, Чекер статуса ВКонтакте, Пользователь "%id%" онлайн ExitApp // Закрытие программы } if status contains "online":0 { Msgbox, 0x40, Чекер статуса ВКонтакте, Пользователь "%id%" оффлайн ExitApp // Закрытие программы } Msgbox, 0x10, Чекер статуса ВКонтакте, Произошла ошибка ExitApp // Закрытие программы
Сообщение отредактировал Ruskadance - Воскресенье, 15.06.2014, 18:08 |
|
|
|
|
| Sergo_bro2 |
Дата: Воскресенье, 15.06.2014, 19:40 | Сообщение # 3
|
Coder
Сообщений: 892
Статус: Offline
|
Ruskadance, За пару секунд  тогда лучше заменить UrlDownloadToFile -> WinHTTPRequest, быстрее будет загружаться 
CS:GO RANK: SUPREME*Клац*
[b][+]Skype: sergeiplugatyr
|
|
|
|
|
| uBass |
Дата: Воскресенье, 15.06.2014, 23:18 | Сообщение # 4
|
► This is uBass ◄
Сообщений: 7
Статус: Offline
|
Sergo_bro2, слишком сильно придрался 
Кстати насколько я знаю WinHttpRequest работает только на 1.1+ версиях АНК
Skype: cm.ubass
uBot: http://cheat-master.ru/forum/160-329104
|
|
|
|
|
| Sergo_bro2 |
Дата: Понедельник, 16.06.2014, 03:54 | Сообщение # 5
|
Coder
Сообщений: 892
Статус: Offline
|
uBass, Всё, хватит флудить.  P.S. Можно переписать и под 1.0
CS:GO RANK: SUPREME*Клац*
[b][+]Skype: sergeiplugatyr
|
|
|
|
|
|
|
| Artem_Buero |
Дата: Понедельник, 16.06.2014, 16:17 | Сообщение # 7
|
Сообщений: 4223
Статус: Offline
|
Еminem, Sergo_bro2, uBass, А что есть разница? 
Раньше можно было юзать 1.0 ради защиты,а теперь зачем?
МОЙ ВК - https://vk.com/gospodin_buero
|
|
|
|
|
|
|
| Artem_Buero |
Дата: Вторник, 24.06.2014, 17:12 | Сообщение # 9
|
Сообщений: 4223
Статус: Offline
|
Еminem, таких людей куча со всеми не договоришся,и не обязательно в паб сливать.
Тыж Артинга прошь но в паб не сливаешь 
Да и 1.0 гораздо хуже чем 1.1 бессмысленно его юзать только что-бы ресоурсехакером код не достали,мпресс или упх есть
МОЙ ВК - https://vk.com/gospodin_buero
|
|
|
|
|
| PULSE_{ON} |
Дата: Среда, 09.07.2014, 21:49 | Сообщение # 10
|
Бывалый
Сообщений: 307
Статус: Offline
|
Цитата Artem_Buero (  ) Да и 1.0 гораздо хуже чем 1.1
Цитата Ruskadance ( ) ищется слово "Online", а оно может быть либо в статусе, либо на стене
Видимо, из-за этого, сможешь исправить?
Было 956 репы-обнулили((
|
|
|
|
|
| o_O_Eminem_O_o |
Дата: Суббота, 12.07.2014, 13:19 | Сообщение # 11
|
Новичок
Сообщений: 9
Статус: Offline
|
PULSE_{ON}, Ruskadance же дал код
Krankenschwester gefickt
|
|
|
|
|
