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

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



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
strizhakovs
 
http://slil.ru/23336169
 
- добавлен фильтр для  "NT AUTHORITY\SYSTEM" и прочих.
- кнопка "стоп"
 
для проверки совпадений прав в подпапках надо слишком много отслеживать параметров: пользователя, тип доступа и значение + положение в иерархии... Это целая куча делов. На такой подвиг я не способен, звиняй

Всего записей: 324 | Зарегистр. 20-05-2005 | Отправлено: 14:55 02-11-2006
strizhakovs

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

Цитата:
для проверки совпадений прав в подпапках надо слишком много отслеживать параметров: пользователя, тип доступа и значение + положение в иерархии... Это целая куча делов. На такой подвиг я не способен, звиняй  

А если отслеживать только пользователя? или пользователя и AccessMask?
Так возможно?

Всего записей: 51 | Зарегистр. 26-09-2006 | Отправлено: 15:59 02-11-2006
jONES1979



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

Всего записей: 324 | Зарегистр. 20-05-2005 | Отправлено: 16:00 02-11-2006
strizhakovs

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

Цитата:
это того же уровня гемморой

Ясно...да забей... ))  
И еще раз ОГРОМНОЕ спасибо!!!!

Всего записей: 51 | Зарегистр. 26-09-2006 | Отправлено: 16:10 02-11-2006
jONES1979



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
strizhakovs
ага, пожалуйста.
 
чего-нить ещё спрашивай!

Всего записей: 324 | Зарегистр. 20-05-2005 | Отправлено: 19:17 02-11-2006
Sk1f



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

Цитата:
 
Первый шаг
path = pathTestUpravl
Folder_Adm = "xcacls """ & path & """" _
       & " /G " & """Administrators"":F /Y"  
       Folder_CrOwn = "xcacls """ & path & """" _
       & " /G " & """Creator Owner"":EDWX /Y /E"  
       Folder_Sys = "xcacls """ & path & """" _
       & " /G " & """System"":F /Y /E"  
      Call WshShell.Run(Folder_Adm)
      Call WshShell.Run(Folder_CrOwn)  
      Call WshShell.Run(Folder_Sys)
 


Цитата:
 
Второй шаг
PathTestUpravl = "C:\Test\" & Upravl  ' путь к папке управления
strLocal = TestUpravl   'Локальная группа  
DLocalFolder_1_lvl = "Subinacl " & "/subdirectories " & """" & PathTestUpravl & """" _
       & " /Grant=" & """" & "TestDomen\" &  strLocal & """=REW"
       
       Call WshShell.Run(DLocalFolder_1_lvl)
 

 
Проблема - необходимо, чтобы скрипт при разграничение прав доступа к папке, группе Creator Owner выдавались права на чтение, удаление, запись, выполнение. Но с условием - эти операции будут выполняться только с подкаталогами и файлами в папке. К самой папке эти операции запрещены.

Всего записей: 198 | Зарегистр. 04-04-2006 | Отправлено: 09:29 03-11-2006 | Исправлено: Sk1f, 15:18 03-11-2006
strizhakovs

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

Цитата:
чего-нить ещё спрашивай!  

 
Уже спросил смотри ПМ

Всего записей: 51 | Зарегистр. 26-09-2006 | Отправлено: 15:00 07-11-2006
north_crow

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Ребята!!!
помогите плиз. весь форум и весь инет облазил в поисках и так и не нашел ответа на проблему
есть вот такой скрипт для создания юзеров в AD по списку из экселя:

Код:
'On Error Resume Next
path_file="D:\SHARE_ALL\Crow\VBS\new_users.xls"  
Set objExcel = CreateObject("Excel.Application")  
Set objWorkbook = objExcel.Workbooks.Open (path_file)
 
intRow = 2 ' начальная строчка в excel где начинается список
Do Until objExcel.Sheets("New_user").Cells(intRow, 1).Value = ""    'Продолжаем пока не встретим пустую ячейку
 
'Вытаскиваем данные из ячеек
Familiya = objExcel.Sheets("New_user").Cells(intRow, 1).Value 'Фамилия
Imya = objExcel.Sheets("New_user").Cells(intRow, 2).Value 'Имя
Otchestvo = objExcel.Sheets("New_user").Cells(intRow, 3).Value 'Отчество
Login = objExcel.Sheets("New_user").Cells(intRow, 4).Value 'Login
Password = objExcel.Sheets("New_user").Cells(intRow, 5).Value 'Пароль
FIO = Familiya & " " & Imya & " " & Otchestvo    'Полное ФИО
 
'Создаем пользователя в AD
Set objOU = GetObject("LDAP://OLCON-DC01/ou=Test,dc=olcon,dc=severstalgroup,dc=com")
Set objUser = objOU.Create("user", "cn=" & FIO)
objUser.sAMAccountName = Login 'Login
objUser.GivenName = Imya 'Имя
objUser.SN = Familiya 'Фамилия
objUser.userPrincipalName = "" & Login & "@olcon.severstalgroup.com" 'Учетная запись
'objUser.Put "mail", "" & Login & "@olcon.ru" 'E-mail
objUser.mailNickname = Login 'Псевдоним Exchange
objUser.company = "Олкон" 'Организация
objUser.displayName = FIO 'Выводимое имя
objUser.SetInfo
'Задаем пароль и включаем акаунт
objUser.SetPassword Password 'Пароль
objUser.AccountDisabled = False
objUser.Put "userAccountControl", &h10000    'Срок действия пароля неограничен
objUser.SetInfo
 
'Создаем пользователю ящик в Exchange
Set objMailbox = objUser
objMailbox.CreateMailbox "LDAP://CN=Mailbox Store (OLCON-DC01),CN=First Storage Group," & _
    "CN=InformationStore,CN=OLCON-DC01,CN=Servers,CN=AG-Olgsk-OLCON," & _
    "CN=Administrative Groups,CN=Severstalgroup,CN=Microsoft Exchange," & _
    "CN=Services,CN=Configuration,DC=severstalgroup,DC=com"
objUser.SetInfo
 
intRow = intRow + 1
Loop
objExcel.Quit

скрипт рабочий - но есть одно НО... он работает полностью только если его запускать с самого сервака (на который пришлось поставить эксель ). а вот если его запускать с локальной машины (с правами доменного аднима) - то создается только запись в AD а вот создавать ящик в эксчендже не хочет
ругается на строку
Код:
objMailbox.CreateMailbox "LDAP://CN=Mailbox Store.....
и вот такая появляется ошибка:
Ошибка: Объект не поддерживает это свойство или метод: objMailbox.CreateMailbox
Код: 800A01B6

 
как можно побороть эту ошибку??? может нужно чегонить доставить из софта на локальную машину??? а то неудобно это скрипт запускать с сервака, т.к. для него неохото на серваке держать специально эксель!

Всего записей: 172 | Зарегистр. 04-12-2002 | Отправлено: 15:32 12-11-2006
maGELan



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Долго мурыжился, но так до конца и не нашел возможности переименовать имя подключения по локальной сети с текущего (которое может быть каким угодно) в "новое имя"
Помогите ПЖЛСТ сделать ЭТО при помощи командной строки.  
 
Нашел такой вот способ, НО он как-то не так (только с подтверждением или я не там ставлю "/y") срабатывет ...? (к слову, Нужен ли второй ключ моего скрипта?)
 

Код:
 
reg add "HKLM\SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\{9DA79BA9-4817-4800-9425-30B4E7067E83}\Connection" /v Name /t reg_sz /d "Имя"
reg add "HKLM\SYSTEM\ControlSet001\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\{9DA79BA9-4817-4800-9425-30B4E7067E83}\Connection" /v Name /t reg_sz /d "Имя"
 

 
Задача стоит не сколько иначе ...  
1. Допустим у пользователя две сетевых карты из которых подключена к сети только одна (как определить активную ?) и переименовать именно ее?

Всего записей: 108 | Зарегистр. 19-11-2001 | Отправлено: 20:02 12-11-2006 | Исправлено: maGELan, 20:18 12-11-2006
alexxxn

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

Всего записей: 20 | Зарегистр. 27-12-2002 | Отправлено: 11:20 13-11-2006
Geduc



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Ребят, такой вопрос. Нужна или прога или батник (желательно батник) для поиска и удаления файлов.
Алгоритм такой:
Запуск батника с путём к папке, где лежат файлы. И по заданной в батнике маске удалить файлы.
Проблема в том, что там очень много подпапок и имена папок всегда разные. Неизменными остаются только маски.

Всего записей: 26 | Зарегистр. 18-03-2006 | Отправлено: 14:55 13-11-2006
jONES1979



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

Код:
Set objMailbox = objUser  

да, вот ответ на твой вопроc
 
твой скрипт обращается к расщиренным свойствам объекта юзер. Естественно, на локальной машине инфы об этих свойствах нет.
 

Всего записей: 324 | Зарегистр. 20-05-2005 | Отправлено: 15:23 13-11-2006
tech_max

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
можно ли автоматизировать след. процесс
есть файл с таким содержанием
213.210.177.214
76.17.115.53
76.17.115.53
80.100.127.32
217.126.149.20
88.102.57.240
81.220.165.214
213.163.40.238
87.117.8.151
195.210.186.2
необходимо определить диапазон и страну, сейчас это реализовано след. образом
иду на сайт https://www.nic.ru/whois/?ip=213.210.177.214
ввожу адрес и вижу диапазон
213.210.177.0 - 213.210.177.255
на выходе необходимо получить такой файл  
213.210.177.0 - 213.210.177.255 ; CZ
76.16.0.0 - 76.23.255.255 ; US
 
 

Всего записей: 2 | Зарегистр. 13-11-2006 | Отправлено: 16:57 13-11-2006
Last_raven

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Задача:
1.Запуск батника в нужное время.
2. выполнение кода.
3. самоуничтожение.
Реально ли? Интересуют первый и третий пункты......

Всего записей: 17 | Зарегистр. 02-12-2002 | Отправлено: 17:04 13-11-2006
Vby



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Last_raven
del.bat
1. Стандартными средствами ОС
2. ping ya.ru
3. del /q del.bat

Всего записей: 781 | Зарегистр. 16-09-2004 | Отправлено: 17:34 13-11-2006
Last_raven

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Спасибо, работает. А если время запуска не стандартными средствами, а именно средствами самого батника? Или даже лучше запуск батника при запуске определенного приложения, скажем блокнота?

Всего записей: 17 | Зарегистр. 02-12-2002 | Отправлено: 18:11 13-11-2006 | Исправлено: Last_raven, 18:12 13-11-2006
Vby



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

Цитата:
 именно средствами самого батника

 
Schtasks /?

Всего записей: 781 | Зарегистр. 16-09-2004 | Отправлено: 18:54 13-11-2006
FreemanRU



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

Цитата:
Нужна или прога или батник (желательно батник) для поиска и удаления файлов.  
Алгоритм такой:  
Запуск батника с путём к папке, где лежат файлы. И по заданной в батнике маске удалить файлы.  
Проблема в том, что там очень много подпапок и имена папок всегда разные. Неизменными остаются только маски.

Открываю страшную тайну, есть такая штука как Помощь.
Так вот:
del /s

Цитата:
 
 /S          Удаление указанных файлов из всех подкаталогов.
 


----------
Если не получается с первого раза - прочти инструкцию. (с)
"Откуда нам знать, что такое война, если мы не знаем мира..."(с)
Записки

Всего записей: 3794 | Зарегистр. 16-07-2004 | Отправлено: 21:06 13-11-2006
north_crow

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
2 alexxxn
поставил я себе adminpac.msi всеравно не получается
2 jONES1979
а как можно его получить?
 

Всего записей: 172 | Зарегистр. 04-12-2002 | Отправлено: 21:52 13-11-2006 | Исправлено: north_crow, 21:53 13-11-2006
Geduc



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

Цитата:
Открываю страшную тайну, есть такая штука как Помощь.  
Так вот:  
del /s  

Если честно, то не знаю, что произошло... но на работе пришлось вызывать системщиков ))  
Прописал:
del /s c:\папка *.exe, *.txt, *.bak и ещё кучу всяких масок.
В итоге он всё правильно сделал, сначала удалил все ненужные файлы в указанной папке, а потом перешёл к остальным файлам на диске С:\  

Всего записей: 26 | Зарегистр. 18-03-2006 | Отправлено: 08:36 14-11-2006
   

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