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

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

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

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.
• Сторонние консольные утилиты можно использовать только в виде готового решения и только в рамках сценариев. Никаких обсуждений и обучений работе с утилитами не предусмотрено и прямо запрещено правилами топика.
Шапка и около-темные вопросы |

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



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
iNNOKENTIY21
 
Спасибо Вам за отзывчивость. Я рассматривал подобный вариант удаление дубликатов файлов. Сценарий отрабатывает правильно и удаляет дубликаты в корневом каталоге и во всех вложенных каталогах, оставляя только один оригинальный файл в каталоге с самым глубоким вложением.
Можно ли после обработки в сценарии по размеру и хэшу файлов, сохранить по одному оригинальному файлу в каждом вложенном каталоге, в т.ч. и корневом, а дубликаты файлов удалить? Например, имеем корневой каталог "Folder" (включающий файлы "File1.txt", "File2.txt" и "File3.txt"), а в нём подкаталоги "Folder1" (включающий файлы "File1.txt", "File2.txt" и "File3.txt"), "Folder2" (включающий файлы "File1.txt", "File2.txt" и "File3.txt") и "Folder3" (включающий файлы "File1.txt", "File2.txt" и "File3.txt"). "File1.txt", "File2.txt" и "File3.txt" - являются полностью идентичными (дубликатами) в корневом и вложенных каталогах. После обработки в сценарии получаем, - "Folder" ("File1.txt"), подкаталоги "Folder1" ("File1.txt"), "Folder2" ("File1.txt") и "Folder3" ("File1.txt"). Буду Вам очень признателен за помощь.

Всего записей: 712 | Зарегистр. 19-02-2008 | Отправлено: 00:46 27-11-2023 | Исправлено: Artem_Butenko, 00:49 27-11-2023
iNNOKENTIY21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Artem_Butenko, так ваш скрипт и надо, почти, только без рекурсии. Я так понимаю.
 
Script.ps1
PowerShell
Код:

# Параметр Directory  — корневая директория.
param ( [Parameter(Mandatory)] [System.IO.DirectoryInfo] $Directory )
 
if (-not $Directory.Exists) {
    "Directory: <<$Directory>> — not found!"
    return
}
 
# Функция для удаления дубликатов файлов в указанной папке.
function Remove-DuplicateFiles {
    param ( [Parameter(Mandatory)] [string] $Path )
 
    Get-ChildItem -File $Path |
    Group-Object -Property 'Length' |
    Where-Object -Property 'Count' -GT 1 |
    ForEach-Object {
        $_.Group |
        Get-FileHash |
        Group-Object -Property 'Hash' |
        ForEach-Object -Process { $_.Group } |
        Select-Object -Property Path -Skip 1 |
        Remove-Item
    }
}
 
Get-ChildItem -Directory $Directory | ForEach-Object -Process {
    Remove-DuplicateFiles -Path "$($_.FullName)\*.txt"
}
 
Remove-DuplicateFiles -Path "$($Directory.FullName)\*.txt"

 
Рекурсию можно добавить в

Код:
Get-ChildItem -Directory $Directory -Recurse | ForEach-Object -Process {
    Remove-DuplicateFiles -Path "$($_.FullName)\*.txt"
}

 
Добавлено:
Запуск скрипта:
Код:
К:\Скрипту\Путь\Script.ps1 -Directory 'C:\Folder'

Всего записей: 3533 | Зарегистр. 16-08-2012 | Отправлено: 15:54 27-11-2023 | Исправлено: iNNOKENTIY21, 16:08 27-11-2023
toadmr

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

Цитата:
На самом деле, PowerShell Pode, довольно полезная штука, если научиться ей пользоваться.
Вот я и пытаюсь ))

Кому интересно, погуглите в сторону Pode.Web
Если не требуется серьезного дебага, то клевая штука.

Всего записей: 22 | Зарегистр. 12-04-2023 | Отправлено: 10:49 30-11-2023
BOA_KAA



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
LevT
 
Ааа, дадада, знак $ перед именами переменных в их объявлении. Да, моя ошибка. Не стоит писать ответы с телефона. Но главное, что человек идею понял!

Всего записей: 310 | Зарегистр. 01-12-2004 | Отправлено: 22:04 01-12-2023 | Исправлено: BOA_KAA, 22:05 01-12-2023
syrenium

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Есть необходимость, чтобы при запуске сценария PowerShell (.ps1) он проверял, запущен ли он с правами администратора и если нет, то запускался от имени администратора.
Подскажите, пожалуйста, как можно это реализовать для Windows PowerShell 5.1?

Всего записей: 671 | Зарегистр. 07-12-2015 | Отправлено: 17:46 09-12-2023
mithridat1



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
syrenium
По моему опыту, можно только сделать проверку админских прав
 
#Requires -RunAsAdministrator
 
но сам по себе Powershell повышать привилегии не умеет, его надо принудительно запускать от имени админа.
Для запуска скриптов ps1 с правами админа использую такой bat-скрипт:
 

Цитата:
cd /D %~dp0
 
if not "%1"=="am_admin" (powershell start -verb runas '%0' am_admin & exit /b)
 
powershell.exe -noexit -ExecutionPolicy Bypass -File Script.ps1
exit

 
Если кто знает более изящное решение тоже не откажусь от подсказки.

Всего записей: 4965 | Зарегистр. 05-01-2006 | Отправлено: 21:50 09-12-2023 | Исправлено: mithridat1, 06:39 10-12-2023
syrenium

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
mithridat1
С батником ситуация понятна.
Хорошо, а если в контекстное меню проводника добавить пункт запуска от имени администратора?
Куда добавлять я знаю, не знаю только, какую команду добавить (powershell.exe...).
Не подскажите?

Всего записей: 671 | Зарегистр. 07-12-2015 | Отправлено: 13:20 10-12-2023
iNNOKENTIY21



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

Цитата:
С батником ситуация понятна.
Хорошо, а если в контекстное меню проводника добавить пункт запуска от имени администратора?
Куда добавлять я знаю, не знаю только, какую команду добавить (powershell.exe...).
Не подскажите?

С реестром, как раз и важно куда (shell\runas\command)
мой фаворит, древний скрипт #PSTip How to start an elevated PowerShell from Windows Explorer
 

Код:
$menu = 'PowerShell (Администратор)' # название пункта меню
$command = "$PSHOME\powershell.exe -NoExit -Command ""Set-Location '%V'"""
 
'directory', 'directory\background', 'drive' | ForEach-Object {
    New-Item -Path "Registry::HKEY_CLASSES_ROOT\$_\shell" -Name runas\command -Force |
    Set-ItemProperty -Name '(default)' -Value $command -PassThru |
    Set-ItemProperty -Path {$_.PSParentPath} -Name '(default)' -Value $menu -PassThru |
    Set-ItemProperty -Name HasLUAShield -Value ''
}

Правка скрипта в одном месте, в 1 и 2 строке, а изменяется в реестре сразу в 3 местах (контекстное меню: Папка, Рабочий стол, Диск). А не то, что бы в трех местах править…
Магия. Скрипты сила!

Всего записей: 3533 | Зарегистр. 16-08-2012 | Отправлено: 23:47 12-12-2023
LevT



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

https://www.reddit.com/r/PowerShell/comments/18jlwcu/what_is_you_can_not_do_via_powershell/
 

Всего записей: 17260 | Зарегистр. 14-10-2001 | Отправлено: 12:56 17-12-2023
JekaRus

Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Добрый день.
Есть такая команда которая поворачивает картинку 000.jpg на 1 градус и сохраняет как 001.jpg
convert -rotate 1 000.jpg 001.jpg
Как написать цикл чтоб получилось 360 картинок, где каждая отклоняется от предыдущей на 1 градус?

Всего записей: 1046 | Зарегистр. 10-08-2005 | Отправлено: 03:27 20-12-2023
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
JekaRus
 
Нет такой "команды". Ищите сторонний софт, который умеет поворачивать картинки - а лучше сразу генерить вращающуюся гифку.

Всего записей: 17260 | Зарегистр. 14-10-2001 | Отправлено: 17:37 20-12-2023
virjokk

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
JekaRus
Батником так:
Код:
SetLocal EnableDelayedExpansion
for /l %%a in (1,1,360) do set "outfile=00%%a"&"путь\до\программы\convert" -rotate %%a 000.jpg !outfile:~-3!.jpg
На PS так:
Код:
1..360 | %{&"путь\до\программы\convert" "-rotate" "$_" "000.jpg" "$("{0:000}" -f $_).jpg"}
LevT
Он уже нашел

Всего записей: 291 | Зарегистр. 19-05-2006 | Отправлено: 19:22 20-12-2023 | Исправлено: virjokk, 00:20 21-12-2023
JekaRus

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

Всего записей: 1046 | Зарегистр. 10-08-2005 | Отправлено: 01:41 21-12-2023
JekaRus

Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
virjokk
А подскажите еще как интегрировать со второй командой.
Есть команда наложения 2х картинок.
Без цикла она работает в таком виде.
convert room.jpg 001.png -geometry +0+0 -composite new-room.jpg
Тут файл 001.png это файл полученный из цикла, а room.jpg с которой нужно совместить.
 
Если подставляю в цикл чтоб делалось отклонение на градус и совмещалось со второй картинкой то не работает
for /l %%a in (1,1,360) do set "outfile=00%%a"&"путь\до\программы\convert" -rotate %%a 000.jpg !outfile:~-3!.jpg room.jpg -geometry +0+0 -composite new-room.jpg
Уже по всякому пробовал подставлять. Не получается.

Всего записей: 1046 | Зарегистр. 10-08-2005 | Отправлено: 12:54 22-12-2023
virjokk

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
JekaRus
Пробуйте. При каждой итерации после поворота к файлу new-room.jpg будут добавляться room.jpg + NNN.jpg. Даже не знаю, что получится...
Код:
SetLocal EnableDelayedExpansion
for /l %%a in (1,1,360) do (
   set "outfile=00%%a"
   "путь\до\программы\convert" -rotate %%a 000.jpg !outfile:~-3!.jpg
   "путь\до\программы\convert" room.jpg !outfile:~-3!.jpg -geometry +0+0 -composite new-room.jpg
)

Всего записей: 291 | Зарегистр. 19-05-2006 | Отправлено: 13:42 22-12-2023 | Исправлено: virjokk, 13:43 22-12-2023
ndch

Gold Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Господа, а как проверить валидность цифровой подписи у файла (кроме PowerShell) ?

Всего записей: 6579 | Зарегистр. 31-08-2008 | Отправлено: 15:08 22-12-2023
BorlandIMHO

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

Цитата:
(кроме PowerShell)

Ну, есть ещё SignTool, но его требуется устанавливать (в составе Windows SDK)...

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

Всего записей: 2432 | Зарегистр. 12-10-2006 | Отправлено: 15:18 22-12-2023
JekaRus

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

Цитата:
Пробуйте. При каждой итерации после поворота к файлу new-room.jpg будут добавляться room.jpg + NNN.jpg. Даже не знаю, что получится...

Все работает. Спасибо. Только в конце вместо new-room.jpg написал !outfile:~-3!.jpg а то на выходе был только 1 файл. То есть каждый раз шло перезатирание. А сейчас все по отдельным файлам.
Я только не могу понять суть этой записи !outfile:~-3!.jpg
А как сделать чтоб например были файлы не 001.jpg на выходе а 0001.jpg например.
Пробовал заменить 3 на 4 но не помогло.
 
Добавлено:
virjokk
Еще вопрос по цифрам в скобочках (1,1,360)
360 - это понятно что количество фоток на выходе
А за что отвечают первые две единицы?
Можно ли как то сделать угол не 1 градус, а например 0,5 градусов, чтоб на выходе было 720 фоток.
Пробовал вместо этих единичек писать, но тоже так не работает.

Всего записей: 1046 | Зарегистр. 10-08-2005 | Отправлено: 03:46 23-12-2023
virjokk

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


Цитата:
суть этой записи !outfile:~-3!.jpg
Оставляет в значении переменной outfile 3 символа справа. Перед этим ей присвается текущее значение счетчика цикла с добавлением 2 нулей слева. Чтобы сделать 4 разряда, надо добавить еще один 0: set "outfile=000%%a" и потом обрезать до 4 символов: !outfile:~-4!. Цифры в скобочках: начальное значение цикла, шаг, конечное значение. Все есть в справке: for /?. Как сделать дробный шаг цикла в батнике даже не подскажу.

Всего записей: 291 | Зарегистр. 19-05-2006 | Отправлено: 07:39 23-12-2023
virjokk

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Если только в каждой итерации дополнительно доворачивать картинку на 0,5 как-то так:
Код:
SetLocal EnableDelayedExpansion
for /l %%a in (1,1,360) do (
   set "outfile=000%%a"
   "путь\до\программы\convert" -rotate %%a 000.jpg !outfile:~-4!.jpg
   set /a num=%%a+1
   set "outfile2=000!num!"
   "путь\до\программы\convert" -rotate %%a,5 000.jpg !outfile2:~-4!.jpg
)

Но это только на 0,5

Всего записей: 291 | Зарегистр. 19-05-2006 | Отправлено: 09:51 23-12-2023 | Исправлено: virjokk, 10:22 23-12-2023
Открыть новую тему     Написать ответ в эту тему

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

Компьютерный форум 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