Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Получить IP-адрес автоматически / 6 сообщений из 6, страница 1 из 1
16.07.2007, 13:01
    #34660818
Kuzal
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получить IP-адрес автоматически
В свойствах сетевого подключения (TCP/IP) была установлена галочка на "Получить IP-адрес автоматически", с помощью VB скрипта забиваю статический адрес. А как программно вернуть галочку на "Получить IP-адрес автоматически"? Вручную поставить не могу, не хватает прав администратора.
...
Рейтинг: 0 / 0
16.07.2007, 13:47
    #34661020
IguMEN
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получить IP-адрес автоматически
Попробуй через "Пуск"->"Выполнить" запустить gpedit.msc

Поройся там. На мой взгляд, не стоит для этого писать спец программу
...
Рейтинг: 0 / 0
16.07.2007, 14:24
    #34661237
Kuzal
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получить IP-адрес автоматически
Попробовал выполнить gpedit.msc, выдало ошибку групповой политики:
У вас нет разрешения на выполнение этой операции
...
Рейтинг: 0 / 0
16.07.2007, 14:37
    #34661295
Nikz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получить IP-адрес автоматически
а как бы взглянуть на скрипт при при помощи которого забивался статический адрес?
мож я чего и не понимаю, но если у вас не хватает прав на то что бы поставить эту галку, то не должно хватать прав и на то что бы ее снять и забить статический адрес, хоть бы даже и скриптом, он же работает от вашего имени...
...
Рейтинг: 0 / 0
16.07.2007, 14:40
    #34661310
Kuzal
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получить IP-адрес автоматически
strComputer = "."
Set objWMIService = GetObject( _
"winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration " _
& "where IPEnabled=TRUE")
strIPAddress = Array("172.21.58.1")
strSubnetMask = Array("255.255.0.0")
For Each objNetAdapter In colNetAdapters
errEnable = objNetAdapter.EnableStatic( _
strIPAddress, strSubnetMask)
errGateways = objNetAdapter.SetGateways( _
strGateway, strGatewaymetric)
Next
...
Рейтинг: 0 / 0
13.08.2007, 17:56
    #34724648
Armani
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Получить IP-адрес автоматически
gpedit.msc не работает в home edition
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Получить IP-адрес автоматически / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]