Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » CMD/BAT - Запуск программы на компьютерах в домене

Ответить
Настройки темы
CMD/BAT - Запуск программы на компьютерах в домене

Пользователь


Сообщения: 87
Благодарности: 7

Профиль | Отправить PM | Цитировать


Собственно, есть элементарный батник со следующим кодом:
Код: Выделить весь код
@echo off
start \\путь_к_программе\prog.exe
При запуске всех компов в домене запустится данная программка - напоминалка о днях рождениях. Меня волнует вопрос - как дополнить данный код, чтобы данная программа убилась из процессов через n-ное количество времени, скажем, 10 минут? Просто одновременно эту прожку запустят на 50 компах - нагрузка на серверный комп, откуда она стартанет, соответственно, возрастет? Да и не нужна она на компьютерах пользователей, висящая в трее целый день. Запустили, посмотрели, через 10 минут она убилась сама.
Как это сделать?

Отправлено: 16:07, 27-06-2012

 

Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Цитата -KeyMaster-:
Просто одновременно эту прожку запустят на 50 компах - нагрузка на серверный комп, откуда она стартанет, соответственно, возрастет? »
Отчего бы?! У неё там база на 10 Гб, к которой она ежесекундно обращается?


Цитата -KeyMaster-:
через 10 минут она убилась сама. »
Например, так (скрипт VBScript):
читать дальше »
Код: Выделить весь код
Option Explicit

Dim objSWbemLocator
Dim objSWbemServicesEx
Dim lngProcessID


Set objSWbemLocator    = WScript.CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServicesEx = objSWbemLocator.ConnectServer(".", "root\cimv2")

If objSWbemServicesEx.Get("Win32_Process").Create("\\путь_к_программе\prog.exe", Empty, Nothing, lngProcessID) = 0 Then
	WScript.Sleep 1000 * 60 * 10
	
	If objSWbemServicesEx.Get("Win32_Process.Handle='" & CStr(lngProcessID) & "'").Terminate() = 0 Then
		'
	End If
End If

Set objSWbemServicesEx = Nothing
Set objSWbemLocator    = Nothing

WScript.Quit 0
P.S. Останется фантомная иконка в System Tray.
Это сообщение посчитали полезным следующие участники:

Отправлено: 17:01, 27-06-2012 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » CMD/BAT - Запуск программы на компьютерах в домене

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
[решено] Установка батника на запуск на всех компах в домене. -KeyMaster- Microsoft Windows NT/2000/2003 2 09-06-2012 16:37
Доступ - [решено] Запуск выборочных программ без UAC в домене? Rockon Microsoft Windows 7 5 03-03-2012 09:37
2008 R2 - [решено] Установка программы по сети, на клиентских компьютерах. hotsauce Windows Server 2008/2008 R2 8 19-10-2011 10:19
Доступ - Запуск программы пользователем (с правами админа) на ПК в домене Axiles_UA Microsoft Windows 7 2 01-09-2010 18:30
Прочее - смена ip на всех компьютерах в домене Gaara_of_the_Desert Сетевые технологии 4 05-02-2008 17:14




 
Переход