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
   
 
 
Опции темы Поиск в этой теме Опции просмотра

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

Репутация: 11
По умолчанию Авторизоваться на рамблер

Ребят помогите пожалуйста с кодом авториз на рамблере, дельфи инди
 

  #2  
Старый 16.04.2010, 15:45
jecka3000
Постоянный
Регистрация: 15.03.2008
Сообщений: 441
Провел на форуме:
2052341

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

поддерживаю))
только вот мне был бы полезен C# =))
 

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

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

сколько пробовал, уже ниче не получаеться
 

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

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

Цитата:
procedure TForm1.Button1Click(Sender: TObject);
var
params,responseres:tstringlist;
begin
params:=TStringList.Create;
responseres:=TStringList.Create;
try
params.Add('login=programmers');
params.Add('domain=rambler.ru');
params.Add('passw=1234');
responseres.Text:= IdHTTP1.Post('http://id.rambler.ru/script/auth.cgi',params);
if Pos('logout',responseres.Text)>0 then
ShowMessage('Автороизовались!');
finally
params.free;
responseres.free;

end;

end;
end.
Что не правильно?
 

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

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

а зачем у тя процедура pars?
 

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

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

вот такую ошибку выдает
[Error] dclIndyCore70.dpk(34): Packages 'indy' and 'IndyCore70' both contain unit 'IdThreadComponent'

в чем проблема?
 

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

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

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
IdHTTP;
 

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

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

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,
IdTCPClient, IdHTTP;

Это наверно мой сраный инди, пытался новую версию установить, но выдает ошибку при установке((

Packages 'indy' and 'IndyCore70' both contain unit 'IdThreadComponent'

Последний раз редактировалось aydar; 16.04.2010 в 16:49..
 

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

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

вот такую херню пишет http://i053.radikal.ru/1004/34/d3810479b563.jpg

зы как узнать установленную версию инди в дельфи 7?
 

  #10  
Старый 16.04.2010, 17:11
Sunstrider
Banned
Регистрация: 09.04.2010
Сообщений: 181
Провел на форуме:
475927

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

скинь исх покываряю
 
 





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


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




ANTICHAT.XYZ