Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.25;
Скачать: CL | DM;

Вниз

TCP / IP   Найти похожие ветки 

 
1+random(9999)   (2005-07-08 14:08) [0]

Привет всем !!! Подскажите пожалуйста как проверить существование домена в глобальной сети...


 
Big Joe   (2005-07-08 14:14) [1]

Сейчас напишу


 
Digitman ©   (2005-07-08 14:20) [2]

ping domain_name


 
Big Joe   (2005-07-08 14:26) [3]

Определяет существование указанного доменного имени
пытаясь определить соответствующий IP-адрес.

Зависимости: WinSock    
BekZhan@Almaty.KazPost.kz  
***************************************************** }

function CheckDomain(Domain: string): Boolean;
var
 Error: DWORD;
 HostEntry: PHostEnt;
 Data: WSAData;
 Address: In_Addr;
begin
 Result := False;
 Error := WSAStartup(MakeWord(1, 1), Data);
 if Error = 0 then
 begin
   HostEntry := gethostbyname(PChar(Domain));
   Result := GetLastError = 0;
 end;
 WSACleanup();
end;


 
1+Random(9999)   (2005-07-08 14:31) [4]

Спасибо братка.. :)))



Страницы: 1 вся ветка

Текущий архив: 2005.07.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.035 c
14-1120416195
Магнум
2005-07-03 22:43
2005.07.25
Программа-автоопределитель


14-1120253617
паша_голубь :-)
2005-07-02 01:33
2005.07.25
Благодарность


14-1120131748
Иксик
2005-06-30 15:42
2005.07.25
Можно ли переоформлять билеты на поезд на Украине?


3-1118384256
Fynjy1984
2005-06-10 10:17
2005.07.25
Проблема с полем Time


4-1117218902
JagaJiga
2005-05-27 22:35
2005.07.25
Обвести кнопку на тулбаре чужого окна при наведении мышью