1

Тема: AHK: Отключение сетевой карты

Всем доброго времени суток.
Не подскажите можно ли с помощью AHK отключить/включить сетевую карту?
У меня XP SP3, и видимо поэтому через команду netsh в CMD не получается.

2

Re: AHK: Отключение сетевой карты

Немного подправив этот код:

sConnection =  ; написать название сетевого подключения, как в папке "Сетевые подключения"

NetConnect(0   ; 1 — включить, 0 — отключить
	, sConnection)

NetConnect(bEnable, sConnection)
{
	if sConnection =
	{
		MsgBox, Напишите название сетевого подключения!
		ExitApp
	}
	strEnableRus := "&Включить", strEnableEng := "En&able"
	strDisableRus := "&Отключить", strDisableEng := "Disa&ble"
	CSIDL_CONNECTIONS := 0x31

   For oConn In ComObjCreate("Shell.Application").Namespace(CSIDL_CONNECTIONS).Items
	{
		If  (oConn.Name = sConnection)
		{
			If (oConn.Verbs.Item(0).Name = bEnable ? strEnableRus : strDisableRus)
				|| (oConn.Verbs.Item(0).Name = bEnable ? strEnableEng : strDisableEng)
				oConn.Verbs.Item(0).DoIt
			Sleep, 1000
			Break
		}
	}
}
Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder

3

Re: AHK: Отключение сетевой карты

Спасибо! Всё работает.