ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > SЕО/Финансовые задачи/Социальные сети > Социальные сети
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #51  
Старый 22.12.2009, 19:05
BenLadenBest
Новичок
Регистрация: 26.04.2009
Сообщений: 8
Провел на форуме:
568815

Репутация: 11
По умолчанию

Решение для Delphi


Зависимости: ActiveX, SHDocVw, MSHTML, установленный Internet Explorer версии 5.0 и выше
Автор: BenLadenBest
Дата: 22 декабря 2009 17:30

function decode_hash (script:widestring; hash:string):string;
var
WB:TWebBrowser;
Document:IHTMLDocument2;
V:OleVariant;
text:string;
begin
wb:=TWebBrowser.Create(nil);
text:='<html><head>'+
script+
'</head><body><script type="text/javascript">document.write(decode_hash('''+hash+'' '))</script></body></html>';
if WB.Document = nil then
WB.Navigate('about:blank');
while WB.Document = nil do
Application.ProcessMessages;
Document := WB.Document as IHtmlDocument2;
V := VarArrayCreate([0, 0], varVariant);
V[0] := Text;
document.Write(PSafeArray(TVarData(v).VArray));
document.Close;
result := (document.all.Item(NULL, 0)
as IHTMLElement).innerText;
wb.Free;
end;

//используем
procedure TForm1.Button3Click(Sender: TObject);
var
sc:string;
begin
//Парсим со страницы скрипт декодирования
sc:='<script type="text/javascript">window.decode_hash = function(hash){return (function(__){'+
'return _(__,8,_____(__)-12)+_(__,0,5);})((function(__){____='''';for(___=0 ;___<_____(__);++___)____+=______(__,_____(__)-___-1);return ____;})'+
'((function(__){____='''';for(___=0;___<_____(__); ++___)____+=(function(__){return __>109?(119-__):String.fromCharCode(__);})(__.charCodeAt(___)) ;return ____;})((function(__){______=function(__,___){retu rn __.charAt(___);};_____=function(__)'+
'{return __.length;};____=(_=function(_,__,___){____='''';( ___=___?________(_)-__));for(;___;--___)____+=(function(_,__){return ______(_,__)})(_,__++);return ____;})(__,3,3);____+=_(__,0,2)+_(__,8);return ____;})(hash))));};</script>';

//Передаем в функцию
showmessage (decode_hash (sc,'bf3539cf65cda089fa'));
end;


свой софт обновлю чуть позже, не паникуйте

Последний раз редактировалось BenLadenBest; 22.12.2009 в 19:26..
 
Ответить с цитированием

  #52  
Старый 22.12.2009, 19:21
mallina
Guest
Сообщений: n/a
Провел на форуме:

Репутация:
По умолчанию

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

  #53  
Старый 22.12.2009, 20:47
seriyPS
Новичок
Регистрация: 29.10.2009
Сообщений: 0
Провел на форуме:
62065

Репутация: 0
По умолчанию

хе.. вконтакте подправили
window.decodehash = function(hash){...}
window.decode_hash = window.decodehash;
Т.е. функцию декодирования спарсить терь сложнее..
Товарисчи из ВК палюбому эту тему читают..
 
Ответить с цитированием

  #54  
Старый 22.12.2009, 21:16
elektrik13
Новичок
Регистрация: 12.12.2009
Сообщений: 0
Провел на форуме:
100011

Репутация: 0
По умолчанию

Оставить выкладывание решений и кодов в паблике...ПМ и АСЯ
 
Ответить с цитированием

  #55  
Старый 22.12.2009, 21:27
M_script_
Постоянный
Регистрация: 29.10.2008
Сообщений: 306
Провел на форуме:
1819761

Репутация: 180
Отправить сообщение для M_script_ с помощью ICQ
По умолчанию

Цитата:
Сообщение от seriyPS  
хе.. вконтакте подправили
window.decodehash = function(hash){...}
window.decode_hash = window.decodehash;
Т.е. функцию декодирования спарсить терь сложнее..
Товарисчи из ВК палюбому эту тему читают..
Спарсить не сложнее, а вот полностью код выкладывать тут не стоило. Достаточно было бы функции для обработки JS.
 
Ответить с цитированием

  #56  
Старый 22.12.2009, 21:28
Xeleon1
Новичок
Регистрация: 18.08.2009
Сообщений: 1
Провел на форуме:
266653

Репутация: 0
По умолчанию

Мля, как вы за*бали, может сразу кодерам Вк постучитесь и покажите свой код обхода???
 
Ответить с цитированием

  #57  
Старый 22.12.2009, 22:03
GeraMon
Познающий
Регистрация: 03.09.2009
Сообщений: 32
Провел на форуме:
1664245

Репутация: 2
По умолчанию

точно, все решения в приват !
 
Ответить с цитированием

  #58  
Старый 22.12.2009, 22:34
Mixon
Участник форума
Регистрация: 12.03.2008
Сообщений: 254
Провел на форуме:
12333903

Репутация: 238
Отправить сообщение для Mixon с помощью ICQ
По умолчанию

ыыыыыыыыыыыыыыыыы)))))))))))))))
видел кто-то что-то за вкопт говорит,там всё поправят,не боитесь,уже перебороли все практически))
 
Ответить с цитированием

  #59  
Старый 22.12.2009, 23:02
BenLadenBest
Новичок
Регистрация: 26.04.2009
Сообщений: 8
Провел на форуме:
568815

Репутация: 11
По умолчанию

Да мне это чисто для образовательных целей То что код в паблик да ну и ладно... вы так рассуждаете как будто кодеры ВК это кто то другой не с этой планеты, они так же как и все когда что то придумывают думают методы обхода своих же решений, они знали что данное введение это отсев некоторых игроков да и только... Начинается тоже самое как в свое время с протоколом ICQ кому то просто надоело кто то просто забил...
 
Ответить с цитированием

  #60  
Старый 22.12.2009, 23:09
Mixon
Участник форума
Регистрация: 12.03.2008
Сообщений: 254
Провел на форуме:
12333903

Репутация: 238
Отправить сообщение для Mixon с помощью ICQ
По умолчанию

Вполне согласен с постом выше ^^^... Идеальной защиты не бывает,так же как ничего идеального не бывает...ну,кроме,фотомодел й и их попок))))ыыы
бог с ним,обойдём как то защиты...Я лично поддерживаю дурова,потому как сейчас спамят все кому не лень,школьникам от нечего делать спамить нерозумно бесплатными спамерами,им на пиво а нам сотни непрочитаных сообщений спама....Такчто посли новых нововведений,люди,которые по розумному етим занимаються они и за 100 и за 500$ возьмут работающий софт,а вот школьникам облом,а нам спокойстиве...
такчто с некоторой стороны ето и хорошо даже,хоть и у самого весь софт по умерал))
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ВКонтакте "счастливый фермер" ЖенькО Социальные сети 309 22.07.2009 11:35
Proxy FAQ foreva Чужие Статьи 12 04.01.2008 12:15



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ