IdHTTP

← →
oracled © (2008-11-19 13:21) [0]

Хочу передать текст страницы в memo
Повесил на форму компонент IdHTTP
Далее кнопку, и обработчик написал такой:

procedure TForm1.Button1Click(Sender: TObject); var s:string; begin IdHTTP1:=TIdHTTP.create(self); s:=IdHTTP1.Get("http://yandex.ru/"); (тут возникает ошибка) Memo1.Text := s; end;

Так выдаёт ошибку EIHTTPPROTOCOLEXCEPTION, не понимаю в чём может быть дело, может есть у кого мысли?

← →
AIK © (2008-11-19 13:29) [1]

uses GetUrl;

Memo1.Text:=GetPage("http://delphimaster.net/view/2-1227090068/");

← →
AIK © (2008-11-19 13:36) [2]

Это тема тут когдата обсуждалась, и автор ответа предоставлял модуль GetUrl, теперь если надо поиши его в инете, я чужую работу выкладывать небуду

← →
oracled © (2008-11-19 13:41) [3]

AIK
Понятно, спасибо!
А почему пример в теме не работает не в курсе?

← →
AIK © (2008-11-19 13:45) [4]

Да вкурсе, надо так:

s:=IdHTTP1.Get("http://www.yandex.ru/");

забыл www написать

← →
oracled © (2008-11-19 13:49) [5]

Нет, видимо в другом проблемка, ошибка такая же выходит.

← →
AIK © (2008-11-19 13:55) [6]

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, IdHTTP; type TForm1 = class(TForm) Button1: TButton; Memo1: TMemo; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var IdHTTP1: TIdHTTP; begin IdHTTP1:=TIdHTTP.create(self); Memo1.Text :=IdHTTP1.Get("http://www.yandex.ru/"); end; end.

У меня нормально заработала, проверь связь с интернетом

← →
oracled © (2008-11-19 14:06) [7]

Спасибо!
Вроде бы действительно проблема у меня локально.
А для чего нужно писать www ,ведь сайт прекрасно открывается и без www ?

← →
Тын-Дын © (2008-11-19 14:09) [8]

> А для чего нужно писать www ,ведь сайт прекрасно открывается
> и без www ?

можно не писать.

← →
AIK © (2008-11-19 14:10) [9]

> oracled © (19.11.08 14:06) [7]
> Спасибо!Вроде бы действительно проблема у меня локально.
> А для чего нужно писать www ,ведь сайт прекрасно открывается
> и без www ?

Твой браузер сам добавляет www если надо, а чтоб программа могла открывать (то есть дописывать) то эта уже другая тема

← →
AIK © (2008-11-19 14:12) [10]

> Тын-Дын © (19.11.08 14:09) [8]

Проверка показала что нужно

← →
oracled © (2008-11-19 14:14) [11]

всем спасибо за ответы

А ведь есть сайты, которые открыются без www а с www не открываются, да и суть не понятна, www- это домен третьего уровня, зачем мне это нужно, если я хочу открыть домен второго уровня?

хммм

← →
Anatoly Podgoretsky © (2008-11-19 14:25) [12]

> oracled (19.11.2008 14:06:07) [7]

Тебе только кажется, пока не попадешь на сайт, для которого нет алиаса www

← →
Anatoly Podgoretsky © (2008-11-19 14:26) [13]

> oracled (19.11.2008 14:14:11) [11]

Это не домен, кроме того домен ты открыть не можешь, только сайт

← →
oracled © (2008-11-19 14:45) [14]

Anatoly Podgoretsky
Ну а как, скажем попасть на site.spb.ru это тоже алиас?
какое отличие?
всё-таки www - это домен 3го уровня, как ни крути (занимался доменами 5 лет)

← →
oracled © (2008-11-19 15:52) [15]

так и не понял, почему у меня не работает этот скрипт.....
уже запускаю exe файл - нажимаю на кнопку - пишет

" is a valid integer value.

код полностью скопировал у AIK, ну и все нужные компоненты установлены
+ к этому сам писал - ошибка тоже самая.

← →
Anatoly Podgoretsky © (2008-11-19 16:18) [16]

> oracled (19.11.2008 14:45:14) [14]

Очень плохо ты занимался, что не можешь понять, что www это не домен.
Хотя возможность сделать домен тоже существует, но никто так не делает, нафига нужно site1.www.domain.com - siteN.www.domain.com
Я понимаю когда www.Australia.CocaCola.com, www.America.CocaCola.com

← →
oracled © (2008-11-19 16:37) [17]

Anatoly Podgoretsky

http://www.visa.ru/
http://visa.ru/

с www и без www - разные сайты.
www является доменом 3го уровня и ни как не алиасом.

← →
oracled © (2008-11-19 16:44) [18]

+
хотя, домен 3го уровня может быть алиасом 2го, но это является скорее свойством домена чем заменяет само понятие домена.
Опять повторю, что site в site.spb.ru и www в www.spb.ru - ни чем логически не отличаются. можно назвать домен 3го уровня как угодно, хоть wwwwwwwww.yandex.ru - суть не меняется.
И уже дело администратора домена, куда настроить NS сервера этого домена, на сайт домена родителя, или на другой сайт

← →
AIK © (2008-11-19 17:02) [19]

> http://visa.ru/

+ http://visa.com.ru/

> http://visa.com.ru/
+ http://www.visa.com.ru/

Удивительно, дома код работает отлично, на работе выдаёт ошибку...

потому что прокси у тебя на работе...

> oracled © (20.11.08 10:56) [21]

Обрабатывать 301-ю ошибку в http reply - это твоя обязанность.

см. http://www.docwin.ru/article272.html

procedure TForm1.Button3Click(Sender: TObject); var s:string; IdHTTP1: TIdHTTP; begin IdHTTP1:=TIdHTTP.create(self); try s:=IdHTTP1.Get("http://yandex.ru/"); Memo.Text := s; except on e:EIDHTTPPROTOCOLEXCEPTION do Memo.Text := e.ErrorMessage; end; end; В мемо - текст детального отчета об ошибке: <!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN"> <HTML><HEAD> <TITLE>301 Moved Permanently</TITLE> </HEAD><BODY> <H1>Moved Permanently</H1> The document has moved <A HREF="http://www.yandex.ru/">here</A>.<P> </BODY></HTML>

Браузер (или прокси), в отличие от тебя, получив 301-й отказ, идет по указанной в тексте отчета об ошибке ссылке.

Вот тебе и все чудеса с "www")

Зато будет нам рассказывать сказки для детского сада о доменах третьего уровня www

> [25]

Угу.

Люди все разные люди - одних сервер послал "301 Идика-ты на xxx.туда.то" и они внемлют совету, а другие обижаются и начинают рассуждать о превратностях жизни в паутине)

:))) Спасибо за инфо !

IdHTTP Найти похожие ветки