Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Вниз

Определяю IP   Найти похожие ветки 

 
kukuikar ©   (2004-09-16 17:50) [0]

Определяю IP в локальной сети по имени компа:
const
 WINSOCK_VERSION = $0101;

function GetIPAddress(name: string): string;
var
 WSAData: TWSAData;
 p: PHostEnt;
begin
 WSAStartup(WINSOCK_VERSION, WSAData);
 p := GetHostByName(PChar(name));
 Result := inet_ntoa(PInAddr(p.h_addr_list^)^);
 WSACleanup;
end;

на одном из компов стоит WinProxy и IP этого компа не определяется. Можно это обойти?


 
kukuikar ©   (2004-09-17 09:07) [1]

куку


 
Verg ©   (2004-09-17 09:25) [2]


> на одном из компов стоит WinProxy и IP этого компа не определяется.
> Можно это обойти?


А какая разница чего там стоит или не стоит на одном из компов. Он может быть вообще выключен.

GetHostByName делает запрос DNS серверу, и если тот знает соответствие данного имени адресу, то и отвечает этим(и) адресом(ми).
Есть еще файл  \SYSTEM32\DRIVERS\etc\hosts - там можно ручками прописать соответствие на свой вкус.


 
kukuikar ©   (2004-09-17 09:32) [3]

I>
> Есть еще файл  \SYSTEM32\DRIVERS\etc\hosts

Этот файл на сервере надо править?


 
kukuikar ©   (2004-09-17 09:34) [4]

все понял у меня.
Так в чем тогда проблема, в DNS сервере?


 
kukuikar ©   (2004-09-17 09:37) [5]

Хорошо, hosts поправил,
а если бы я не знал IP компа, тоя бы и не смого его определить по имени.
В чем проблеме?
В коде или?


 
Verg ©   (2004-09-17 10:02) [6]

Ты сначала скажи какая сеть-то у тебя.


> Так в чем тогда проблема, в DNS сервере?


А он вообще у тебя есть в сети?

Если сеть с nbt, то адрес из NetBios имени может вычисляться из кэша nbt.
Но, этот адрес динамический - живет недолго.
См.
nbtstat -c


 
kukuikar ©   (2004-09-17 10:07) [7]


> Ты сначала скажи какая сеть-то у тебя.

Microsoft Windows Network - если вы это имеете в виду.
Сервер Server 2003, по моему.
Я то его видел один раз.
......
Ничего не понимаю...
Нда, тяжело без книжки, надо бы прикупить... по сетям.



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

Форум: "Сети";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.044 c
3-1099032577
Miss
2004-10-29 10:49
2004.11.28
TUpdateSQL


1-1100256613
qp
2004-11-12 13:50
2004.11.28
Освобождение памяти


4-1097144751
Delphi5.01
2004-10-07 14:25
2004.11.28
Может у кого есть пример как использовать ReadDirectoryChangesW?


1-1100285777
CherrLy
2004-11-12 21:56
2004.11.28
Приравнять динамические переменные


4-1097776220
dkDimon
2004-10-14 21:50
2004.11.28
Список папок/файлов





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский