» Автоматизация администрирования. Часть 2

Real Root
Если домен есть, лучше настроить политику ограниченного использования программ и позапрещать всем, кроме тех, кто не поставил пиво... Тогда и рубить не надо...
Но это в другую ветку - по политикам.

Посоветуйте плиз.
Есть Exchange 2003 на одном сервере и есть SMTP релей на IIS`е на другом сервере.
Иногда бывает что образуется очередь из 20-100 сообщений на отправку на сервере Exchange... что бы она рассосалась надо рестартить сервер с релеем.

Вопрос ... как смотреть счётчик очереди Exchange =)

OOD
Нужно не сразу несколько зарубить, а зарубить все, кроме notepad, winword и т.д.

Есть хорошая утилита quickkill, которая почемуто в XP SP3 приводит к синему экрану 8E
В английском SP1 когдато работала.

Real Root
ну тогда руками нужно писать
программу которая будет формировать массив данных которые нужно будет килнуть через команду:
tasklist
а дальше в цикле будет грохать всё , кроме notepad, winword, но опять же она не всё грохнет svchost не грохнет и т.д. , где-то видел утилиту которая прибивает любой процесс, но антивирусы возмущаются на неё, её можно тоже прикрутить ,если не критично возмущение антивирусов,но тогда при снятии процессов системных половина винды работать не будет и попросит перегрузиться , вобщем смысл понятен я думаю

Как можно установить ПРОГРАММУ(КОМПАС V10) сразу на 30 компьютеров. или создать
некий файлик в котором будет указано где и как устанавливать галочки для автоматической установки программы(разумеется заранее все пройти на одной машине, вручную и установить все как должно стоять на других компьютерах)
Домен и все права есть.
Где поискать на форуме? Посоветуйте программу.

OOD
Не совсем понял как через telnet такое реализовать? можно поподробнее?

sapr20031

Код:
On Error Resume Next
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "msiexec /package \\server\soft\cad\КОМПАС\имя_msi_файла.msi /quiet", 0, 1

OOD
Системные процессы само-собой прибивать не буду. Их тоже в исключения. Тут проблема в том, что консольные tasklist и taskkill работают очень медленно, а если все это еще и через перенапрвление ввода вывода организовывать и в цикле, то боюсь тормозов дофига будет.

Есть ли на WScript команда убития процессов? Или через WMI например. Просто работал с циклами в консоли и на WSH. На WSH циклы выполняются в сотни!!! раз быстрее. Тот скрипт, который изначально у меня был писан как cmd сценарий выполнялся более 10 сек, на WSH выполнялся менее чем за секунду.

Real Root

Цитата:

Есть ли на WScript команда убития процессов? Или через WMI например

Есть. WMI:

Код:
strComputer = "."
Set objWMIService = GetObject ("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery _
("Select * from Win32_Process Where Name = 'Notepad.exe'")
For Each objProcess in colProcessList
objProcess.Terminate()
Next

Real Root
Можно ещё использовать PsKill

CMD Line Tools for Windows 95/98/NT/2000/XP обновите в топике плиз, сайт запаркован

niichavo
Спасибо большое за подсказки.
Сейчас, будет время, напишу собственный скрипт на vbs, ибо нашел несколько утилок нужного мне функционала. При листе исключений в 40 процессов, думают секунд по 15 - написаны на .NET - вобщем тормоза, а не консольные утилиты. Так что буду скрипт писакать.

подскажите плиз возможно ли создание нового PPTP соединения из коммандной строки стандартными средствами системы на Win2k/XP?

phaoost
Найти файлик:
C:\Documents and Settings\All Users\Application Data\Microsoft\Network\Connections\Pbk\rasphone.pbk и добавить в него строчки по аналогии с имеющимися соединениями.

Подскажите если кто знает как с помощью WSH узнать размер графического файла (высота, ширина)?

ShafMAN
если в вебстранице, то это одно, а если просто на диске-то иначе (создай ярлык мануально виндой, а потом попробуй его св-ва посмотреть)

Утилита из серии "может пригодиться".
В состав пакета PrimalScript (есть тема в варезнике) входит утилита vbs2exe, "компилирующая" скрипты vbs и js в исполняемые файлы. Без самого PrimalScript не работает. Не работала... Я её поковырял, теперь работает.
Брать у меня сдесь
Для чего нужна такая компиляция - ХЗ (без скриптового движка в системе, насколько я понял, работать не будет), но может сгодится кому

Smitis
Спасибо, конечно сгодится! Как один из методов сокрытия пароля в скрипте. А я вот думал, ставить мне варезный PrimalScript или не ставить

Добрый день!

Есть задача найти старые компьютеры в домене и удалить их.
Кто нибудь решал такую задачу с помощью PowerShell ?
Если знаете можете скинуть ссылки другие решения.

Заранее благодарен за помощь!!!

всем привет. кто-нибудт может подсказать как проверить почту на Exchange Mail Server через vbs.
задача пометить письма как прочитанные. или если есть хоть акие-то мысли на этот счёт.

спасибо.

Добрый день! Написал скрипт, проверяющий размер БД на ПК (там где размер >= 200 Мб). БД лежит на C:\Exec\db\exec.gdb. Нужно проверить диапазон ip 10.1.*.161 - 10.1.*.202, где * диапазон от 10 до 255. Всё замечательно, но строчка

Цитата:

FOR %%I IN (%MASK%) DO IF EXIST %%I SET SIZE=%%~zI

всё время возвращает в %SIZE% значение первого ПК (10.1.10.161). Помогите, пожалуйста, найти ошибку или обходной способ решения задачи. Спасибо!

Цитата:

set /a podset =10
set /a ip =161
set fsz=0
set MASK= T:\Exec\db\exec.gdb

:pod1
set ipfull=10.1.%podset%.%ip%
if %ip%==202 goto pod2
if %podset%==255 goto exit
set /a ip =%ip%+1
:back
net use T: /d
Ping -n 3 %IPFULL%
echo pingerrorlevel %errorlevel%
If %errorlevel% geq 1 (Goto REZULT1)

net use T: \\%IPFULL%\c$ pass1 /user:login1
if "%errorlevel%"=="0" (goto weiter)

net use T: \\%IPFULL%\c$ pass2 /user:login2
if "%errorlevel%"=="0" (goto weiter)

net use T: \\%IPFULL%\c$ pass3 /user:login3
if "%errorlevel%"=="0" (goto weiter)

net use T: \\%IPFULL%\c$ pass4 /user:login4
if "%errorlevel%"=="0" (goto weiter)

net use T: \\%IPFULL%\c$ pass5 /user:login5
if "%errorlevel%"=="0" (goto weiter)

:weiter
FOR %%I IN (%MASK%) DO IF EXIST %%I SET SIZE=%%~zI
set /a filesize=(%size%/1024/1024)
if "%filesize%" geq "200" (echo %SIZE% >> execSize.txt)&(echo %IPFULL% >> execSize.txt)&(echo %filesize% >> execSize.txt)&(echo ------- >> execSize.txt)
:REZULT1
goto pod1

:pod2
set /a podset =%podset%+1
set /a ip =161
goto pod1

:exit
pause
exit

slech
Разовая задача?
Просто использовать TheBAT! с диспетчером писем?
Или смотри в сторону MapiMessage:

Цитата:

The flFlags member can be used to request a receipt and to detect the read or unread and sent or unsent status of a message. When sending a message, you can set the MAPI_RECEIPT_REQUESTED flag to request a receipt. When reading a message, you can test for the MAPI_UNREAD flag to determine whether the message has not yet been read. Similarly, you can test for the MAPI_SENT flag to determine whether the message has been sent. When saving a previously unsaved message, you should set the MAPI_UNREAD and MAPI_SENT flags as appropriate for the message.

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

yazzi
Отлавливать сообщение WM_DEVICECHANGE. Оно рассылается при подключении/отключении устровйств. wParam отражает произошедшее событие. Например Msg.wParam=DBT_DEVNODES_CHANGED добавление/удаление флешки.

ohlos
а можешь написать код. Заранее спасибо

Уважаемые специалисты! Есть вопрос по автоматизации администрирования пользователей в Win:можно ли произвести автоматический перенос пользователя из одной группы в другую? К примеру из группы "Пользователи" в группу "Администраторы".
Нашел:
http://sysadmins.ru/topic79925-120.html

есть у кого-нить скриптик для который формирует список пользователей из AD с телефонами, емейлами и прочим?

klimusu
у меня есть, могу выложить он на JScript и написан под мой домен (при желании можно переписать под свой).

Oldster
буду признателен... спасибо.

klimusu
Полистай тему. Совсем недавно был текст скрипта