Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Разное > Ваши программы
Перезагрузить страницу

PhoeniX VK

Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Закрытая тема
Страница 1 из 2 1 2 >
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 31.01.2010, 05:42
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
  
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию PhoeniX VK
Итак, я начал работу над мега-грандиозным проектом, под названием PhoeniX VK.
Почему PhoeniX? посмотрите на мой ник и всё поймёте (да, сельфпиар никому не мешает)
Почему VK? Потому что связан с таким ресурсом, как В Контакте, он же VK.

Проект будет вестись с закрытым исходным кодом. На этом форуме многие меня знают, я не стану подсаживать в прогу вирусы и трояны, и тем более высылать пароли себе. Если кто не доверяет - прошу в Л.С., вышлю исходник. Но только по личной просьбе.

Первые наработки:
1. Входит.
2. "Не входит" (оповещение о неверном пароле).

В следующей версии:
1. Работа галок (автовход и сохранение пароля).
2. Получение "счётчиков" (сообщения, друзья, видео и т.д.)
3. Открытие ссылок (тех что слева) в браузере по умолчанию.

Все версии будут тут

Прямая ссылка на первую версию

З.Ы. для честности решил выложить первую, самую сырую версию опен-сорц - вдруг кому пригодится процедура входа... см. вложение src0.1.rar
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Последний раз редактировалось PhoeniX, 06.05.2011 в 08:52.
  #2  
Старый 31.01.2010, 12:26
Аватар для Admin
Admin Admin вне форума
Администратор
  
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,533
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию
А что за программа то? )
Для чего она нужна?
Какие функции?
Описание, скрины имеются? ))
  #3  
Старый 31.01.2010, 12:52
ART ART вне форума
Продвинутый
  
Регистрация: 13.02.2006
Адрес: Магнитогорск
Сообщения: 669
Репутация: 14745
По умолчанию
Не могу исходник скачать. Скиньте мне кто нить на мыло плиз
  #4  
Старый 31.01.2010, 12:58
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
  
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию
По логике, это типо всё-в-одном для контакта. должно быть...
Из функций (это в будущем) - оповещения (цифры в меню слева), обмен сообщениями, принятие/отклонение дружбы, музыкальный/видео плейер, обзор Новостей... пока больше не придумал, но 100% будут ещё функции.

Скринить кнопку входа? О_о ну ладно, раз так хочется...
Описание ещё не сочинил.

1 - КнопкЕ.
2 - НажатЭ КнопкЕ
3 - УГ
4 - Пароль КакбЭ невернЭ, Онотоле какбЭ не одобряЕ...
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Последний раз редактировалось PhoeniX, 06.05.2011 в 08:52.
  #5  
Старый 31.01.2010, 16:00
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
  
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию
Готов фотожопный логотип моего проекта, который и будет на заставке...
Галки работают, осталось счётчики сделать... пока не выкладываю.

01,02,2010 17:23 - обновлено
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Последний раз редактировалось PhoeniX, 06.05.2011 в 08:52.
  #6  
Старый 31.01.2010, 17:38
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
  
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию
"В контакте" уже занятое имя. Лучше что-то другое используйте.
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
  #7  
Старый 01.02.2010, 17:24
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
  
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию
Обновил, тот реально бред...
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
  #8  
Старый 14.02.2010, 15:56
Аватар для NekitoSSSS
NekitoSSSS NekitoSSSS вне форума
Начинающий
  
Регистрация: 02.05.2009
Адрес: Башкортостан, г.Благовещенск
Сообщения: 142
Версия Delphi: XE
Репутация: 13
По умолчанию
DJ PhoeniX, не мог бы ты переписать самую первую опен-сорец версию на idHttp? немного непонятно как это работает на сокетах((
  #9  
Старый 25.02.2010, 20:59
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
  
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию
Indy-тяжеловесов решил не использовать...

Поскольку нечего делать...
Описание процесса входа (шаг за шагом):
1. Инициализация запроса входа - нажимаем "Вход" на главной странице.
Метод: POST
Куда: http://login.vk.com/?act=login
Что: "email=ВАШ_ЛОГИН&pass=ВАШ_ПАРОЛЬ&expire=&vk="
Получаем:
1. Cookies (их надо как-то сохранять...)
2. Форму, которая через JS автоматом отправляется (нам придётся её разобрать и отправить самим). Форма следующего содержания:
Код HTML:

<html>
  <head>
    <meta http-equiv='content-type' content='text/html; charset=windows-1251' />
  </head>
  <body onload="document.getElementById('l').submit();">
    <form id='l' method='post' action='http://vkontakte.ru/login.php'>
      <input type='hidden' name='op' id='op' value='slogin' />
      <input type='hidden' name='redirect' id='redirect' value='1' />
      <input type='hidden' name='expire' id='expire' value='0' />
      <input type='hidden' name='to' id='to' value='' />
      <input type='hidden' name='s' id='s' value='ТУТ_ДЛИННЫЙ_ХЭШ_ДАННЫХ' />
    </form>
  </body>
</html>
2. Отправляем форму по назначению.
Метод: POST
Куда: http://vkontakte.ru/login.php
Что: "op=slogin&redirect=1&expire=0&to=&s=ТУТ_ДЛИННЫЙ_Х ЭШ_ДАННЫХ"
Получаем:
А получаем мы редирект на /profile.php
Не забываем про Cookies... Их надо сохранить...
3. Финал. Идём на главную.
Метод: GET
Куда: http://vkontakte.ru/profile.php
Что: просто загружаем. Не забываем про Cookies.

Нам надо загрузить /profile.php, чтоб контакт подумал, что мы - тупой браузер. Кстати, нам опять надо разобрать и записать Cookies. А то что-то там такое....

И, да. После всего этого полученный profile.php можно сразу распарсить и получить счётчики.

Всё, мы вошли. С этими Cookies можно спокойно загружать любые страницы. Да, кстати, если нас на первом этапе выкидывает на http://vkontakte.ru/login.php?m=1&email=ВАШ_ЛОГИН, то мы уже НЕ вошли.

Тут нужно хорошо знать HTTP-заголовки, и уметь парсить HTML.

Кто хочет покопаться в процессе входа самостоятельно, посмотрите на исходник основной страницы vkontakte.ru, и после этого - лог переходов в любом локальном HTTP-proxy (том же Charles, например...)

Ждите, к утру отлажу версию 0.2, там уже есть счётчики, имя, аватар. Больше пока не успел...
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Последний раз редактировалось PhoeniX, 28.02.2010 в 02:34.
  #10  
Старый 28.02.2010, 03:54
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
  
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию
Вот, как и обещал... ver 0.2
Кстати, если кто хочет, можете присоединяться к проекту. Обязательно хорошее знание сокетов в Delphi, HTTP и HTML. Писать в ПМ.
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
  #11  
Старый 01.03.2010, 22:15
Andrey53 Andrey53 вне форума
Прохожий
  
Регистрация: 02.06.2009
Сообщения: 20
Репутация: 12
По умолчанию
Цитата:
Сообщение от DJ PhoeniX
Вот, как и обещал... ver 0.2
Кстати, если кто хочет, можете присоединяться к проекту. Обязательно хорошее знание сокетов в Delphi, HTTP и HTML. Писать в ПМ.
Присоеденился бы, если бы с Инди работал
  #12  
Старый 05.03.2010, 13:37
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
  
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию
Почему нет ни одного отзыва....? Хоть что-то бы увидеть...
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
  #13  
Старый 05.03.2010, 18:58
Аватар для AleD
AleD AleD вне форума
Активный
  
Регистрация: 21.02.2009
Адрес: г.Краснокаменск
Сообщения: 383
Репутация: 91
По умолчанию
Цитата:
Сообщение от DJ PhoeniX
Почему нет ни одного отзыва....? Хоть что-то бы увидеть...
Ниже следующий текст - моё скромное мнение, нежели отзыв

Моё мнение - это для самых ленивых, те кому лень зайти на сайт и посмотреть что нового, либо для самых заядлых ВКонтактеров до пены которые не могут пропустить ни одного сообщения или новой фотки виртуального дружка => имхо

Извени, я не такой, мне это не надо
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
  #14  
Старый 23.05.2010, 16:10
Аватар для NekitoSSSS
NekitoSSSS NekitoSSSS вне форума
Начинающий
  
Регистрация: 02.05.2009
Адрес: Башкортостан, г.Благовещенск
Сообщения: 142
Версия Delphi: XE
Репутация: 13
По умолчанию
проект заброшен, да??((
  #15  
Старый 23.05.2010, 16:52
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
  
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию
Пока приостановлен... Я буду позже переписывать программу полностью на Vkontakte API.
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Последний раз редактировалось PhoeniX, 23.05.2010 в 16:55.
Закрытая тема
Страница 1 из 2 1 2 >

« Предыдущая тема | Следующая тема »

Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Линейный вид Линейный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 21:04.

Обратная связь - Главная страница сайта Delphi Sources - Вверх

 

Сайт

Форум

FAQ

RSS лента

Прочее
 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter