KLASS Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Старые и смежные темы: по CMD и в Программах | по PowerShell | В помощь системному администратору | Прикладное программирование PowerShell Версии | Ассоциация и подпись сценариев Сценарий для ассоциации файлов PowerShell и запуска неподписанных скриптов.   Прочее Если используете "белый список" в брандмауэре Windows, то для работы сценариев в сети необходимо создать 2 исходящих правила для svchost.exe и PowerShell.exe. В отличие от батников, кодировка скриптов на PowerShell должна быть 1251 (ANSI). Начиная с версии PowerShell Core 6.0, кодировка по умолчанию UTF8NoBOM. Дополнительные данные про кодировки. Расширение возможностей Функции • Write-Color • Output-DebugString Провайдеры Готовые скрипты Полезные ссылки | Будет ли репозиторий PowerShell на ru-board? • Книги в PDF • Cheat Sheets   Cmd Для перекодирования кириллицы 866<—>1251 пользуйтесь онлайн сервисом Перекодировщик кириллицы   Готовые решения и частые вопросы   Описания работы команд и символов участниками темы: • setlocal enabledelayedexpansion и переменные окружения • символы & и && в командной строке • Переменная %0   Полезные ссылки и утилиты WSH (VBScript, JScript) Программирование "удобняшек" на VBScript Примечания: • Большие куски кода заключайте в тэг [ more ] • Чтобы не копировались концевые пробелы из форума, жмите на ссылку "Редактировать" в посте, и уже из редактора копируйте код без пробелов иначе сценарий может работать неправильно. Также для удаления концевых пробелов пользуйтесь скриптом от Nagual, или VBS-Скрипт-Модулем от ViSiToR. • Сторонние консольные утилиты можно использовать только в виде готового решения и только в рамках сценариев. Никаких обсуждений и обучений работе с утилитами не предусмотрено и прямо запрещено правилами топика. • Шапка и около-темные вопросы | Всего записей: 11110 | Зарегистр. 12-10-2001 | Отправлено: 13:40 17-02-2018 | Исправлено: YuS 2, 08:24 19-06-2021

newhk BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Столкнулся с непонятной ситуацией.   Код:   $compname=read-host 'Введите имя компьютера' $username=read-host 'Введите имя пользователя' Set-Variable -Name 1 -Value 'Офис 1' Set-Variable -Name 2 -Value 'Офис 2' Set-Variable -Name 3 -Value 'Офис 3' Set-Variable -Name 4 -Value 'Офис 4' Set-Variable -Name 5 -Value 'Офис 5' $choose=read-host (     'Выберите цифру соответствующую необходимой площадке:     1 Офис 1     2 Офис 2     3 Офис 3     4 Офис 4     5 Офис 5 ') $place=get-variable -Value $choose   $Comp = (Get-ADComputer "$compname" -Properties *).name   IF ($Comp -eq $compname){     Remove-ADComputer -Identity $compname     Add-Computer -NewName $compname -DomainName domain.ru -Credential domain.ru\$username -OUPath "OU=$place,OU=Компьютеры,DC=DOMAIN,DC=RU" -PassThru -Verbose -Force     Add-ADGroupMember - Identity 'ПК пользователей' -Member $compname }     На попытку добавить комп в группу, получаю ошибки:   1. Пока комп не в домене, он не знает модуля activedirectory     Как компу не в домене его подключить? 2. Не могу точно сформулировать, пока не решен 1-й пункт. Предварительно, PS не может найти комп в         домене. Но это не точно. Всего записей: 400 | Зарегистр. 02-02-2009 | Отправлено: 17:35 23-08-2019

YuS_2 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору newhk Цитата: Как компу не в домене его подключить? https://blogs.technet.microsoft.com/adpowershell_ru/2009/02/25/active-directory-windows-powershell-1086/ https://4sysops.com/wiki/how-to-install-the-powershell-active-directory-module/ https://docs.microsoft.com/ru-ru/powershell/module/addsadministration/?view=win10-ps Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 19:18 23-08-2019 | Исправлено: YuS_2, 19:39 23-08-2019

LevT Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору newhk   Этот модуль добавляется либо на КД вместе с AD,   либо на админскую станцию (десятку, отдельно набитую средствами админстрирования RSAT)   Но второе не обзательно: можно вместо этого подключиться к DC через ремотинг и импортировать модуль в удалённую сессию.   Можно и сильнее: импортировать удалённый модуль из DC в локальную сессию на админском клиенте.   Другое дело, что в нормальной AD такие фокусы по хорошему должны быть запрещены для нечленов. Всего записей: 17149 | Зарегистр. 14-10-2001 | Отправлено: 02:40 24-08-2019 | Исправлено: LevT, 02:43 24-08-2019

iNNOKENTIY21 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Что делать в субботу вечером? Правильно консоль раскрасить А как у вас?   Для скриншота использовались: Всего записей: 3519 | Зарегистр. 16-08-2012 | Отправлено: 18:44 24-08-2019 | Исправлено: iNNOKENTIY21, 14:51 27-08-2019

LevT Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору iNNOKENTIY21   Install-Module OhMyPsh https://github.com/zloeber/OhMyPsh     Всего записей: 17149 | Зарегистр. 14-10-2001 | Отправлено: 02:15 25-08-2019

iNNOKENTIY21 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору LevT Цитата: Install-Module OhMyPsh Столько малознакомых букв и ни одной картинки. Без них не понятно, что это и зачем это. Сложновато для prompt`а Всего записей: 3519 | Зарегистр. 16-08-2012 | Отправлено: 14:20 25-08-2019

LevT Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору iNNOKENTIY21   В коде вообще мало радости для визуалов )   Человек - известный профи - озадачился настройкой именно родного шелла, в котором он сидит по жизни Решил и твою задачу, и нехилое количество задач вокруг.     Добавлено: Вот тут картинки https://ohmyz.sh/ которыми он вдохновлялся Всего записей: 17149 | Зарегистр. 14-10-2001 | Отправлено: 15:06 25-08-2019

iNNOKENTIY21 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору LevT Цитата: Вот тут картинки https://ohmyz.sh/ которыми он вдохновлялся   Ну да, ну да. Как выглядит ваш самсунг, да гляньте на айфон, им вдохновлялись Всего записей: 3519 | Зарегистр. 16-08-2012 | Отправлено: 15:31 25-08-2019

Smitis Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору iNNOKENTIY21 Цитата: А как у вас? Лучшая консоль, это ConEmu+FAR А скриншот делать лень ---------- Разум когда-нибудь победит Всего записей: 3214 | Зарегистр. 09-02-2003 | Отправлено: 13:34 27-08-2019

iNNOKENTIY21 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Smitis Цитата: ConEmu+FAR Не приживается почему то. Не умею готовить наверно. Этих скринов то полно. И это не prompt powershell   А cmd prompt меняли? макросы doskey или еще чего? Наверно всё на far`е Всего записей: 3519 | Зарегистр. 16-08-2012 | Отправлено: 14:45 27-08-2019

YuS_2 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору iNNOKENTIY21 Цитата: А как у вас? у меня всё просто: Код: function prompt {     $ver = $host.version.major.tostring()+"."+$host.version.minor       $host.ui.rawui.windowtitle = $(         if($host.ui.rawui.windowtitle -match 'administrator|администратор'){"Администратор: "}     ) + "PS_$ver> $(Get-Location)"     "$(write-host PS_$ver -for cyan -non)" +'> ' }   function IsAdministrator {     $user = [Security.Principal.WindowsIdentity]::GetCurrent()     $admin = [Security.Principal.WindowsBuiltinRole]::Administrator     (New-Object Security.Principal.WindowsPrincipal $user).IsInRole($admin) }   if (IsAdministrator) {     [console]::backgroundcolor = ($background = "DarkRed")     [console]::foregroundcolor = ($foreground = "White")     $host.privatedata.ErrorForegroundColor    = "Red"     $host.privatedata.ErrorBackgroundColor    = $background     $host.privatedata.WarningForegroundColor  = "Yellow"     $host.privatedata.WarningBackgroundColor  = $background     $host.privatedata.DebugForegroundColor    = "Yellow"     $host.privatedata.DebugBackgroundColor    = $background     $host.privatedata.VerboseForegroundColor  = "Yellow"     $host.privatedata.VerboseBackgroundColor  = $background     $host.privatedata.ProgressForegroundColor = "Yellow"     $host.privatedata.ProgressBackgroundColor = $background       Clear-Host }   function cdx ($x) {     if ($x){cd -lit $x}     if((dir -dir) -eq $null){"Отсутствуют каталоги для выбора";break}     $dir = menu(dir -dir)     cd -lit $dir } сильно мешают длинные пути в приглашении, поэтому вынес в заголовок окна... ну и расцветка в режиме админа... Ещё есть функция консольного меню перехода в подкаталог, но для него требуется внешний модуль Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 17:32 27-08-2019

iNNOKENTIY21 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору YuS_2 Цитата: сильно мешают длинные пути в приглашении, поэтому вынес в заголовок окна... Ну то же в заголовок полный путь, а в приглашении обрезается, последние 2 каталога только остаются, регулируется циферки в коде Код: [string[]] $PathInArray = $PWD.Path.Split('\')       if ($PathInArray -and $PathInArray.Count -gt 3) {         $Path = "..\{0}" -f (($PathInArray | Select-Object -Last 2) -join "\")     }   Модуль PS-Menu выглядит интересно, надо будет попробовать. Кажись проверять $PathInArray лишнее…   Добавлено: PS-Menu поди можно, что то типа Избранных каталогов организовать у cdx есть небольшой недостаток, в столбик, на экране остается. Как в AdvancedHistory бы… Всего записей: 3519 | Зарегистр. 16-08-2012 | Отправлено: 18:47 27-08-2019

YuS_2 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору iNNOKENTIY21 Цитата: PS-Menu поди можно, что то типа Избранных каталогов организовать это запросто... Цитата: у cdx есть небольшой недостаток, в столбик, на экране остается. Можно cls прикрутить... Там другой недостаток. Если список не помещается в один экран, при перемещении по нему, происходит постоянный скроллинг. Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 19:54 27-08-2019 | Исправлено: YuS_2, 19:56 27-08-2019

Smitis Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору iNNOKENTIY21 Цитата: И это не prompt powershell А cmd prompt меняли? макросы doskey или еще чего? Наверно всё на far`е В ФАРе свой prompt и своя командная строка - всё под рукой. doskey не прижился. Есть префикс для выполнения команд powershell (без сохранения контекста). Есть плагин FarPowerShell (тоже не прижился). Цитата: Не умею готовить наверно. Да, там надо потратить некоторое время. Или брать готовую сборку. ---------- Разум когда-нибудь победит Всего записей: 3214 | Зарегистр. 09-02-2003 | Отправлено: 20:18 28-08-2019

LevT Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Начальство попросило помониторить отдел "вольных художников" Как проследить факт нажатия любых клавиш клавиатуры? Не обязательно на PS   Коллега написал такое для движений мышки, клаву по аналогии сделать не выходит:   Код:   Add-Type -AssemblyName System.Windows.Forms   # Delay Seconds $delayTime = 1; $lastPosition = @{"X" = 0; "Y" = 0 } ;   # Loop while ($true) {     $mousePosition = [System.Windows.Forms.Cursor]::Position     $mousePosition = @{"X" = $mousePosition.X; "Y" = $mousePosition.Y }       # $keyDown = [System.Windows.Forms.KeyEventHandler]::KeyDown     # Write-Output($keyDown)       if (($lastPosition.X -eq $mousePosition.X) -or ($lastPosition.Y -eq $mousePosition.Y)) {         Write-Output ($false)         # return $false     }     else {         Write-Output ($true)         ### Push to API $true         # return $true     }     $lastPosition = $mousePosition     Start-Sleep -Seconds $delayTime }       Вопрос закрыт Код:   $signature = @'     [DllImport("user32.dll", CharSet=CharSet.Auto, ExactSpelling=true)]     public static extern short GetAsyncKeyState(int virtualKeyCode); '@ $getKeyState = Add-Type -memberDefinition $signature -name "Newtype" -namespace newnamespace -passThru while ($true) {     Start-Sleep -Milliseconds 40     $logged = ""     for ($char = 1; $char -le 254; $char++) {         $vkey = $char         $logged = $getKeyState::GetAsyncKeyState($vkey)         if ($logged -eq -32767) {             Write-Output('KeyBordPress')         }     } }   Всего записей: 17149 | Зарегистр. 14-10-2001 | Отправлено: 14:58 30-08-2019 | Исправлено: LevT, 15:57 30-08-2019

iNNOKENTIY21 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору LevT Ох и ах. За кейлогеры взялся Судя по коду, чисто нажимаются ли клавиши? Планировщиком при бездействии? Всего записей: 3519 | Зарегистр. 16-08-2012 | Отправлено: 16:14 30-08-2019

LevT Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору iNNOKENTIY21   Мопед не мой: коллега пообещал начальству сделать, меня попросил помочь, а мне недосуг за джавой     Добавлено: Мониторинг у него под это уже был настроен Всего записей: 17149 | Зарегистр. 14-10-2001 | Отправлено: 17:14 30-08-2019

Smitis Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору LevT Цитата: Как проследить факт нажатия любых клавиш клавиатуры? Художники тоже разные бывают. Кейлогер, перехватывающий ввод с клавиатуры/мышки на уровне драйвера (официальный, платный, с подписями файлов, чтобы не срабатывали антивирусы). Остальное - порнография для ламеров. ---------- Разум когда-нибудь победит Всего записей: 3214 | Зарегистр. 09-02-2003 | Отправлено: 00:30 31-08-2019

newhk BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Приветствую!   Есть папка с логами, хочу прочитать их содержимое и поместить IP-адреса в файл.   Но что-то не выходит.   Как-то странно происходит фильтрация по регулярному выражению   Код:   GC E:\OUT.txt | Select-String "[0-9]\.[0-9]\.[0-9]\.[0-9]" | Out-File E:\out2.txt     PS выбрал всего 55 строк из 61090 и записал полностью строки, а я хочу только ИПшники Помогите разобраться пожалуйста.     Нашел Код:   get-content E:\OUT.txt | ?{$_ -match "\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}"}|%{$Matches[0]} | Out-File E:\out3.txt   Всего записей: 400 | Зарегистр. 02-02-2009 | Отправлено: 21:08 01-09-2019 | Исправлено: newhk, 16:18 02-09-2019

farag Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Можно ли как-то перевести фокус на окно "Открыть"? Процесс не создается, id нет, заголовка тоже. Код:   Add-Type -AssemblyName System.Windows.Forms $OpenFileDialog = New-Object System.Windows.Forms.OpenFileDialog $OpenFileDialog.Multiselect = $false $OpenFileDialog.ShowHelp = $true $OpenFileDialog.ShowDialog()   Всего записей: 2476 | Зарегистр. 27-07-2009 | Отправлено: 17:52 07-09-2019

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

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование