Модераторы: Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> idHttp ,что-то не так. 
:(
    Опции темы
001dark
  Дата 13.3.2007, 16:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 10
Регистрация: 13.3.2007

Репутация: нет
Всего: нет



Нужна прога атоматической регистрации почты допустим www.zmail.ru 
код который я нацарапал, но я немогу никак додуматься как обрабатывать результаты smile 

кнопка "Зрегитрировать"
procedure TForm1.Button1Click(Sender: TObject);
var
data: TStringList;
STR,sfile: String;
begin
STR:='login='+E_login.Text;
STR:=STR+'&domain=zmail.ru';
STR:=STR+'&fullname='+E_fullname.Text;
STR:=STR+'&RecoverPassword='+E_RecoverPassword.Text;
STR:=STR+'&genpass=own';
STR:=STR+'&newpass='+E_newpass.Text;
STR:=STR+'&newpass2='+E_newpass.Text;
STR:=STR+'&captchaId='+E_captchaId.Text;
STR:=STR+'&captchaCode='+E_captchaCode.Text;
STR:=STR+'&create=çàðåãèñòðèðîâàòü';
STR:='http://stat.zenon.net/c/cgpaccount'+'?'+str;
Memo1.text:=STR;
IdHTTP1.HandleRedirects := True;
IdHTTP1.Get(STR);
//else  Showmessage('hER vam!! madam');
button1.Enabled:=false;
Memo1.Lines.Add('ËÎÃÈÍ = '+E_login.Text+'@zmail.ru   , '+ 'Ïàðîëü = '+E_newpass.Text);
Memo1.Lines.Add('áóäåì íàäåÿòüñÿ ,÷òî ðåãèñòðàöèÿ ïðîøëà');
Sfile:=E_login.Text+'@zmail_ru.txt';
memo1.Lines.SaveToFile(sfile);
end;


есть еще одна  кнопка "Получить картину" она грузит исправно картинку.

Теперь собственно в чем вопрос )) 
как делать редиректы В чем неправильность моего кода
В броузере если ящик не зарегистрировался, то он перекинет на страницу с ошибкой или перекинет на страницу с твоей почтой 
я делал так, memo1.Text:=IdHttp1.Response.Location;  не вышло..  Желательно теории по редиректу ну и примерчик 

и прошу исходник проги или пример, короче как можно больше инфы по indy 
PS.. инди ин дептх прочитал, не то (( 
прога работает но не дает результатов. (( 
HELP слишком я долго ее делаю 



PM MAIL ICQ   Вверх
Matematik
Дата 13.3.2007, 18:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1027
Регистрация: 11.3.2006

Репутация: 1
Всего: 50



Если Indy не обрабатывает перенаправление сама (см. параметр HandlRedirekt), то в результате запроса вызывает исключение, которое и надо ловить
См. Список кодов состояния HTTP "Коды перенаправления": http://ru.wikipedia.org/wiki/%D0%A1%D0%BF%...0%B8%D1%8F_HTTP

Код

try
  idHTTP.Post('http://torrents.ru/forum/login.php', s);
except
  on e:Exception do
  begin
    if e is EIdHTTPProtocolException then
      if ((e as EIdHTTPProtocolException).ReplyErrorCode div 100)=3 then
        // перенаправление на другой адрес
end

PM MAIL WWW ICQ   Вверх
001dark
Дата 14.3.2007, 09:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 10
Регистрация: 13.3.2007

Репутация: нет
Всего: нет



а примеры по инди подкиньте, мне описание всех компонент бы smile пожалуйста
PM MAIL ICQ   Вверх
_hunter
Дата 14.3.2007, 12:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: нет
Всего: 98





--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Центр помощи"

ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Несоблюдение правил может повлечь за собой самые строгие меры от закрытия/удаления темы до бана пользователя!


  • Название темы должно отражать её суть! (Не следует добавлять туда слова "помогите", "срочно" и т.п.)
  • При создании темы, первым делом в квадратных скобках укажите область, из которой исходит вопрос (язык, дисциплина, диплом). Пример: [C++].
  • В названии темы не нужно указывать происхождение задачи (например "школьная задача", "задача из учебника" и т.п.), не нужно указывать ее сложность ("простая задача", "легкий вопрос" и т.п.). Все это можно писать в тексте самой задачи.
  • Если Вы ошиблись при вводе названия темы, отправьте письмо любому из модераторов раздела (через личные сообщения или report).
  • Для подсветки кода пользуйтесь тегами [code][/code] (выделяйте код и нажимаете на кнопку "Код"). Не забывайте выбирать при этом соответствующий язык.
  • Помните: один топик - один вопрос!
  • В данном разделе запрещено поднимать темы, т.е. при отсутствии ответов на Ваш вопрос добавлять новые ответы к теме, тем самым поднимая тему на верх списка.
  • Если вы хотите, чтобы вашу проблему решили при помощи определенного алгоритма, то не забудьте описать его!
  • Если вопрос решён, то воспользуйтесь ссылкой "Пометить как решённый", которая находится под кнопками создания темы или специальным флажком при ответе.

Более подробно с правилами данного раздела Вы можете ознакомится в этой теме.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Центр помощи | Следующая тема »


 




[ Время генерации скрипта: 0.0436 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.