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



Репутация: 0    

Зарегистрирован: 23.01.2017
Сообщения: 99

СообщениеДобавлено: Пн Сен 25, 2017 15:01
Скрипт переподключения сетевых шар
Ответить с цитатой

Здравствуйте знатоки.
Достался такой скрипт на подключение сетевых шар:
Код:
set uName to "логин:пароль"

set myVolumeLabel1 to "шара1"
set myVolumeLabel2 to "шара2"
set myVolumeLabel3 to "шара3"
set myVolumeLabel4 to "шара4"
--set myvolumeLabel5 to "старый_сервер"
set myVolumeLabel6 to "шара1-1"
set myVolumeLabel7 to " шара2-1"
set myVolumeLabel8 to "шара3-1"
set myVolumeLabel9 to "шара4-1"
--set myvolumeLabel10 to "старый_сервер-1"
set myVolumeLabel11 to "шара1-2"
set myVolumeLabel12 to "шара2-2"
set myVolumeLabel13 to "шара3-2"
set myVolumeLabel14 to "шара4-2"
--set myvolumeLabel15 to "старый_сервер-2"


set myMountString1 to "smb://домен;логин:пароль@сервер1/шара1"
set myMountString2 to "smb:// домен;логин:пароль @ сервер2/ шара2"
set myMountString3 to "afp:// домен;логин:пароль @сервер3/ шара3"
--set myMountString3 to "smb:// домен;логин:пароль @старый_сервер/шара"
set myMountString4 to "http:// домен;логин:пароль @сервер4/ шара4"
--set myMountString5 to "afp:// домен;логин:пароль @старый_сервер2/шара"

set myMountString6 to "smb:// домен;логин:пароль@сервер1/шара1-1"
set myMountString7 to "smb:// домен;логин:пароль @ сервер2/ шара2-1"
set myMountString8 to "afp:// домен;логин:пароль @сервер3/ шара3-1"
--set myMountString8 to "smb:// домен;логин:пароль @старый_сервер/шара-1"
set myMountString9 to "http:// домен;логин:пароль @сервер4/ шара4-1"
--set myMountString10 to "afp:// домен;логин:пароль @старый_сервер2/шара-1"

set myMountString11 to "smb:// домен;логин:пароль@сервер1/шара1-2"
set myMountString12 to "smb:// домен;логин:пароль @ сервер2/ шара2-2"
set myMountString13 to "afp:// домен;логин:пароль @сервер3/ шара3-2"
--set myMountString13 to "smb:// домен;логин:пароль @старый_сервер/шара-2"
set myMountString14 to "http:// домен;логин:пароль @сервер4/ шара4-2"
--set myMountString15 to "afp:// домен;логин:пароль @старый_сервер2/шара-2"


tell application "Finder"
   
   repeat while (disk myVolumeLabel1 exists)
      eject myVolumeLabel1
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel2 exists)
      eject myVolumeLabel2
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel3 exists)
      eject myVolumeLabel3
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel4 exists)
      eject myVolumeLabel4
      delay 1
   end repeat
   
   --   repeat while (disk myvolumeLabel5 exists)
   --      eject myvolumeLabel5
   --      delay 1
   --   end repeat
   
   repeat while (disk myVolumeLabel6 exists)
      eject myVolumeLabel6
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel7 exists)
      eject myVolumeLabel7
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel8 exists)
      eject myVolumeLabel8
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel9 exists)
      eject myVolumeLabel9
      delay 1
   end repeat
   
   --   repeat while (disk myvolumeLabel10 exists)
   --      eject myvolumeLabel10
   --      delay 1
   --   end repeat
   
   repeat while (disk myVolumeLabel11 exists)
      eject myVolumeLabel11
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel12 exists)
      eject myVolumeLabel12
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel13 exists)
      eject myVolumeLabel13
      delay 1
   end repeat
   
   repeat while (disk myVolumeLabel14 exists)
      eject myVolumeLabel14
      delay 1
   end repeat
   
   --   repeat while (disk myvolumeLabel15 exists)
   --      eject myvolumeLabel15
   --      delay 1
   --   end repeat
   
end tell


tell application "Finder"
   
   mount volume myMountString1
   mount volume myMountString2
   mount volume myMountString3
   mount volume myMountString4
   --   mount volume myMountString5
   
end tell




однако недавно начались проблемы с одной из шар (пусть будет шара1), с ней периодически пропадает коннект и через какое-то время снова становится доступной. Перезапуск скрипта никак не помогает заного переподключить шару, приходится ручками искать подключённую шару и делать ей дисконнект.
Нельзя ли как-нибудь автоматизировать это?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Hisoka



Репутация: 0    

Зарегистрирован: 23.01.2017
Сообщения: 99

СообщениеДобавлено: Вт Сен 26, 2017 14:56
Ответить с цитатой

как идею, нашёл:
сидим, пингуем
пинг пропал, запускаем цикл восстановления:
пингуем до восстановления связи, потом под монтируем диск, перезапускаем программу, выходим из цикла восстановления
сидим, пингуем дальше.

кто может помочь со скриптом?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Показать сообщения:   
Начать новую тему   Ответить на тему Список форумов MacCentre.ru Форум » Mac и Mac OS X Страница 1 из 1

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


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

Powered by phpBB © 2001, 2005 phpBB Group