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

Вниз

ipconfig.exe на Delphi   Найти похожие ветки 

 
StarEvil ©   (2004-04-11 01:06) [0]

Вот пытался написать ipconfig.exe(из WINXP) на Delphi, но ничего не получилось...Может кто знает как это сделать. Или хотя бы как делать /release и /renew на Delphi, как это делает ipconfig.exe


 
-=Demon=-   (2004-04-11 03:22) [1]

Вот тебе небольшой кусок кода который тебе возвращает все
ip-адреса твоего компа, если у твоего компа один IP-адрес то он тебе его укажет. Заранее предупреждаю это код не мой а Rouse_ так что он обладает всеми АВТОРСКИМИ правами на него (если что заранее перед ним извиняюсь).

{----Вычисление IP-адреса}

WSAStartup(MAKEWORD(2,2), SAData);
GetHostName(name, $FF);
p := GetHostByName(Name);
while (p.h_addr_list^ <> nil) do
begin
  ApAddres:=inet_ntoa(PInAddr(p.h_addr_list^)^);
  Inc(p.h_addr_list);
end;
{------------------------------------}

Надеюсь ты разберешся.....


 
StarEvil ©   (2004-04-11 22:43) [2]

Спасибо -=Demon=-, но причем тут этот код....Мне же нужно "обновить" и "отпустить" IP (/renew, /release), а этот код лишь возврашает ip адреса компа....Или я чего то не понимаю...Объясни пожалуйства.



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

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

Наверх




Память: 0.47 MB
Время: 0.05 c
8-1079355310
Руслан
2004-03-15 15:55
2004.05.30
Векторная графика на Delphi


14-1083914781
Гарри Поттер
2004-05-07 11:26
2004.05.30
Коммерческая конференция - имеет право на жизнь? Ваше мнение?


14-1084267185
NeyroSpace
2004-05-11 13:19
2004.05.30
Восстановление WinXP на NoteBook


6-1081396969
valex1
2004-04-08 08:02
2004.05.30
Отправка через MicroSoft Outlook


14-1083917961
malkolinge
2004-05-07 12:19
2004.05.30
Интересно есть на форуме хоть один человек, кто ни разу