ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование_OLD > С/С++, C#, Delphi, .NET, Asm
Перезагрузить страницу Авторизоваться на рамблер
   
 
Страница 2 из 3 < 1 2 3 >
 
Опции темы Поиск в этой теме Опции просмотра

  #11  
Старый 16.04.2010, 17:13
fenixelite
Участник форума
Регистрация: 07.02.2010
Сообщений: 189
Провел на форуме:
870084

Репутация: 79
Отправить сообщение для fenixelite с помощью ICQ
По умолчанию
aydar
showmessage(x.version);
Где X - любой компонент инди.
 

  #12  
Старый 16.04.2010, 17:17
aydar
Участник форума
Регистрация: 12.11.2009
Сообщений: 160
Провел на форуме:
568182

Репутация: 11
По умолчанию
http://slil.ru/28968531
 

  #13  
Старый 16.04.2010, 17:44
fenixelite
Участник форума
Регистрация: 07.02.2010
Сообщений: 189
Провел на форуме:
870084

Репутация: 79
Отправить сообщение для fenixelite с помощью ICQ
По умолчанию
aydar, вот попробуй

Код:
procedure TForm1.btn1Click(Sender: TObject);
var
params : tstringlist;
begin
  params := TStringList.Create;
 try
  params.Add('back=http://mail.rambler.ru/mail/startpage');
  params.Add('login=логин');
  params.Add('domain=rambler.ru');
  params.Add('passw=пароль');
  mmo1.Text := IdHTP1.Post('http://id.rambler.ru/script/auth.cgi',params);
  finally
    if Pos('logout',mmo1.Text)>0 then
     ShowMessage('âîøëè');
    params.Free;

end;
end;
В idhttp - AllowCookie = false.
 

  #14  
Старый 16.04.2010, 19:16
ZdezBilYa
Участник форума
Регистрация: 29.08.2008
Сообщений: 151
Провел на форуме:
1551582

Репутация: 107
Отправить сообщение для ZdezBilYa с помощью ICQ
По умолчанию
Цитата:
Сообщение от EndLeSSDre@M  
ну можешь без нее... просто она исходную ссылку делает... можешь сразу

PHP код:
procedure TForm1.Button1Click(Sender: TObject); 
var StrPage, ssylka:string; 
    Data:TstringList; 
begin 
 idhttp1.HandleRedirects:=true; 
 Data:=TstringList.Create; 
 Data.Add('st.posted=set'); 
 Data.Add('st.email='+Edit1.Text); 
 Data.Add('st.password='+Edit2.Text); 
 Data.Add('button_go=Войти'); 
 StrPage:=idhttp1.Post('http://id.rambler.ru/script/auth.cgi', Data); 
 if Pos('Logoff', StrPage)<>0 then 
  Label3.Caption:='Залогинились' 
 else Label3.Caption:='Не получилось'; 
 Data.Free; 
end; 
это у меня просто с другого сайта было... там так надо было делать...

Называется "Скопируй чужой код, замени "odnoklassniki.ru" на "rambler.ru" и выдай за свой!))
Это код из моего урока про авторизацию на одноклассниках. И это точно не "у меня просто с другого сайта".
Как ты там про других говоришь... "очередной быдло кодер"?
 

  #15  
Старый 16.04.2010, 19:22
EndLeSSDre@M
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
Провел на форуме:
3055344

Репутация: 259
Отправить сообщение для EndLeSSDre@M с помощью ICQ
По умолчанию
Цитата:
Сообщение от ZdezBilYa  
Называется "Скопируй чужой код, замени "odnoklassniki.ru" на "rambler.ru" и выдай за свой!))
Это код из моего урока про авторизацию на одноклассниках. И это точно не "у меня просто с другого сайта".
Как ты там про других говоришь... "очередной быдло кодер"?
если ты не заметил, то я не говорил что это мой код!

да говорю! и буду говорить, если вижу что элементарные вещи сделать не могут и собираются что то стоящее написать...
 

  #16  
Старый 16.04.2010, 19:32
ZdezBilYa
Участник форума
Регистрация: 29.08.2008
Сообщений: 151
Провел на форуме:
1551582

Репутация: 107
Отправить сообщение для ZdezBilYa с помощью ICQ
По умолчанию
Цитата:
Сообщение от EndLeSSDre@M  
если ты не заметил, то я не говорил что это мой код!

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

  #17  
Старый 16.04.2010, 19:37
EndLeSSDre@M
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
Провел на форуме:
3055344

Репутация: 259
Отправить сообщение для EndLeSSDre@M с помощью ICQ
По умолчанию
Цитата:
Сообщение от ZdezBilYa  
По твоим постам не заметно, что ты сам что-то понимаешь в запросах. Человек попросил помочь с авторизацией на рамблере, а ты скопировал код для авторизации на одноклассниках, заменив ссылку. Спрашивается зачем? На рамблере естественно он работать не будет. Если просто как пример запроса, то зачем заменять ссылку. Это только вводит в заблуждение всех
я не спорю, я не умею пользоваться запросами... все никак заняться не могу, виноват. Но как и большинство других, я учусь по другим примерам... смотрю примерное решение и переделываю под себя... думаю и этот код можно переделать под себя, после работы снифера.
 

  #18  
Старый 17.04.2010, 17:51
aydar
Участник форума
Регистрация: 12.11.2009
Сообщений: 160
Провел на форуме:
568182

Репутация: 11
По умолчанию
Цитата:
Сообщение от fenixelite  
aydar, вот попробуй

Код:
procedure TForm1.btn1Click(Sender: TObject);
var
params : tstringlist;
begin
  params := TStringList.Create;
 try
  params.Add('back=http://mail.rambler.ru/mail/startpage');
  params.Add('login=логин');
  params.Add('domain=rambler.ru');
  params.Add('passw=пароль');
  mmo1.Text := IdHTP1.Post('http://id.rambler.ru/script/auth.cgi',params);
  finally
    if Pos('logout',mmo1.Text)>0 then
     ShowMessage('все ок!!!');
    params.Free;

end;
end;
В idhttp - AllowCookie = false.

В роде щас без ошибок, но запускаю проект и он сразу исчезает вот код:

Цитата:
procedure TForm1.Button1Click(Sender: TObject);
var
params : tstringlist;
begin
params := TStringList.Create;
try
params.Add('back=http://mail.rambler.ru/mail/startpage');
params.Add('login=ëîãèí');
params.Add('domain=rambler.ru');
params.Add('passw=ïàðîëü');
memo1.Text := IdHTTP1.Post('http://id.rambler.ru/script/auth.cgi',params);
finally
if Pos('logout',memo1.Text)>0 then
ShowMessage('все ок');
params.Free;

end;
end;

Последний раз редактировалось aydar; 17.04.2010 в 17:54..
 

  #19  
Старый 17.04.2010, 18:20
aydar
Участник форума
Регистрация: 12.11.2009
Сообщений: 160
Провел на форуме:
568182

Репутация: 11
По умолчанию
хм, может это у меня с идни что-то, а ту такое твориться со всеми прогами с инди
 

  #20  
Старый 17.04.2010, 18:20
[stranger]
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028

Репутация: 28
Отправить сообщение для [stranger] с помощью ICQ
По умолчанию
дайте кто-то мыло-ящик, регать парит
на винсоке накатаю
 
 
Страница 2 из 3 < 1 2 3 >



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


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


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




ANTICHAT.XYZ