![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
программно отключить соединение по локальной [D6, D7, WinXP]
denissoft © (2007-05-01 17:55:00)Здравствуйте!
Как правильно программно отключить соединение по локальной сети а после чего его подсоединить либо заменить ip адрес в MS Server 2003
smirnov (2007-05-04 13:25:00) [1]http://msdn2.microsoft.com/en-us/library/aa394595.aspx
smirnov (2007-05-04 13:07:00) [2]ссылка на MSDN
ms-help://MS.MSDNQTR.v80.en/MS.MSDN.v80/MS.WIN32COM.v10.en/wmisdk/wmi/wmi_tasks__networking.htm
там приведены примеры работы с сетевым адаптером через WMI, с vbscript переписать на Delphi можно просто, используя пример
var SWbemLocator, objWMIService, Adapters: variant;
begin
SWbemLocator := CreateOleObject('WbemScripting.SWbemLocator');
objWMIService = SWbemLocator.ConnectServer('LocalHost','\ROOT\CIMV2','','','','',128);
Adapters := objWMIService.ExecQuery('Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True');
//и т.д. почти в полном соответствии с примерами на vbscript
end;
Но насколько я понял, используя WMI нельзя отключить адаптер, который использует статический IP, зато можно поменять статический IP, далее копай сам.