Скрипт изменения сетевых настроек

[align]

О ужас, оказывается без кабеля даже wmic nicconfig where index=7 call SetTcpipNetbios 2 не работает... похоже без кабеля ничего не будет работать.

[diagnoz_]

align,
Ну конечно а как без этого! :)

[align]

diagnoz_, ну вот нет кабеля и все :) я придумал другой путь, но не могу реализовать, бьюсь второй час. Написал на другому форуме, но там предлагают vbs. Сижу читаю про vbs, но там еще хуже чем в cmd ))) может ты и в этом шаришь?!?! Заодно заценишь ход моей извращенной мысли ))

Через командную строку нужно отредактировать один параметр реестра, подраздел которого доконца не известен:
reg add "HKLM\SYSTEM\CurrentControlSet\services\NetBT\Parameters\Interface\TCPIP_{abcd}" /v NetbiosOptions /t reg_dword /d 2 /f

как вместо abcd подставить результат запроса

wmic nicconfig where index=8 get settingid
SettingID
{1BA36A12-4D81-4838-92EF-A39325522CF1}

diagnoz_, как видишь я нашел параметр который содержит ключ реестра с нужным интерфейсом

[Iska]

Хуже, чем в cmd быть не может.

[align]

Хуже, чем в cmd быть не может. »
Согласен :) Просто я в cmd хоть что-то знаю, а в vbs не разу не был...

[align]

На другом форуме помогли с написанием vbs скрипта, может кому-то интересно:

Dim objWMIService, colItems, objItem, SettingID, WshShell
Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE TcpipNetbiosOptions=0",,48) (или WHERE Index=7)
For Each objItem in colItems
SettingID = objItem.SettingID
Next
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\services\NetBT\Parameters\Interfaces\TCPIP_" & SettingID & "\NetbiosOptions" , 2, "REG_DWORD"

остался один параметр
1. Во вкладке Сеть убрать галочку с Протокол интернета версии 6 »
Редактирование реестра по совету MS не помогало. Буду рад услышать советы, а пока буду читать...