Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как узнать ай-пи сервера [D6]

Novichek © (2002-10-16 01:07:00)
в общем есть локальная сеть и сервер, через который ходят в интернет. как с любой из этих локалок узнать ай-пи сервера?

Novichek (2002-10-31 18:09:00) [1]
>Polevi
библиотеку нашел, но твой код не работает почему-то... :(((

ты не мог бы мне скинуть рабочий пример на e-mail? пожалуйста.

Polevi (2002-10-31 09:37:00) [2]
Пуск/Найти/Файлы и папки пробовал ?

Novichek (2002-10-31 00:21:00) [3]
а где iphlpapi.dll взять?

Polevi (2002-10-30 10:20:00) [4]
PS
Winsock в uses добавить забыл

Polevi (2002-10-30 10:19:00) [5]
uses Windows, Classes, Sysutils;

type
TIPFORWARDROWSTRUCT=record
dwForwardDest:DWORD;
dwForwardmask:DWORD;
dwForwardPolicy:DWORD;
dwForwardNextHop:DWORD;
dwForwardIfIndex:DWORD;
dwForwardType:DWORD;
dwForwardProto:DWORD;
dwForwardAge:DWORD;
dwForwardNextHopAS:DWORD;
dwForwardMetric1:DWORD;
dwForwardMetric2:DWORD;
dwForwardMetric3:DWORD;
dwForwardMetric4:DWORD;
dwForwardMetric5:DWORD;
end;

PTCPROWSTRUCT=^TCPROWSTRUCT;

function GetIpForwardTable(ipForwardTable:Pointer;dwSize:PDWORD;order:boolean):DWORD;stdcall;external "iphlpapi.dll";

//возвращает первый следующий узел, он обычно является шлюзом по умолчанию
function GetDeafultGate:string;
var
buffer:Pointer;
bufSize:DWORD;
ifr:PIPFORWARDROWSTRUCT;
begin
Result:="";
bufSize:=0;
GetIpForwardTable(nil,@bufSize,false);
GetMem(buffer,bufSize);
try
GetIpForwardTable(buffer,@bufSize,false);
ifr:=PIPFORWARDROWSTRUCT(Integer(buffer)+sizeof(DWORD));
Result:=inet_ntoa(TInAddr(ifr.dwForwardNextHop));
finally
FreeMem(buffer);
end;
end;

Novichek (2002-10-29 18:36:00) [6]
кстати через реестр негодится - укаждой винды (95,98,хр, ...) эта информация находится в разных местах

Anar (2002-10-28 15:29:00) [7]
Знаю можно так:

Start -> Run -> command

В DOS окне набери ping <имя сервера> и он тебе выдаст о севере локльной сети подробную информаци. У этой комманды ещё до фига опций.

А если через Delphi - то думаю надо в регистре покопаться...

Novichek (2002-10-28 14:25:00) [8]
помогите кто небудь, пожалуйста!!!!!!!

Andrey Klimov (2002-10-23 18:33:00) [9]
Напиши мне на мыло, я вышлю маленький архив, где ТОЧНО в граммах, сказано "как сделать это, и не только это"....

Novichek (2002-10-23 18:19:00) [10]
>>Romych
у меня в реестре на локалках нет такого пути:
[HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0008]

Novichek (2002-10-22 12:30:00) [11]
>>Romych
у меня в реестре на локалках нет такого пути:
[HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0008]

Ocean (2002-10-21 19:22:00) [12]
Не согласен, господа, а вопрос интересный. А если работает DHCP? Правильно ответила blondy, но интересно, как ipconfig это делает. И еще, как узнать реальный ip-адрес, которого и ipconfig не дает?

Romych (2002-10-21 12:45:00) [13]
Поищи в реестре
[HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0008]

Цыфирок в конце может быть много в реестре надо нийти те которые нужно :)

RV (2002-10-21 12:28:00) [14]
DefaultGateway поищи в реестре

Novichek (2002-10-21 11:48:00) [15]
а как это будет програмно?

Novichek (2002-10-18 03:47:00) [16]
а как это будет програмно?

Dr_Mike (2002-10-18 02:00:00) [17]
Под виндой dообще все просто до безобразия - локальное подключение -> свойства -> протокол ТСП/ИП -> свойства -> Шлюз по умолчанию (Default Gateway)- сюда обычно если уж прописывают админы что-то, то это скорее всего тот самый сервер и есть - так уж у нас сети обычно строят :-)))

Novichek (2002-10-18 01:17:00) [18]
a chto takoe "IPCONFIG" i kak im polzovatsa?

блондинка (2002-10-16 17:52:00) [19]
IPCONFIG

Digitman (2002-10-16 17:47:00) [20]
спроси у сисадмина.
самый простой и надежный способ

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »