Изменение статического адреса на динамический
 

День добрый, подскажите как дописать в батник команду что бы часть кода выполнялась от имени администратора домена, команда на изменение статического IP на динамический

netsh interface ip set address "LAN" dhcp
netsh interface ip set dns "LAN" dhcp

или вызывался еще один батник уже от имени администратора домена.
Спасибо.

Читаем:
пользуем.

с помощью runas запущу cmd от имени администратора , как в это cmd записать команды netsh ?

romanss, cmd /?

romanss, runas /noprofile /user:pc-admin\admin "cmd /c netsh interface ip set address "LAN" dhcp"

А зачем Вам там вообще cmd?!

есть порядка 200 компьютеров, на 120 IP раздается dhcp, на остальных прописана статика , бегать по всем у кого прописана статика не охота по этому нужен батник . При входе пользователя срабатывает уже батник с подключением сетевых дисков, вот в него и хотел бы добавить 2-3-5 строчек что бы при каждом заходе статику меняло на динамику. Что бы получить динамику нужно запускать "от имени локального администратора" (от имени администратора домена не срабатывает ) . может есть проще способ ( администратор домена + реестр )

х

Или не батник. Например, WSH, PoSH.

Есть. Пересмотреть саму технологию, при которой требуются подобные выкрутасы.

Iska, поможете в решении данной проблемы ?

Помогаю: vbscript enable dhcp - Поиск в Google. И применяйте не к пользователям, а к машинам.

Iska, как применять к машинам а не к пользователям ?

при входе срабатывает батник

net use z: /delete
if not exist z: (net use z: \\10.10.10.55\vesna&& echo Диск z: подключен)

:: Присвоение имени
CScript /B "%~dp0\apr_files\ok_diskname.vbs">nul

в скрипте вот что
On Error Resume Next
Set objShell = CreateObject("Shell.Application")
CreateObject("Shell.Application").NameSpace("z:").Self.Name="Отдел ОК"


Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Popup "Тест скрипта "

все срабатывает до момента появления окна , тоже самое и с изменением DHCP через скрипт vbs не меняет IP
скрипт на изменение IP
On Error Resume Next

strComputer = "."
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\" & strComputer & " ootcimv2")
Set colNicConfs = objWMIService.ExecQuery _
("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")

strStatus = ""

For Each objNicConf In colNicConfs

strStatus = strStatus & "Network Adapter: " & objNicConf.Index & VbCrLf & objNicConf.Description & VbCrLf

If Not objNicConf.DHCPEnabled Then
WScript.Echo " Enabling DHCP ..."
intStatus = objNicConf.EnableDHCP

If intStatus = 0 Then
strStatus = strStatus & " - DHCP enabled successfully"
Else
strStatus = strStatus & " - Cannot enable DHCP"
End If

Else
strStatus = strStatus & "DHCP already enabled with Server: " & objNicConf.DHCPServer
End If
strStatus = strStatus & VbCrLf & VbCrLf
Next

Wscript.Echo strStatus

Групповая политика, «Startup scripts».

Забудьте. У пользователя может не быть прав. С чего, собственно, и началась тема.

проблема с групповыми политиками , при создании новой политики выпадает вот такое окно [IMG][/IMG] и никакие политики не работают.. по этому все сделано на батниках которые срабатывают при входе пользователя, по этому нужно или скриптом, или батником.

Вот именно эту проблему и надо решать. Только в другом разделе. А не делать дыру в безопасности, пытаясь обойти ограничения на запрет изменений настроек сетевого соединения с привилегиями простого пользователя.