» Автоматизация администрирования

alfira
извени - но вопросом на вопрос - а почему бы не перенаправить папки сразу на шару - и там по ночам спокойно себе бэкапить?
а если по делу то из HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Personal можно взять путь к майдокам. как его передать в cmd не скажу...
давай на VBS!

да хоть в чем, просто самостоятельно vbs я не напишу! чтобы выполнить условия задачи.
если в vbs можно так сделать чтоб мои документы копировались или архивировались да без медиа файлов вышеперечисленных в ЗАДАЧЕ то это будет супер!

alfira

а не боишься что будет тормозить? представь, конец рабочего дня, клерк комп шатдаунит, а тот вместо того чтобы послушно выключиться - начинает винтом моргать и чего-то делать...
"Семь бед - один reset", как говорится

Доброго времени суток, уважаемые коллеги! Подскажите пожалуйста, где грабли?
Скрипт должен удаленно запускать процесс, к примеру, блокнот.
Если выполнять скрипт применительно к локальной машине, все в порядке. Если же к удаленной, то процесс запускается, но самого окошка блокнота не видно
Вот собственно сам код:


Код:
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & "." & "\root\cimv2")
Set objStartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = 1
set objProcess = objWMIService.Get("Win32_Process")
Error = objProcess.Create("notepad.exe", null, objConfig, intProcessID)
wscript.echo error

urel Раньше у меня так и было настроенно т.е перенаправление папки мои документы, но после глобального сбоя в сети в результате которого большая грууппа компьютеров оказалась вообще без сети и соответственно без документов было решено просто копировать, архивировать мои документы на сервер. вот и понадобился logoff скрипт который бы это делал. А проблемы с резетом меня не пугают т.к пользователи у нас без тех поддержки ничего сами не предпринимают. первое что пришло в голову это возможность написать bat для ntbackup или rar, но никак не могу победить как указать скрипту местонахождение папки мои документы? так как на многих компьютерах в свойствах папки изменено ее местонахождение. может vbs скрипте можно это определить и вставить этот путь для ntbackup или rar? может кто вообще более оригинальный способ подскажет.

alfira

Цитата:

может vbs скрипте можно это определить

Цитата:

set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("MyDocuments")

stanru1
так наверно нужно запускать процесс от имени пользователя, который в этот момент залогинен?
alfira
самый оригинальный способ - это хранить все на шаре, и следить за тем чтобы ничего не отваливалось.
а так - vbs реинкорнация твоего батника:
Код: Path2Winrar = "E:\Program Files\WinRAR\WinRAR.exe"
Path4Archives = "E:\"
Set WshShell = WScript.CreateObject("WScript.Shell")
Set objNetwork = CreateObject("WScript.Network")
strDesktop = WshShell.SpecialFolders("MyDocuments")
arcName = Path4Archives & objNetwork.ComputerName & "_" & objNetwork.UserName & "_" & Replace(Replace(CStr(now),":","-")," ","_") & ".rar"
cmd = """"& Path2Winrar & """ a -r -dh -x*.mp3 -x*.fcd -x*.avi -x*.exe -x*.jpg -x*.tif -pPASSWD """ & arcName & """ """ & strDesktop & """"
WshShell.Run cmd, 0 , True
WScript.Echo strDesktop

urel нельзя было решить так как после пожара оказалась отрезанной часть здания! а вы не задумывались что может такое произойти?

привет всем!

каким тулом можно записать диск DVD-R с продлением сессии?
я написал скриптец простейший для еженедельного бэкапа, который должен падать на эрку
но неохота мне вручную делать это всё
сейчас он кидает напоминание на мыло мне, а хочется избавить себя от этого

система вин32

alfira
конечно, почему нет, всегда можно найти временные решения wifi, воздушка. было бы желание
каково было расстояние между сегментами, что было повреждено?
в конце концов руками перенесит доки в отрезаный сегмент для пользователей.
а кроме документов не было никаких сетевых прог(1с например)? что с ними делали?
PS: А ты думал о нагрузке на сетевое оборудование когда 100 человек в 6-00 разлогиниться?

Teo
почитай NeroCmd.exe, в 6й Nero точно есть

urel

Цитата:

так наверно нужно запускать процесс от имени пользователя, который в этот момент залогинен?

Нет, вся фишка в том, что процесс нужно запустить от имени админа, а не пользователя.

stanru1
а от системы?
попробуй pstools там есть psexec способный выполнять задачи удаленно, может прокатит =)
если не секрет - что ты хочешь запустить? не боишься что пользователь с этими правами сможет сделать что либо не предусмотренное программой?

urel
В данном конкретном случае - административную установку М$ офиса. Странно, во всех руководствах пишут как раз именно о том, что данный скрипт позволяет запускать удаленно процессы с правами выполняющего скрипт. И процесс-то ведь запускается!!! Как заставить его взаимодействовать с десктопом?

urel
хотелось бы что нить неворованное...
есть такое?

Teo
ну... в поиск, может подойдет хттп://isorecorder.alexfeinman.com/CreateCD.htm

Как удалить заблокированные файлы?

Здравствуйте. Вопрос такой:
Нужно для доменной группы пользователей удаленно добавить права на изменение системного времени с помощью локальных групповых политик.
Т.е. по такому пути: gpedit.msc>конфигурация компьютера>конфигурация win>локальные политики>назначение прав пользователя
есть политика "изменение системного времени", в которую входят локальные администраторы и пользователи. В эту политику нужно добавить доменную группу.
Каким образом это лучше всего сделать?

anat75
А обязательно ли удалять? Можно же просто переместить
Код: move /Y file.ext %TEMP%

mozers
"Процесс не может получить доступ к файлу, так как этот файл занят другим процессом"

Есть программа Unlocker. Она помогает. но может быть есть проще способ. может стандартнее, чтоли....

Может есть способ через WMI или WSH? я об этом.

i_no_k
применять шаблоны, кури эту траву

anat75
Цитата:

Как удалить заблокированные файлы?

А с правами (владелец) все в порядке? Операционная система какая?

anat75
вроде в рес ките есть такое щастье, оно наверно и есть "стандартно" хттп://windowsxp.mvps.org/processlock.htm

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

Mushroomer
С правами всё нормально. Если файл разблокирован - удаляется любыми способами на выбор.

urel
Спасиб. Сейчас гляну
Похоже выявляется тока виновник блокировки. Мне просто надо в добровольно-принудительном порядке снять блокировку и убить файл. Иногда бывает виновник убит, а блокировка осталась

urel
Спасибо, но применять шаблон безопасности ради 1 политики... Другой способ существует? Главное, надо выполнить это единственный раз и на определенной группе машин.

anat75
Цитата:

Процесс не может получить доступ к файлу, так как этот файл занят другим процессом

Это - что? В ответ на
Цитата:

move /Y file.ext %TEMP%

?
Конечно, все сказанные другими способы - так же реальны.
Просто этот - самый простой, о котором многие забывают.

Лично я таким макаром обновляю сам shell (спец.прога крутится вместо explorer.exe) и все библиотеки, которые он использует.
Естественно, что просто так их не удалить.
Т.е. DEL не срабатывает.
COPY - то же.
MOVE - работает

mozers
Да. Это ответ на предлагаемую тобой команду


Цитата:

Конечно, все сказанные другими способы - так же реальны.

Это не понял. Объясни.

urel Спасибо за помощь! все замечательно работает, только почему не видно процесса архивирования?
Нельзя ли чтоб при выполнении скрипта отображался процесс архивации? и как-нибуть указать сколько копий хранитьдопустим 5 архивов а потом их перезаписывать? а то так он весь диск забьет.

i_no_k
другой вариант - делаешь снапшот реестра 1, меняешь, делаешь снапшот 2
сравниваешь

mozers
imho перемещать блокированные обьекты можно в пределах тома

ГУРУ ХЕЛП!!!

Подскажите кто знает как при помощи VBScript, я так понимаю что через WMI запрос установить в свойствах видео карты Video Hardware Acceleration на Full....
Перерыл инет, но ничего не нашел
Помогите очень нужно...

alfira
2й параметр метода Run сделай 1
про остальное читать здесь: хттп://msdn2.microsoft.com/en-us/library/d5fk67ky.aspx

Добавлено:
strizhakovs
плохо искал

[HKLM\SYSTEM\CurrentControlSet\Control\Video\{<перебрать>}\0000]
"Acceleration.Level"=dword:00000000

четай, тебе это случаем как раз не для этого нужно?