Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » В помощь системному администратору » Автоматизация администрирования

Модерирует : lynx, Crash_Master, dg, emx, ShriEkeR

emx (13-12-2006 21:07): http://forum.ru-board.com/topic.cgi?forum=8&topic=19088#1  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

   

ooptimum



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
 

                               Коллеги-администраторы  ....  


Часть 1


Думаю каждый из вас сталкивался с необходимостью выполнять некие несложные рутинные операции, на котороые уходит много драгоценного времени.
 Например, создать определенную структуру каталогов для каждого пользователя домена, изменить некие параметры в профилях всех или части пользователей, изменить полномочия/владельца однотипных файлов в разных каталогах т.д.  
Я, как сисадмин, тоже не раз был вынужден делать все это.  Руками делать это тоскливо и муторно, как вы понимаете. Должен заметить, что по неким "религиозным" убеждениям я всегда старался избегать любых отношений с бейсиком и его производными. Еще мой отец учил меня не иметь с ним никаких дел. Буквально. А теперь я учу своего сына тому же. Но, тем не менее, полностью избежать этого, по всей видимости, невозможно, тем более, что бейсик от M$ сейчас уже далеко не та "лапша", которой он был изначально, а современный структурированный язык, нашедший множество применений. Похоже, что для меня в очередной раз настала пора выучить еще что-то. Знаете, как курильщик много раз безуспешно пытается бросить курить, так и я не раз пытался подступиться к изучению VBScript, но пока никак не одолел. Лень, знаете ли. А инструмент в делах административных был бы весьма пользительный, должен заметить, для быстрого написания всякого рода скриптов.

 
    Внимание   !  !  !  

  • Поскольку данный топ весьма не мал, не забывайте  использовать "версию для печати" для более удобного поиска по теме. А также МЕГА ПОИСКОВИК от NEPa

  • Дабы не раздувать топ,  примеры своих  скриптов  заключаем в тег  "more"

Консольные команды. Командный интерпретатор

Windows Script Host (WSH) &  VBScript  &  JScript


Вышеперечисленные буки можно  взять здесь

    ТOOLS :
  1. Autoit+readme.rus
  2. Scriptologic
  3. AutoMate
  4. KIXTART
  5. nnCron-Планировщик с поддержкой скриптового языка --  РЕКОМЕНДУЮ
  6. WGET, GREP, GETMAIL, BLAT for Windows замечательные консольные утилиты
  7. 4dos/4nt -- отличная замена стандартного коммандного интерпретатора  
  8. JudoScript - java подобный скриптовый язык с исходниками

    Дружественные темы :
  1. Автоматическая (unattended) установка Windows
  2. Интересные команды при работе с Linux
  3. Отличный сайт по скриптингу, и не только
  4. Использование KIX
  5. Использование WMI

 
>>HOW -  TO:
Создается по материалам данного топа

 
Надеюсь данная тема будет полезна для Вас.
 Предложения по реформированию шапки принимаю в ПМ Jovanotti

 

Всего записей: 2898 | Зарегистр. 30-05-2002 | Отправлено: 08:55 13-12-2002 | Исправлено: FreemanRU, 17:29 11-12-2006
pe3yc



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
ShahrayOleg
иди в варезник и ищи automate

Всего записей: 2434 | Зарегистр. 25-07-2001 | Отправлено: 23:27 05-10-2003
ShahrayOleg



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
И все. Может можно как-то vbs этот скрипт написать?

Всего записей: 312 | Зарегистр. 16-08-2002 | Отправлено: 11:02 07-10-2003
pe3yc



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
ShahrayOleg
Танкист, что ли?
Можно
Хочешь на vbs - пожалуйста, $50 на нужды форума, я специально для тебя напишу.

Всего записей: 2434 | Зарегистр. 25-07-2001 | Отправлено: 16:04 07-10-2003
mozheyko



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
ShahrayOleg
слыш  ну ты это....
любой бэкап манагер это зделает...

Всего записей: 313 | Зарегистр. 14-09-2002 | Отправлено: 14:16 09-10-2003
Sentinel of LBI

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Воабще, всем здрасти! Poluchil yvedomlenia ot WMI pro :  
 
Тип события: Предупреждение
Источник события: WinMgmt
Категория события: Отсутствует
Код события: 46
Дата: 14.10.2003
Время: 21:55:59
Пользователь: Нет данных
Компьютер: %MyServer%
Описание:
WMI ADAP не удалось извлечь данные из ключа PerfLib: 019, код ошибки: 0x2.  
Che eto takoe pochemu poyavilos (posle ustanovki AD pod W2k)! Prichem na Workstation'ax tozhe analog'j gluk(nadojelo) !
 
Podskazhute kak ispravit'  eti nadoedlivue kluchi of Regystry

Всего записей: 6 | Зарегистр. 09-10-2003 | Отправлено: 02:07 15-10-2003
counter



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Вопрос к знатокам. Можно ли в VBS пользоваться функциями из внешних ДЛЛ, а ля
VBA: Private Declare Function MyFunc Lib "MyFunctions.dll" (ByVal s As String) As String
 
Если можно, научите плиз!

Всего записей: 63 | Зарегистр. 29-04-2003 | Отправлено: 12:41 23-10-2003
Yourbill



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ShahrayOleg
Дался тебе этот vbs. Для таких целей можно и батник склепать. Почитал бы хелп по встроенным командам win2k/xp. Вот тебе для примера (my_backup.bat):
 
setlocal
for /f "tokens=2,3,4 delims=. " %%i in ('date /t') do (set Logdate=%%k%%j%%i)
for /f "tokens=1,2,3 delims=: " %%i in ('time /t') do (set Logtime=%Logdate%_%%i-%%j_my_backup)
winrar a -m5 "C:\Мой_backUp\%Logtime%" C:\Моя_папка_для_BackUp-a\*.*
 
Ключи для винрара поставь те которые тебе нужны, папки свои пропиши, подкинь этот батник шедулеру и будет тебе счастье

Всего записей: 565 | Зарегистр. 11-03-2003 | Отправлено: 17:08 23-10-2003 | Исправлено: Yourbill, 17:47 23-10-2003
iLok



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Как расставлять пермишоны скриптом на одтельные секции реестра?

Всего записей: 131 | Зарегистр. 08-06-2003 | Отправлено: 21:47 11-12-2003
ice_frog

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
всем кто инетерсуется данной темой будут полезны следующие книженции
 
_http://www.piter.com/display.phtml?pattern=%EF%EE%EF%EE%E2&searchField=alls&rezim=web_yes
 
_http://www.bhv.ru/books/book.php?id=474 -рекомендую, очень доходчиво написано.

Всего записей: 20 | Зарегистр. 14-06-2003 | Отправлено: 22:22 11-12-2003
ALEX_SP

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Yourbill
Еще проще
Winrar(3.0) сам умеет дату-время подставлять
ключик -ag

Всего записей: 65 | Зарегистр. 14-03-2002 | Отправлено: 13:19 14-12-2003
Yourbill



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ALEX_SP
Век живи век учись... буду знать. Но знание встроенных комманд еще ни кому не мешало

Всего записей: 565 | Зарегистр. 11-03-2003 | Отправлено: 16:33 14-12-2003
AcidDrinker



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ooptimum
Возврасчаясь к етому скрипту

Цитата:
Const ADS_SCOPE_SUBTREE = 2  
Set objConnection = CreateObject("ADODB.Connection")  
Set objCommand =   CreateObject("ADODB.Command")  
objConnection.Provider = "ADsDSOObject"  
objConnection.Open "Active Directory Provider"  
Set objCOmmand.ActiveConnection = objConnection  
objCommand.CommandText = _  
    "Select Name, Location from 'LDAP://DC=yourdomain,DC=ru' " _  
        & "where objectClass='computer'"    
objCommand.Properties("Page Size") = 1000  
objCommand.Properties("Timeout") = 30  
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE  
objCommand.Properties("Cache Results") = False  
Set objRecordSet = objCommand.Execute  
objRecordSet.MoveFirst  
Do Until objRecordSet.EOF  
    strComputer = objRecordSet.Fields("Name").Value  
    Set objUser = GetObject("WinNT://" & strComputer & "/Administrator, user")  
    objUser.SetPassword "testpassword"  
    objUser.SetInfo  
    objRecordSet.MoveNext  
Loop  
 

У меня ругается что:
   
18 line -->Set objUser = GetObject("WinNT://" & strComputer & "/Administrator, user")  
В чем проблема? Буду премного благодарен за совет.

Всего записей: 9 | Зарегистр. 17-11-2003 | Отправлено: 18:39 16-12-2003
ooptimum



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
AcidDrinker

Цитата:
В чем проблема? Буду премного благодарен за совет.

Менял "DC=yourdomain,DC=ru" на свои данные?

Код:
"Select Name, Location from 'LDAP://DC=yourdomain,DC=ru' "


Всего записей: 2898 | Зарегистр. 30-05-2002 | Отправлено: 20:49 16-12-2003
AcidDrinker



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ooptimum
да, конечно поменял. более того, скрипт  
....
objRecordSet.MoveFirst  
Do Until objRecordSet.EOF  
    strUser = objRecordSet.Fields("Name").Value  
    Wscript.echo strUser  
 
    objRecordSet.MoveNext  
Loop
 
исправно выводит имена компов в домене...

Всего записей: 9 | Зарегистр. 17-11-2003 | Отправлено: 20:57 16-12-2003
ooptimum



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Ну, тогда я полагаю может быть несколько причин. Во-первых, компьютер с данным именем в настоящий момент может быть недоступен по сети (например, выключен). Во-вторых, возможно, что пользователь, из-под которого ты выполняешь данный скрипт, не имеет необходимых полномочий на данном удаленном компьютере. В-третьих, может отсутствовать пользователь с таким именем. Может и еще что.

Всего записей: 2898 | Зарегистр. 30-05-2002 | Отправлено: 21:24 16-12-2003
AcidDrinker



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
я добавил строку  
[б] Wscript.echo strComputer [/б]  
и получается что скрипт останавливается на первом компутере, который 100% в сети, скрипт запускается с контролера домена под администратором, все компы на ХР, user Administrator есть на всех компах...
 
может проблема в пустом пароле на локальном админском аккаунте?...

Всего записей: 9 | Зарегистр. 17-11-2003 | Отправлено: 21:44 16-12-2003
ooptimum



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Firewall на XP не включен? Доменные администраторы не удалены ли из группы локальных администраторов на данной машине?

Всего записей: 2898 | Зарегистр. 30-05-2002 | Отправлено: 22:31 16-12-2003
AcidDrinker



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Точно! Надобно установить доменного админа локальным! Как это я не усмотрел )
Спасибо!
 
Добавлено
Сразу вопрос: как написат такой скрипт, что бы добавить всем машинам в домене доменного админа с правами локального админа?  
Шутка %)
просто я пронял что у меня уже составлен рабочий график на пару дней вперёд

Всего записей: 9 | Зарегистр. 17-11-2003 | Отправлено: 22:58 16-12-2003
ALEX_SP

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
AcidDrinker
Посмотрите вот здесь
http://www.forum.ru-board.com/topic.cgi?forum=8&topic=5517#1
Может полегчает

Всего записей: 65 | Зарегистр. 14-03-2002 | Отправлено: 10:11 17-12-2003
AcidDrinker



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Уже посмотрел. Полегчало %)

Всего записей: 9 | Зарегистр. 17-11-2003 | Отправлено: 18:03 17-12-2003
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » В помощь системному администратору » Автоматизация администрирования
emx (13-12-2006 21:07): http://forum.ru-board.com/topic.cgi?forum=8&topic=19088#1


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru