[решено] команды отключить/включить сетевую карту?

[super_bitard]

нужны две команды: отключение и включение сетевой карты (если невозможно в cmd, то хотя бы в vbs)

[Petya V4sechkin]

super_bitard, в этой теме (http://forum.oszone.net/thread-145863.html) пример.

[super_bitard]

сорри, но devcon и другие сторонние утилиты - это не true

[cameron]

netsh interface set interface ?

[amel27]

хотя бы в vbs »
' strConn : имя сетевого подключения
' bState : vbTrue - включить, vbFalse - отключить

Function SetConnState (strConn, bState)
Dim objShell,objCP
Dim colNetwork,clsConn,clsLANConn,clsVerb
Dim strNetConn,strEnable,strDisable
SetConnState=vbFalse

strNetConn = "Сетевые подключения"
' strNetConn = "Network Connections"

strEnable = "&Включить"
' strEnable = "En&able"

strDisable = "&Отключить"
' strDisable = "Disa&ble"
' -----------------------------
Set objShell = CreateObject("Shell.Application")
Set objCP = objShell.Namespace(3)

Set colNetwork = Nothing
For Each clsConn in objCP.Items
If clsConn.Name = strNetConn Then
Set colNetwork = clsConn.getfolder
Exit For
End If
Next

If colNetwork Is Nothing Then
WScript.Echo "Network folder not found"
Exit Function
End If

Set clsLANConn = Nothing
For Each clsConn in colNetwork.Items
If LCase(clsConn.name) = LCase(strConn) Then
Set clsLANConn = clsConn
Exit For
End If
Next

If clsLANConn is Nothing Then
WScript.Echo "Network Connection not found"
Exit Function
End If

For Each clsVerb in clsLANConn.verbs
If (bState=vbFalse AND clsVerb.name=strDisable) OR (bState=vbTrue AND clsVerb.name=strEnable) Then
clsVerb.DoIt
WScript.Sleep 1000
SetConnState=vbTrue
End If
Next
End Function

[super_bitard]

vbs-скрипт не работает

[Iska]

super_bitard, работает. Каков язык Вашей ОС? В точности ли Вы указываете при вызове функции из Вашего скрипта имя соединения?
SetConnState "Подключение по локальной сети", True
SetConnState "Подключение по локальной сети", False

[super_bitard]

проверял на лиц. xp: английской и русской версиях, к сожалению что-то в скрипте не срабатывает, хотя скрипт старательный.

имя подключения: local area connection

подставлял, где ' strConn : имя сетевого подключения" - безрезультатно

если что, вот скрин сетевых подключений

[amel27]

super_bitard, подобных скриптов в гугле немеренно (http://www.google.ru/search?hl=ru&q=objShell.Namespace%283%29&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA+%D0%B2+Google&lr=#sclient=psy&hl=ru&lr=&newwindow=1&q=%22objShell.Namespace(3)%22+%22local+area+connection%22&aq=f&aqi=&aql=&oq=&pbx=1&fp=a94469432f4666fc), для англ. XP нужно заменить переменные:
' strNetConn = "Сетевые подключения"
strNetConn = "Network Connections"

' strEnable = "&Включить"
strEnable = "En&able"

' strDisable = "&Отключить"
strDisable = "Disa&ble"
' -----------------------------