Исходное сообщение
"Экстренное выключение серверов!!!!" Отправлено Julia, 09-Фев-06 11:32
Я подобное делала, если долго нет света, и UPS уже не тянет, то через 5 мин. после отключения света на 2003м сервере(подключенном к ЮПС) подымается скрипт, который отстреливает коннекты к серверу БД, коннктится на линукс под юзером БД, сворачивает БД, коннектится туже же под рутом, и делает шатдаут линукса, после чего ЮПС шатдаунит и сам 2003. Для этого нужен ssh на сервере, и plink.exe для винды (http://the.earth.li/~sgtatham/putty/latest/alpha/plink.exe) Сам скрипт shutdown.vbs ======== rem  SCRIPT FOR SHUTDOWN LINUX FROM W2003 (XP)     rem = Terminate sessions to database (процесс devs_cli.exe - вместо него поставить свои процессы, котрые нужно убить) strComputer = "." Set objWMIService = GetObject("winmgmts:" _     & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colProcessList = objWMIService.ExecQuery _     ("Select * from Win32_Process Where Name = 'devs_cli.exe'") For Each objProcess in colProcessList     objProcess.Terminate() Next rem ========  закрытие БД на 1 компе Dim oShell_1 Set oShell_1 = WScript.CreateObject("WScript.Shell") strBackupCommand = "cmd /c d:\plink -ssh -pw ПАРОЛЬ_БД_ЮЗЕРА  БД_ЮЗЕР@192.168.1.1 /home/БД_ЮЗЕР/shutdown_database" intResult = oShell_1.Run(strBackupCommand, 1, TRUE) rem =========  шатдаун на 1 компе rem === shutdown linux + save automate ssh key for root on linux Dim oShell_2 Set oShell_2 = WScript.CreateObject("WScript.Shell") strBackupCommand = "cmd /c d:\plink -ssh -pw ПАРОЛЬ_РУТА root@192.168.1.1 shutdown -h now" intResult = oShell_2.Run(strBackupCommand, 1, TRUE) rem ========== .... comps В скрипте проставь пароли и юзеров Для других Win можешь запускать plink из .cmd PS. В первый запуск тебя переспросит насчет сохранения ключа на сервере

Ваше сообщение
Имя*:
EMail:	Для отправки новых сообщений в текущей нити на email укажите знак ! перед адресом, например, !user@host.ru (!! - не показывать email). Более тонкая настройка отправки ответов производится в профиле зарегистрированного участника форума.
Заголовок*:
Сообщение*:	> Я подобное делала, если долго нет света, и UPS уже не тянет, > то через 5 мин. после отключения света на 2003м сервере(подключенном к > ЮПС) подымается скрипт, который отстреливает коннекты к серверу БД, коннктится на > линукс под юзером БД, сворачивает БД, коннектится туже же под рутом, > и делает шатдаут линукса, после чего ЮПС шатдаунит и сам 2003. > Для этого нужен ssh на сервере, и plink.exe для винды (http://the.earth.li/~sgtatham/putty/latest/alpha/plink.exe) > Сам скрипт shutdown.vbs > ======== > rem SCRIPT FOR SHUTDOWN LINUX FROM W2003 (XP) > rem = Terminate sessions to database (процесс devs_cli.exe - вместо него поставить > свои процессы, котрые нужно убить) > strComputer = "." > Set objWMIService = GetObject("winmgmts:" _ > & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") > Set colProcessList = objWMIService.ExecQuery _ > ("Select * from Win32_Process Where Name = 'devs_cli.exe'") > For Each objProcess in colProcessList > objProcess.Terminate() > Next > rem ======== закрытие БД на 1 компе > Dim oShell_1 > Set oShell_1 = WScript.CreateObject("WScript.Shell") > strBackupCommand = "cmd /c d:\plink -ssh -pw ПАРОЛЬ_БД_ЮЗЕРА БД_ЮЗЕР@192.168.1.1 /home/БД_ЮЗЕР/shutdown_database" > intResult = oShell_1.Run(strBackupCommand, 1, TRUE) > rem ========= шатдаун на 1 компе > rem === shutdown linux + save automate ssh key for root on > linux > Dim oShell_2 > Set oShell_2 = WScript.CreateObject("WScript.Shell") > strBackupCommand = "cmd /c d:\plink -ssh -pw ПАРОЛЬ_РУТА root@192.168.1.1 shutdown -h now" > intResult = oShell_2.Run(strBackupCommand, 1, TRUE) > rem ========== .... comps > В скрипте проставь пароли и юзеров > Для других Win можешь запускать plink из .cmd > PS. В первый запуск тебя переспросит насчет сохранения ключа на сервере
	Введите код, изображенный на картинке: