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

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



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ура заработало
RootFolderY = RootFolder & ThisYear & "\"
 
FreemanRU
спасибо

Всего записей: 525 | Зарегистр. 11-09-2003 | Отправлено: 16:57 27-03-2006 | Исправлено: Master_Alex, 16:59 27-03-2006
VelDmi

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Каким образом можно сменить имя компьютера (vbs, cmd)?

Всего записей: 529 | Зарегистр. 03-12-2002 | Отправлено: 20:32 27-03-2006
Master_Alex



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
VelDmi
Ну а на скрипт центр заглянуть или погуглить?
Вот - гугл выдал:
Подробнее...

Всего записей: 525 | Зарегистр. 11-09-2003 | Отправлено: 00:57 28-03-2006 | Исправлено: Master_Alex, 00:58 28-03-2006
VelDmi

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Master_Alex
Пасибы. Думал как то попроще, например как смена IP при помощи netsh...
В скриптах особо не шарю, буду разбираться...

Всего записей: 529 | Зарегистр. 03-12-2002 | Отправлено: 05:36 28-03-2006
Master_Alex



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Надо писать что тебе попроще сразу
Попроще - это
netdom RENAMECOMPUTER /?

Всего записей: 525 | Зарегистр. 11-09-2003 | Отправлено: 10:52 28-03-2006
squid



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
подскажите как можно изменить пароль локального админа на всех компах сети
есть домен на 2003
нашел информацию, но там пароль хранится в открытом виде
не хотелось бы чтобы его было видно

Всего записей: 185 | Зарегистр. 18-07-2004 | Отправлено: 20:53 30-03-2006
Uriu

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
squid
Скрипт можно зашифровать. Свободно можно скачать програмку для шифрования:
Microsoft Script Encoder. Это не очень надежное средство. Программка просто преобразовывает текс сценария в кодировку непригодную для чтения.
 
В Win XP\2003 имеется объект ScriptPW. Позволяет выполнять ввод текста с клавиатуры в консольном режиме без дублирования на экране. Пароль можно занести в переменную.
При запуске сценария, организовать диалог с пользователем, типа "введите пароль", вводим, заносим в переменную. Значение переменной подставляется в Ваш сценарий. Пример:
 
'Создаем объект ScriptPW
Set objPassw = CreateObject("ScriptPW.Password")
' Выводим подсказку для ввода пароля
WScript.StdOut.Write "Введите пароль: "  
'Вводим пароль
strPassw = objPassw.GetPassword()
 
' Дальше просто пример:
 
'Создаем объект SWbemLocator
Set objLocator = CreateObject("WbemScripting.SWbemLocator")
'Соединяемся с пространством имен WMI от имени заданной учетной записи
Set objService = objLocator.ConnectServer(strComputer, strNamespace, strUser, strPassw)
 
strPassw подставьте в Вашем сценарии в нужное место.

Всего записей: 340 | Зарегистр. 25-11-2004 | Отправлено: 08:21 31-03-2006 | Исправлено: Uriu, 08:33 31-03-2006
VelDmi

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Master_Alex
Скинь пожалуйста netdom на мыло. Не хочу весь кит качать. У меня Win XP Pro.
Научился изменять ИП с помощью netsh interface ip set address name="Подключение по локальной сети" source=static addr=192.168.100.77 mask=255.255.255.0 gateway=none.
Но при частой смене сетевых появляются Подключение по локальной сети 2, Подключение по локальной сети 3 и т.д. Как можно менять ИП у активного в данный момент подключения?
Нашел скриптик, но не могу разобраться в нем.
Подробнее...
Давайте я обрисую задачу.
Мне необходимо, чтобы при загрузке компьютера (после клонирования) считывалась информация об ИП и имени компьютера из файла и если они не совпадают с текущими изменить их. Считывать информацию из файла я уже умею с помощью AutoIt. Сменить ИП могу при помощи netsh, но при этом должен знать заранее имя подключения.  
Для смены имени компа нагуглил:  
Подробнее...
но возможно netdom лучше.
Просьба подсказать оптимальный способ решения поставленной задачи.

Всего записей: 529 | Зарегистр. 03-12-2002 | Отправлено: 13:19 31-03-2006
RussianNeuroMancer



Gold Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Может стоит менять адрес и имя в зависимости от мака? Меньше заморочек с файлами, более высокий уровень автоматизации. Только вопрос где взять мак?

----------
Kubuntu - официальный сайт, форум, русскоязычный сайт.

Всего записей: 9403 | Зарегистр. 30-04-2005 | Отправлено: 06:32 01-04-2006
squid



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
RussianNeuroMancer
echo %computername% > %username%.log  
ipconfig /all | find "Физический адрес" >> %username%.log  
вот батник с помощью которого можно взять мак, правда надо еще попрактиковаться, чтобы там сам мак был

Всего записей: 185 | Зарегистр. 18-07-2004 | Отправлено: 09:07 01-04-2006
VladimirKvach

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Добрый день!
 
Пробовал тут вчера сделать, чтобы Aida формировала отчет не чаще раза в месяц. Не месяц спустя после прошлого запуска, а вначале месяца (первого числа или позже если выходной или праздник). Прововал назначенными заданиями рулить, но не дает сделать вместе "При входе в windows" и "По первым понедельникам месяца"
 
Вобщем плюнул на это дело и добавил "месячную" функциональность в свою старую пристарую утилиту. Если кому еще понадобится, то вот: www.iftoday.narod.ru
 
Удачи!
Владимир
 

Всего записей: 23 | Зарегистр. 03-04-2006 | Отправлено: 06:56 03-04-2006
urel

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
RussianNeuroMancer
 
ping computername/ip
arp -a [ip]
 
там будет ip - mac

Всего записей: 292 | Зарегистр. 16-09-2004 | Отправлено: 12:13 03-04-2006 | Исправлено: urel, 12:15 03-04-2006
Reznikoff

Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Товарищи, как переименовать сетевой диск в вин2000 не ручным способом (т.е. любым скриптом?
К примеру так не работает
Set shel = CreateObject("Shell.Application")  
shel.NameSpace("W:")Self.Name = "Preved"  
 
 
Ошибка: Требуется объект: 'shel.NameSpace(...)'  
Код: 800A01A8  
Источник: Ошибка выполнения Microsoft VBScript  
 

Всего записей: 62 | Зарегистр. 18-07-2005 | Отправлено: 12:19 03-04-2006
Isia



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Нашёл очень неплохой справочник по WMI
http://nukz.net/reference/wmi/index.html
 
Считаю, что нужно добавить в шапку.
---

Всего записей: 39 | Зарегистр. 05-02-2004 | Отправлено: 12:57 04-04-2006
Sk1f



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Есть небольшой вопрос - в jscripte используется try ... catch. Какой естm аналог по функциональности в VBS.
 
 

Всего записей: 198 | Зарегистр. 04-04-2006 | Отправлено: 15:38 04-04-2006
RDV1984



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

Цитата:
WSH поддерживает языки сценариев VBScript и JScript, а также имеет возможность подключения любых других языков, например, таких, как Perl или Python  

Как можно подключить например Perl ?

Всего записей: 85 | Зарегистр. 28-04-2005 | Отправлено: 19:56 04-04-2006
ptaha



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
RDV1984
 
Партизанский вариант. Идейно-правильный. Заюзать CPAN модуль для доступа к WMI. и юзать чистый перл

Всего записей: 134 | Зарегистр. 16-01-2004 | Отправлено: 02:07 05-04-2006 | Исправлено: ptaha, 02:09 05-04-2006
finderknowledge

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

Цитата:
Как можно подключить например Perl ?

необходимо использовать расширение файла wsf и соглашение XML по форматированию:
<Job ID="Perl in WSH">
    <script language=PerlScript>
        $WScript->Echo("Hello from Perl!");
    </script>
</Job>  
 

Всего записей: 26 | Зарегистр. 03-11-2005 | Отправлено: 12:18 05-04-2006 | Исправлено: finderknowledge, 12:19 05-04-2006
Isia



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Помогите мне запустить интерактивно (для начала) блокнот на удалённой машине. Перекопал кучу сэмплов, учудил даже такое - и всё на смарку:
 

Цитата:
Const HIDDEN_WINDOW = 1
strComputer = "buch"
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set objStartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = HIDDEN_WINDOW
Set objProcess = GetObject("winmgmts:\\" & strComputer & "\root\cimv2:Win32_Process")
result = objProcess.Create ("notepad.exe",null,objConfig,processid)

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

Всего записей: 39 | Зарегистр. 05-02-2004 | Отправлено: 19:32 06-04-2006 | Исправлено: Isia, 19:34 06-04-2006
aleksiom

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

Цитата:
Помогите мне запустить интерактивно (для начала) блокнот на удалённой машине.  

 
Пример с microsoft -
 
strComputer = "RemoteComputer"  
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2:Win32_Process")  
Error = objWMIService.Create("notepad.exe", Null, Null, intProcessID)  
If Error = 0 Then  
  Wscript.Echo "Notepad was started with a process ID of "  & intProcessID & "."  
Else  
  Wscript.Echo "Notepad could not be started due to error " &   Error & "."  
End If  
 
работает с win 2003, xp

Всего записей: 2403 | Зарегистр. 04-04-2004 | Отправлено: 00:19 07-04-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