Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.05.2011, 17:51   #1
n_o
Новичок
Джуниор
 
Регистрация: 20.04.2011
Сообщений: 1
По умолчанию Приверить существует ли xml дента по заданному url адресу.

Добрый день жители форума, подскажите пожалуйста, для курсовой нужно.

Парсит заголовки новостей.

XMLHTTP: Variant;
xmldomdocument: IXMLDOMDocument;
xmldomnodelist: IXMLDOMNodeList;

XMLHTTP:=CreateOleObject('Microsoft .XMLHTTP');
XMLHTTP.open('GET',host, False);
XMLHTTP.send('');

if XMLHTTP.status=200 then
begin
xmldomdocument:=(IUnknown(XMLHTTP.r esponseXML) as IXMLDOMDocument);
xmldomnodelist:=xmldomdocument.getE lementsByTagName('title');
for i:=0 to 11 do
if xmldomnodelist[i].parentNode.nodeName='item'
then Listbox2.Items.Add(xmldomnodelist.i tem[i].text);
end;

Не подскажите, как проверить существует ли xml лента по заданному url (url храниться в host(string)). если она не существует, то выпадает ошибка.
Пробовал писать:
if XMLHTTP='' then showmessage('ленты нет');, но тип variant (насколько я знаю) можнет принимать любые значени и поэтому видимо не корректно писать такой оператор условия.
n_o вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
сформировать xml-файл на основе другого xml-файла NieL Общие вопросы Delphi 2 21.12.2010 15:49
Вызов функции по её адресу nowaalex Общие вопросы C/C++ 5 22.08.2010 19:18
не записываются данные по указанному адресу s2dentishe Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 1 27.05.2010 14:42
парсер XML, не видит XML тэги supercelt PHP 3 02.11.2009 19:18
Взятие значения по адресу nusik Общие вопросы C/C++ 1 25.05.2009 01:59