| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
работа с netshell.dll или сетевой картой в windows [D7, WinXP]
artemca © (2006-09-08 13:46:00)Привет всем!
Если кто-то разбирался с сетевухой,
а именно - ее включение/выключение программно на delphi
или
знает как работать с netshell.dll (ее описание/набор ее функций, чтобы вызывать их из delphi)
ПЛИЗЗЗЗЗЗ!!!!!!!! подскажите, буду очень благодарен.
ЗАРАНЕЕ ОГГГГРОММНОЕЕ СПАСССИБО!!!!!!
Джо (2006-09-08 21:21:00) [1]Файл net_off.vbs:
strComputer = "."
Set objWMIService = GetObject( _
"winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration " _
& "Where IPEnabled = True")
For Each objNetCard in colNetCards
objNetCard.ReleaseDHCPLease()
Next
====
Файл net_on.vbs:
strComputer = "."
Set objWMIService = GetObject( _
"winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration " _
& "Where IPEnabled = True")
For Each objNetCard in colNetCards
objNetCard.RenewDHCPLease()
Next
:-)
artemca (2006-09-08 21:14:00) [2]НАПИШИТЕ пожайлуста как программно(на delphi или *.bat-файлом)
выключить подключение по локальной сети (сетевую карту)
Сергей М. (2006-09-08 14:02:00) [3]netshell.dll знать не знает ни про какие "сетевухи", эта библиотека работает с сетевыми интерфейсами, а не с физ.устройствами.
| |
