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

Вниз

как получить имя хоста по его IP адресу   Найти похожие ветки 

 
ALexe   (2002-10-30 11:17) [0]

Братья и сестры =о)
Если не в лом - КАК использовать обратное преобразование адресов - т.е. зная IP получить имя хоста ?

заранее благодарен за все предложения!!


 
ALexe   (2002-10-30 11:19) [1]

в смыслее на Delphi =0)


 
Mischka ©   (2002-10-30 15:39) [2]


uses Winsock

function getNameOf(const IP: string): string;
var
h: PHostEnt;
addr: TSockAddr;
GInitData: TWSADATA;
begin
WSAStartup($101, GInitData);
Result:="";
addr.sin_addr.s_addr:=inet_addr(pchar(IP));
if addr.sin_addr.s_addr<>INADDR_NONE then
begin
h:=gethostbyaddr(@addr.sin_addr.s_addr, sizeof(addr), AF_INET);
if h<>nil then Result:=h^.h_name
end;
WSACleanup
end;


 
ALexe   (2002-10-31 10:39) [3]

Спасибо за подсказку - я не знал как присвоить этот addr !!!
=o)
Спасибо брат !!!!!



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

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

Наверх




Память: 0.47 MB
Время: 0.018 c
14-86077
777
2002-12-04 23:49
2002.12.26
Кто сейчас пьет пиво?


1-85931
Vlad
2002-12-17 14:36
2002.12.26
Как???


1-86001
RDA
2002-12-16 11:02
2002.12.26
Active X - F1Book


14-86123
MsGuns
2002-12-05 13:08
2002.12.26
FibPLUS требует регистрацию


3-85832
Анонимщик
2002-12-06 14:46
2002.12.26
Системные таблицы; Delphi6; Interbase