_GetNetConn()
For $i = 0 to UBound( $aNetConnect, 0 )-1
If $aNetConnect[$i][0].Name = 'NameOfConnection' Then
If $aNetConnect[$i][1] = True Then
$aNetConnect[$i][3].DoIt ; Отключить
tti('OFF', 500)
Else
$aNetConnect[$i][3].DoIt ; Включить
tti('ON', 500)
EndIf
EndIf
Next
Func tti($message, $time)
ToolTip(@CR&" "&@CR&" "& "" &@CR&" "&@CR&" ", Default, Default, $message, 1, 5)
sleep($time)
ToolTip("")
EndFunc