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

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в 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
DarkStar2000



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

Цитата:
Не подскажут ли коллеги, как можно по http стянуть в пакетном режиме один файл без помощи "тяжелой артилерии" в виде ВЄБ-копиров и т.д.?

 
Проще всего испоьзовать программу wget

Всего записей: 239 | Зарегистр. 05-03-2003 | Отправлено: 12:08 11-06-2004
Jovanotti



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Может кто подскажет как поменять буквы разделов Допустим D: на Е:  
при помощи скрипта.
Знаю как сделать через ключи реестра HKLM\MountedDevices\DosDevice
но хотелось бы проще и элегантнее без перезагрузок типа как в Менеджере дисков.

Всего записей: 718 | Зарегистр. 22-12-2002 | Отправлено: 13:07 11-06-2004
trisen

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
есть задача
посмореть на раб. станциях какие пользователи находяться в Local Administrator Group
машин много бегать неохото.
 
может быть кто-нибудт уже решал подобную задачку?
 

Всего записей: 278 | Зарегистр. 15-11-2002 | Отправлено: 03:48 14-06-2004
inQui



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

Цитата:
 
compName   =WScript.Arguments.unnamed.Item(0)
groupName  =WScript.Arguments.unnamed.Item(1)
 
Const ForAppending = 2  
Set objFSO = CreateObject("Scripting.FileSystemObject")  
Set objTextFile = objFSO.OpenTextFile _  
    (".\"&compName&".txt", ForAppending, True)  
 
Set grp = GetObject("WinNT://yourDOMAIN/" & compName & "/" & groupName & ",group")
For Each member In grp.Members
     objTextFile.WriteLine(member.Name & " (" & member.Class & ")")
Next
 

Подаешь пареметрами <имя машины> <название группы>. Получаешь файлик со списком пользовалелей.
Если машина не в домене, просто убери "yourDOMAIN/"
Если все машины в домене, можно выгребать их список из контейнера и тогда всё вообще будет само делаться

----------
Не умеешь - научись!

Всего записей: 602 | Зарегистр. 09-12-2001 | Отправлено: 09:47 14-06-2004
trisen

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
inQui
 
Большое спасибо! Пойду пробовать

Всего записей: 278 | Зарегистр. 15-11-2002 | Отправлено: 13:20 14-06-2004
pazdak

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ooptimum
Очень познавательный топик, бегло пробежал и много нового по WSH почерпнул, но сам ПОКА минимально сталкивался с WSH поэтому прошу пояснить следующее:

Цитата:
Во-первых, IMO логон-скрипт исполняется с привилегиями логонящегося. Таким образом, ни один обычный пользователь, не имея административных привилегий, при логоне изменить пароль локального админа не сможет. Во-вторых, если логон-скрипт -- это VBS- или жаба-скрипт, то его можно зашифровать (стандартная фича WSH). Это к вопросу об открытых паролях в скрипте.  


Цитата:
Как я уже отметил, пароль админа может находиться в самом скрипте, а чтобы не сперли -- скрипт с паролем надо зашифровать.  

Можно про это подробнее отписаться ?
Можно ли просто в скрипте использовать зашифрованный пароль (как в NetWare), типа с каким-нибудь ключом, а сам скрипт не шифровать ?

Всего записей: 376 | Зарегистр. 13-02-2003 | Отправлено: 10:23 15-06-2004
CKOPnuOH



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Есть такая проблема.
Установка на станции происходит при помощи RIS
Станции сами по себе - естесвенно разношёрстные.....
Так вот нужно при помощи либо груповых политик (я не нашёл - может плохо искал) или при помощи REG-файлов установить разрешение мониторов....
 
Нашёл ветку - [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Hardware Profiles\Current\System\CurrentControlSet\Control\VIDEO\{xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx}\0000]
Вроде в ней устанавливаются параметры монитора.....
Только вот значение ключа в {} везде разное....
Так вот вопрос - если я буду добавлять этот параметр с одним и тем же ключём - ничего страшного не будет что они на всех машинах будут одинаково? Или же он ещё гдето привязывается?
 
Ну или подскажите более правильный путь задания разрешения рабстанциям....
 
P.S. Установка разрешения через *.SIF не хляет - так как я уже писал выше - машины все разношёрстные.....

Всего записей: 339 | Зарегистр. 28-05-2004 | Отправлено: 13:07 15-06-2004
ShahrayOleg



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Есть сервер (ОС Win2k Server) и 30 машин (ОС Win98 и Win2k Pro). Поднят AD. Как написать скрипт чтобы получить MAC адрес всех машин (в домене)?

Всего записей: 312 | Зарегистр. 16-08-2002 | Отправлено: 16:54 15-06-2004
merlkerry

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

Цитата:
Не подскажут ли коллеги, как можно по http стянуть в пакетном режиме один файл без помощи "тяжелой артилерии" в виде ВЄБ-копиров и т.д.?  

 
есть такое чудо, как ActivePerl , ну а в нем это решается где-то так
 
use Win32::Internet;
$inet = new Win32::Internet();
$file = $inet->FetchURL("http://forum.ru-board.com/");
 
open  (OUTFILE, ">c:\forum.ruboard.txt" );
print OUTFILE $file;
close (OUTFILE);

----------
Вокруг одни враги.
Я испытываю естественный скептицизм по поводу чистоты человеческих намерений.

Всего записей: 1521 | Зарегистр. 16-09-2002 | Отправлено: 17:39 15-06-2004
trisen

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ShahrayOleg
 
создай файлик с ипами, в данном случае Ip.tmp
 
for /F %%i in (ip.tmp) do ping -n 1 %%i
 
arp -a > mac.tmp
 
или можешь без файлика, инкрементить значение ip
 
 

Всего записей: 278 | Зарегистр. 15-11-2002 | Отправлено: 03:17 16-06-2004
Mexanik



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
trisen
Хороший способ! Но проканает только для компов в той же подсети.
 
ShahrayOleg
for /F %%i in (ip.tmp) do nbtstat -A %%i | find "MAC"
 

 
 
 
Добавлено
CKOPnuOH

Цитата:
P.S. Установка разрешения через *.SIF не хляет - так как я уже писал выше - машины все разношёрстные.....

 
Сделай выбор разрешения в OSChooser, старина

Всего записей: 164 | Зарегистр. 12-11-2003 | Отправлено: 16:27 16-06-2004
ShahrayOleg



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Есть сервер (ОС Win2k Server) и 30 машин (ОС Win98 и Win2k Pro). Поднят AD. Как написать скрипт чтобы поменять (локальный) пароль administrator на всех машинах под ОС WIN2k PRO?

Всего записей: 312 | Зарегистр. 16-08-2002 | Отправлено: 15:13 20-06-2004
kibkalo



Убью Билла
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
добавить в логон скрипт компутерной политики (домена) бат файл с
net user Administrator PASSWORD

Всего записей: 2342 | Зарегистр. 10-04-2002 | Отправлено: 16:31 20-06-2004
ShahrayOleg



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

Всего записей: 312 | Зарегистр. 16-08-2002 | Отправлено: 16:42 20-06-2004
kibkalo



Убью Билла
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ShahrayOleg - это кстати было странице на 2-4 этого топика - я сам интересовался этим вопросом года полтора назад - правда нужно было VB привлечь, дабы зацепить те компы, которые не перезагружаются..

Всего записей: 2342 | Зарегистр. 10-04-2002 | Отправлено: 16:47 20-06-2004
Drron

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

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



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Drron
Тоже искал ....
Кроме как через батник с командами cacls или xcacls думаю никак.
Хотелось бы ошибаться .  Нужно из под скрипта менять пермишины.

Всего записей: 718 | Зарегистр. 22-12-2002 | Отправлено: 12:55 22-06-2004
kibkalo



Убью Билла
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
const KEY_QUERY_VALUE = &H0001
const KEY_SET_VALUE = &H0002
const KEY_CREATE_SUB_KEY = &H0004
const DELETE = &H00010000
const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set StdOut = WScript.StdOut
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_  
strComputer & "\root\default:StdRegProv")
strKeyPath = "SYSTEM\CurrentControlSet"
oReg.CheckAccess HKEY_LOCAL_MACHINE, strKeyPath, KEY_QUERY_VALUE, bHasAccessRight
If bHasAccessRight = True Then
    StdOut.WriteLine "Have Query Value Access Rights on Key"
Else
    StdOut.WriteLine "Do Not Have Query Value Access Rights on Key"
End If  
oReg.CheckAccess HKEY_LOCAL_MACHINE, strKeyPath, KEY_SET_VALUE, bHasAccessRight
If bHasAccessRight = True Then
    StdOut.WriteLine "Have Set Value Access Rights on Key"
Else
    StdOut.WriteLine "Do Not Have Set Value Access Rights on Key"
End If  
oReg.CheckAccess HKEY_LOCAL_MACHINE, strKeyPath, KEY_CREATE_SUB_KEY, bHasAccessRight
If bHasAccessRight = True Then
    StdOut.WriteLine "Have Create SubKey Access Rights on Key"
Else
    StdOut.WriteLine "Do Not Have Create SubKey Access Rights on Key"
End If
oReg.CheckAccess HKEY_LOCAL_MACHINE, strKeyPath, DELETE, bHasAccessRight
If bHasAccessRight = True Then
    StdOut.WriteLine "Have Delete Access Rights on Key"
Else
    StdOut.WriteLine "Do Not Have Delete Access Rights on Key"
End If

 
Этот скрипт проверяет наличие прав. Если делать не Check, а Set то будет менять.

Всего записей: 2342 | Зарегистр. 10-04-2002 | Отправлено: 20:09 22-06-2004 | Исправлено: kibkalo, 20:10 22-06-2004
Jovanotti



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
kibkalo
Спасибо, буду пробовать ...

Всего записей: 718 | Зарегистр. 22-12-2002 | Отправлено: 08:40 23-06-2004
skylined

Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Уважаемые, не подскажити есть ли способ из ВБскрипта сделать аналог net send'a в батнике??
Пасиба.

Всего записей: 294 | Зарегистр. 27-06-2003 | Отправлено: 10:54 06-07-2004
   

Страницы: 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