MacCentre.ru Форум
Форум по компьютерам Mac, Mac OS X и продукции Apple
 
ПравилаПравила   FAQFAQ   ПоискПоиск  РегистрацияРегистрация   ПрофильПрофиль   Войти и проверить ЛСВойти и проверить ЛС   ВходВход 
Включение/отключение Internet Sharing при помощи AppleScript
Начать новую тему   Ответить на тему Список форумов MacCentre.ru Форум » Программирование и Beta-тестирование   
Автор Сообщение
Darky



Reputation: 0    

Зарегистрирован: 12.11.2008
Сообщения: 11
Откуда: Москва

СообщениеДобавлено: Fri Nov 14, 2008 12:38
Включение/отключение Internet Sharing при помощи AppleScript
Ответить с цитатой

Я использую ноутбук дома и на работе. Дома есть wi-fi, а вот на работе нет.
Так же есть iPhone, который должен иметь доступ к инету.
Приходится на работе включать Internet Sharing, но если его не отключить, то при включении макбука дома приходится лезть в настройки и отключать, чтобы AirPort мог приконнектиться к Wi-Fi-сети.

На Mac OS Hints было решение, но для Leopard'a оно не подходит.
Был найден способ на одном зарубежном форуме.

Скрипт работает на включение/отключение Internet Sharing'а.

Надеюсь он будет кому-то полезен.

Сам скрипт:
Код:
tell application "System Preferences"
   activate
   set current pane to pane "com.apple.preferences.sharing"
end tell

tell application "System Events"
   tell process "System Preferences"
      if (value of checkbox 1 of row 10 of table 1 of scroll area 1 of group 1 of window "Sharing") is equal to 0 then
         click checkbox 1 of row 10 of table 1 of scroll area 1 of group 1 of window "Sharing"
         try
            click button "Activate Airport" of sheet 1 of window "Sharing"
         end try
         
         try
            click button "Start" of sheet 1 of window "Sharing"
         end try
         
      else
         if (value of checkbox 1 of row 10 of table 1 of scroll area 1 of group 1 of window "Sharing") is equal to 1 then
            click checkbox 1 of row 10 of table 1 of scroll area 1 of group 1 of window "Sharing"
            
         end if
         
      end if
   end tell
   
end tell
ignoring application responses
   tell application "System Preferences" to quit
end ignoring
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
Aha_pupok



Reputation: 0    

Зарегистрирован: 14.07.2003
Сообщения: 139
Откуда: [мск]

СообщениеДобавлено: Mon Nov 17, 2008 20:43
Ответить с цитатой

sudo /usr/libexec/InternetSharing
-d клютчь для дебага
и дальше гуглом

_________________
http://www.applescript.ru
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Посетить сайт автора ICQ Number
Показать сообщения:   
Начать новую тему   Ответить на тему Список форумов MacCentre.ru Форум » Программирование и Beta-тестирование Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы можете добавлять приложения в этом форуме
Вы можете скачивать файлы в этом форуме


Связь с администраторами

Powered by phpBB © 2001, 2005 phpBB Group