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

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

Модерирует : KLASS, IFkO

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 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 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225

Открыть новую тему     Написать ответ в эту тему

KLASS



Moderator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Старые и смежные темы: по CMD и в Программах | по PowerShell | В помощь системному администратору | Прикладное программирование

PowerShell
Версии | Ассоциация и подпись сценариев
Сценарий для ассоциации файлов PowerShell и запуска неподписанных скриптов.
 
Прочее
Расширение возможностей
Функции
Write-Color
Output-DebugString
Провайдеры
Готовые скрипты
Полезные ссылки | Будет ли репозиторий PowerShell на ru-board?
Книги в PDF
Cheat Sheets
 

Cmd
Для перекодирования кириллицы 866<—>1251 пользуйтесь онлайн сервисом Перекодировщик кириллицы
 
Готовые решения и частые вопросы
 
Описания работы команд и символов участниками темы:
setlocal enabledelayedexpansion и переменные окружения
символы & и && в командной строке
Переменная %0
 
Полезные ссылки и утилиты

WSH (VBScript, JScript)
Программирование "удобняшек" на VBScript

Примечания:
• Большие куски кода заключайте в тэг [ more ]
• Чтобы не копировались концевые пробелы из форума, жмите на ссылку "Редактировать" в посте, и уже из редактора копируйте код без пробелов иначе сценарий может работать неправильно. Также для удаления концевых пробелов пользуйтесь скриптом от Nagual, или VBS-Скрипт-Модулем от ViSiToR.
• Сторонние консольные утилиты можно использовать только в виде готового решения и только в рамках сценариев. Никаких обсуждений и обучений работе с утилитами не предусмотрено и прямо запрещено правилами топика.
Шапка и около-темные вопросы |

Всего записей: 11064 | Зарегистр. 12-10-2001 | Отправлено: 13:40 17-02-2018 | Исправлено: YuS 2, 08:24 19-06-2021
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Falcon99
У вас есть два пути: переформулировать задачу так, чтобы не навязывался инструмент - или ждать того, кто поможет именно с VBScript

Всего записей: 17126 | Зарегистр. 14-10-2001 | Отправлено: 09:44 14-12-2018
Falcon99



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

Цитата:
У вас есть два пути: переформулировать задачу так, чтобы не навязывался инструмент - или ждать того, кто поможет именно с VBScript  

 
Только что подправил логон и логофф скрипты. Теперь получаю в конце вечера как надо.
В параметрах компьютера в разделе "Department" название отдела последнего пользователя, а в описании "ФИО ; Вошел в: Дата Время ; Вышел в: Дата Время". А в описании пользователя "Имя_компьютера ; Включен: Дата Время ; Выключен: Дата Время".
Теперь осталось сделать скрипты для формирования realname.cfg и group.cfg. Мне советуют это делать через PowerShell используя Connect-QADService, т.к. скрипты будут крутится на Windows Server 2003, но пока не знаю как их сделать.  
 
P.s. На чем будут работать скрипты для формирования файлов realname.cfg и group.cfg мне не важно, главное чтобы они могли работать на Windows Server 2003, конечно хотелось бы чтобы не требовалась установка дополнительного обеспечения.

Всего записей: 607 | Зарегистр. 12-10-2005 | Отправлено: 12:23 14-12-2018 | Исправлено: Falcon99, 14:26 14-12-2018
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Falcon99
 
Для администрирования чего угодно мелкомягкого лучшая практика - иметь новейшую клиентскую систему - ну да,  на сегодня десятку - с включенными средствами удаленного администрирования (RSAT)
Иметь её можно где угодно: например, на личном ноуте или в виртуалке.
 
Не иметь такой - значит незаслуженно обижать себя любимого.
 
Добавлено:
В RSAT входит Powershell модуль ActiveDirectory.  
Я лично хотя и не пробовал, не вижу причин ему не работать с антикварными версиями AD
 
Добавлено:
Не, соврамши малость (
Придётся завести хотя бы один DC не ниже 2008 R2 - хотя бы тоже в припрятанной виртуалке (если опасаетесь копирастических ужастиков).
И рулить AD, подключаясь к этому контроллеру адекватными современными инструментами.

Всего записей: 17126 | Зарегистр. 14-10-2001 | Отправлено: 21:52 15-12-2018 | Исправлено: LevT, 21:57 15-12-2018
2as

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

Цитата:
Я лично хотя и не пробовал, не вижу причин ему не работать с антикварными версиями AD

Шыдевр, чо уж )))
Практически классика:"Не читал, но осуждаю одобряю".

Всего записей: 3482 | Зарегистр. 09-09-2003 | Отправлено: 18:28 16-12-2018
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
2as
Я реально не вижу смысла в использовании антиквариата от MS
 
Даже если по копирастическим соображениям нужно иметь древнюю "лицензионную" серверную - нафига обходиться только ею? и не завести нормальные DC и админские инструменты хоть в виртуалках, хоть в "облаках"
 
Или (XOR) перейти на современную линевую инфраструктуру..
 
 
Falcon99
"Бизнесу" этого может быть и не нужно - до первого вируса поимевшего сеть, представляющую собой на сегодня решето - но это нужно админу, себе же любимому.
 
Умение писать WSH сценарии - чудачество/хобби крайне странное и абсолютно немонетизируемое сейчас.

Всего записей: 17126 | Зарегистр. 14-10-2001 | Отправлено: 18:39 16-12-2018 | Исправлено: LevT, 18:54 16-12-2018
2as

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

Цитата:
Придётся завести хотя бы один DC не ниже 2008 R2 - хотя бы тоже в припрятанной виртуалке (если опасаетесь копирастических ужастиков).

Излишества это.  
DC для Win-клиентов давно уже реализован на Линуксе. Например можно посмотреть в сторону Calculate Linux (фактически это бинарный Gentoo). Отечественная разработка.
... а следом, скорее всего и остальные Windows по-тихому уйдут. К 2022 госструктуры планируют перевести на отечественный софт. (Уже вслух об этом заявлено).
Кстати уже сейчас из налоговых органов документы начали приходить в формате Libre Office, а не MS Office.
Так что, по-моему мнению, сейчас лучше изучать Bash и JavaScript. )))

Всего записей: 3482 | Зарегистр. 09-09-2003 | Отправлено: 08:40 17-12-2018
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
2as
Частный бизнес никуда с винды не слезет.
Если его не потянет любопытный админ )
 
Ну и любопытство у всех разное: моё вот вокруг повершел.
Который уже умеет рулить линями, есличо
 
Что до госструктур - то пока что плотно сидим на винде, только вместо цисок закупают говнище от Eltex
Одно радует, что под нишевые проекты: прежние циски пашут и будут пахать.
Даже при переезде на другую площадку в прошлом году мы успели сделать инфраструктуру на Nexus-ах.
 




Мутотень несешь, шел бы уже во флейм.

Всего записей: 17126 | Зарегистр. 14-10-2001 | Отправлено: 09:06 17-12-2018 | Исправлено: KLASS, 09:21 17-12-2018
Falcon99



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
LevT
У нас не бизнес, а муниципальная служба. Сервер DC стоит 2008R2, но десятки запрещены. А Win 2003 будет использоваться для раздачи инета и ведения статистики, так же на нем будет стоять и сервер V-talking (чата для локальной сети). Сейчас там стоит вообще машина с XP, но освободилась лицензия 2003 сервера, поэтому на него и будем переизжать на новогодних каникулах. Именно поэтому скрипт мне нужен под 2003 сервер. Чтобы все крутилось на одной машине.
 
 
P.s. Для модератора. Данный пост давал для объяснения почему мне необходимо создание скрипта или на WHS или на PowerShell, но редакции 2.0.




Аналогично, перемещаемся отсюда

Всего записей: 607 | Зарегистр. 12-10-2005 | Отправлено: 09:16 17-12-2018 | Исправлено: Falcon99, 11:37 17-12-2018
LevT



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

Цитата:
Сервер DC стоит 2008R2,  

 
Значит, PS модуль ActiveDirectory должен быть доступен или сходу, или после включения соотв. фичи.
 
 

Цитата:
Чтобы все крутилось на одной машине.  

 
"Чтобы все яйца были в одной корзине"
Корзина из прадедушкиного сарая отлично будет смотреться!
 
 
Добавлено:

Цитата:
 но десятки запрещены.  

 
Извините за любопытство: кем и кому запрещены?
Какая кара грозит админу за десятку в виртуалке или на личном ноуте?





Не слышишь, отдыхаем 3 дня

Всего записей: 17126 | Зарегистр. 14-10-2001 | Отправлено: 10:47 17-12-2018 | Исправлено: KLASS, 10:58 17-12-2018
BorlandIMHO

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

Цитата:
кем и кому запрещены?

Рассказываю: в любых гос. конторах могут использоваться исключительно ОС, имеющие действующий сертификат ФСБ для обработки конфиденциальной информации. В настоящее время Win10/Server2016 такого сертификата не имеют.

Цитата:
Какая кара грозит админу за десятку в виртуалке или на личном ноуте?

На личном ноуте - никакой кары. Пока этот самый личный ноут не подключён к сети конторы (хотя кое-где злые безопасники докопаются уже к тому факту, что личный ноут вообще попал на подконтрольную территорию; формально это тоже запрещено).  
На виртуалке может крутиться что угодно. При условии, что виртуалка входит в перечень разрешённого софта и опять же гостевая ОС не имеет доступа к сети конторы.
Кара - зависит от конкретной конторы. От устного выговора до увольнения...
 
 
Модераторам: удалите, пожалуйста, оффтоп!

----------
http://www.imho.ws





Ничего на форуме не удаляют, чтобы видно было, за что запрет на три дня.

Всего записей: 2388 | Зарегистр. 12-10-2006 | Отправлено: 11:56 17-12-2018 | Исправлено: KLASS, 15:00 17-12-2018
0utcast



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

Всего записей: 349 | Зарегистр. 08-07-2011 | Отправлено: 15:01 17-12-2018
NIKZZZZ



Gold Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
0utcast
В батнике символ % надо удваивать - %%

Всего записей: 5365 | Зарегистр. 08-02-2006 | Отправлено: 15:07 17-12-2018
Falcon99



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Продолжении своего вопроса.
В принципе стало получаться, но нужна помощь по двум вопросам.
Для получения списка из Ip адреса компьютера и ФИО пользователя сделал такой скрипт:

Код:
Add-pssnapin Quest.ActiveRoles.ADManagement #подключаем оснастку для работы с AD
cls #очищаем экран
$realname = "c:\scripts\realname.cfg" #задаем путь к файлу
$isfile = Test-Path $realname #проверяем наличие файла
if($isfile -eq "True") {Remove-Item $realname} #если есть, удаляем его
#подключаемся к домену и получаем списко файлов
get-QADComputer | foreach {`
$ipname=$NULL #очищаем переменную для IP адреса компьютера
$string=$NULL
$compname=$_.Name #получаем имя компьютера
$description=$_.description
#if ($description) {$ipname=[Net.DNS]::GetHostEntry($compname).addressList[0].IPAddressToString}
$ipname=[Net.DNS]::GetHostEntry($compname).addressList[0].IPAddressToString #по названию компьютера ищем в DNS'е его IP адрес
if ($ipname){$string=$ipname+" "+$description} #если IP адрес получен, то формируем запись для файла
if ($string){$string >>$realname}} #если есть что, то пишем в файл
Но если для компьютера отсутствует ip адрес, то появляется надпись:

Код:
Исключение при вызове "GetHostEntry" с "1" аргументами: "Этот хост неизвестен"
C:\Scripts\Ip_comp_description.ps1:12 знак:32
+ $ipname=[Net.DNS]::GetHostEntry <<<< ($compname).addressList[0].IPAddressToString
    + CategoryInfo          : NotSpecified: (:) [], MethodInvocationException
    + FullyQualifiedErrorId : DotNetMethodException
Как это убрать. или может есть другой вариант для скрипта?
Второй вопрос: в description у меня пишется "ФИО ; Login: Date Time ; Logoff: Date Time". Как отсечь и писать в файл только то что до первой ";"?
 
P.s. Раньше в описание компьютера писалось на русском языке ("Вошел:", "Вышел:"), но почему-то с одних компьютеров записывалось в правильной кодировке, а с других в другой, из-за чего на части компьютеров описание было нечитаемое.

Всего записей: 607 | Зарегистр. 12-10-2005 | Отправлено: 09:35 20-12-2018 | Исправлено: Falcon99, 09:36 20-12-2018
OOD

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите как сохранить имя пользователя, если пароля нет на сетевую шару?
Делаю так:

Код:
net use \\Server/user:"UserName" ""

 
Пароля нет - все работает, но после перезагрузки перестает работать, нужно заново делать.
в автозагрузку -не вариант...
 

Всего записей: 3378 | Зарегистр. 20-05-2006 | Отправлено: 10:49 20-12-2018
Falcon99



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

Цитата:
Пароля нет - все работает, но после перезагрузки перестает работать, нужно заново делать.
в автозагрузку -не вариант...  

В конце добавь /PERSISTENT:Yes
 
 
P.s. Вопрос по скрипту снимаю, доработал, до необходимого уровня.

Всего записей: 607 | Зарегистр. 12-10-2005 | Отправлено: 12:31 20-12-2018 | Исправлено: Falcon99, 12:32 20-12-2018
OOD

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

Цитата:
В конце добавь /PERSISTENT:Yes  

добавил, после перезагрузки -слетает

Всего записей: 3378 | Зарегистр. 20-05-2006 | Отправлено: 13:04 20-12-2018
Falcon99



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

Код:
net use Y: \\Server\share /user:user * /persistent:yes

Т.е. с указанием конкретного диска куда маппить диск.

Всего записей: 607 | Зарегистр. 12-10-2005 | Отправлено: 15:36 20-12-2018 | Исправлено: Falcon99, 15:40 20-12-2018
Baltazar500



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Хм, а по какой причине не отрабатывает полный путь до каталога при использовании for /r (или dir /s /b + for /f)
Цитата:
for /r %a in (C:\abc\*) echo %a
и работает только относительный ?
Цитата:
for /r %a in (.\abc\*) echo %a

 
Ещё момент, "setlocal enabledelayedexpansion" правильно закрывать командой "endlocal disabledelayedexpansion" ?

Всего записей: 2080 | Зарегистр. 19-09-2011 | Отправлено: 08:10 21-12-2018
YuS_2



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

Цитата:
по какой причине не отрабатывает полный путь до каталога при использовании for /r


Цитата:
for /r %a in (C:\abc\*) echo %a

Как бы, справка пишется для того, чтобы её читали... нет?

Цитата:
FOR /R [[диск:]путь] %переменная IN (набор) DO команда [параметры]
 
    Выполнение команды для каталога [диск:]путь, а также для всех
    подкаталогов этого пути.  Если после ключа /R не указано имя
    каталога, используется текущий каталог. Если набор - это
    одиночный символ точки (.), команда просто перечисляет дерево каталогов.

 
 
Добавлено:

Цитата:
"setlocal enabledelayedexpansion" правильно закрывать командой "endlocal disabledelayedexpansion" ?

Нет, конечно. Ключами управляет только setlocal.
endlocal завершает локализацию переменных...
И опять же, справка есть же встроенная:

Код:
setlocal /?
endlocal /?

Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 08:19 21-12-2018
OOD

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

Цитата:
Т.е. с указанием конкретного диска куда маппить диск.

да, спс! с диском работает, а без диска только до перезагрузки
пришлось добавить в автозагрузку без диска.

Всего записей: 3378 | Зарегистр. 20-05-2006 | Отправлено: 10:35 21-12-2018
Открыть новую тему     Написать ответ в эту тему

Страницы: 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 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225

Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Активные темы » Сценарии для Windows


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

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

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru