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

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в 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 228 229 230 231 232 233 234 235 236 237 238 239

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

KLASS



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

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

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

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

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

Всего записей: 11777 | Зарегистр. 12-10-2001 | Отправлено: 13:40 17-02-2018 | Исправлено: KLASS, 08:31 18-08-2025
lorents



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

Всего записей: 3299 | Зарегистр. 30-12-2007 | Отправлено: 18:02 10-11-2024 | Исправлено: lorents, 18:35 10-11-2024
drmin

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте!
Вопрос не совсем по вашей теме,но может кто-то подскажет ?
Чтобы быстрее открыть cmd в папке, делаю это через Powershell.
Файл >> Запустить Windows Powershell.
Но если загружаю видео,то процентные показатели загрузки отображаются темно-синим цветом и сливаются с фоном

Есть ли возможность изменить цвет на белый или желтый ?
Подробнее...
 

Всего записей: 173 | Зарегистр. 21-03-2022 | Отправлено: 22:48 17-11-2024
BorlandIMHO

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
drmin
"Показатели загрузки" выводит yt-dlp, теми цветами, которые заданы разработчиком. Программа рассчитана на работу в "голом" cmd, который {по умолчанию} чёрно-белыйсерый, а не сине-серый как при запуске из поша.
Изменить цвета yt-dlp на любые какие нравится - можно. Для этого нужно скачать исходники {вроде там python}, найти в исходниках этот "голубой" вывод и поменять на потребный жёлтый, после чего собрать "свой кастомный" yt-dlp. Если, конечно, умеете в Python...
 
Куда как проще воспользоваться штатной командой "color" для перекрашивания консоли. Стандартные цвета cmd - "color 07", но можно поэкспериментировать. Параметр - две шестнадцатеричные цифры {диапазон значений от 0 до F}, фон и текст соответственно. 0 - чёрный, 7 - серый, F - белый, A - зелёный. Всю линейку видно на вкладке "цвета" свойств окна cmd:
 
Или задать цвета консоли параметром /T при запуске cmd, например {cmd /T:0A}.

Всего записей: 3097 | Зарегистр. 12-10-2006 | Отправлено: 03:31 18-11-2024 | Исправлено: BorlandIMHO, 03:40 18-11-2024
Simple Code



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

Цитата:
Есть ли возможность изменить цвет на белый или желтый ?

Можно изменить цвет фона самой консоли, например на чёрный.
В самом начале скрипта вставьте две строчки:

Код:
 
(Get-Host).UI.RawUI.BackgroundColor = 'Black';
Clear-Host;
 

Всего записей: 310 | Зарегистр. 19-11-2022 | Отправлено: 08:31 18-11-2024 | Исправлено: Simple Code, 08:32 18-11-2024
iNNOKENTIY21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
drmin, зачем вообще запускать powershell, если нужен cmd?
 
Нужен из проводника cmd — его и запускайте:
 

 
или сразу yt-dlp:
 

 
А если погуглить, то и найдётся способ добавить в контекстное меню папок, пункт для открытия текущей папки в cmd.

Всего записей: 3785 | Зарегистр. 16-08-2012 | Отправлено: 16:36 18-11-2024
drmin

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

Код:
$col.ProgressBackgroundColor = "Yellow"



Цитата:
зачем вообще запускать powershell, если нужен cmd?

Согласен.Просто PS удобно открывалась в текущей папке.Но все-таки,программа не рассчитана на работу в PS.
Конечно,cmd можно запустить и через адресную строку,но бывает сбивается выделенный адрес.Поэтому,настроил контекстное меню для запуска командной строки.
Благодарю всех за разъяснения!

Всего записей: 173 | Зарегистр. 21-03-2022 | Отправлено: 22:11 18-11-2024 | Исправлено: drmin, 22:15 18-11-2024
akelboy



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Народ! Помогите!
Задачка такая! Есть виртуалка с Windows на linux хост системе. В Виртуалку пробрасывается в виде сетевого диска папка из хост системы, где она также является динамически монтируемой сетевой папкой. Из-за особенностей виртуалки эта папка может подключаться как диск Z: или как диск Y:. А пользователю виртуалки нужно бы не заморачиваться, а просто ткнуть значок на Рабочем столе и чтоб программа запустилась, вне зависимости от того, под какой буквой примонтировался диск. Ну а если по каким-то причинам запуск программы невозможен (сервер упал, диск не смонтировался) подать пользователю сообщение о том, что гипс сняли и клиент уехал.
Пытаюсь:

Код:
if (!(Test-Path -Path "Y:\Progs\")) {& "Y:\Progs\pr.exe"}

И уже сразу вижу, что ничего не вижу. Путь есть, программа вроде как запустилась, но окна нет. Более того, если я подставляю другую букву диска, где этого пути нет, то вижу, что условие не проверяется, а пытается запустить несуществующую программу.
Чего ж так сложно-то?

Всего записей: 252 | Зарегистр. 01-04-2016 | Отправлено: 12:37 04-12-2024
virjokk



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Test-Path же выдает true, если путь существует, а у вас зачем то обратное условие

Всего записей: 502 | Зарегистр. 19-05-2006 | Отправлено: 16:37 04-12-2024
akelboy



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
virjokk
Вот я дурак!!!
Всё. Разобрался. Такая конструкция отработала:

Код:
if (Test-Path -Path "Z:\Progs\") {& "Z:\Progs\pr.exe"}  
elseif (Test-Path -Path "Y:\Progs\") {& "Y:\Progs\pr.exe"}
else {
$wshell = New-Object -ComObject Wscript.Shell
$Output = $wshell.Popup("Всё пропало, шэф!")
}

Всего записей: 252 | Зарегистр. 01-04-2016 | Отправлено: 07:01 05-12-2024 | Исправлено: akelboy, 07:58 05-12-2024
virjokk



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

Код:
"Y:\Progs","Z:\Progs" | ?{Test-Path -Path $_} | %{&"$_\pr.exe"}

 
Добавлено:
Для любой буквы диска:
Код:
[char]'a'..[char]'z' | ?{Test-Path -Path $([char]$_+':\Progs')} | %{&$([char]$_+':\Progs\pr.exe')}

 
Добавлено:
Ну и с выводом сообщения:
Код:
$exist = [char[]]([char]'a'..[char]'z' | ?{Test-Path -Path $([char]$_+':\Progr')})
if ($exist) {
   $exist | %{&$([char]$_+':\Progs\pr.exe')}
} else {
   Add-Type -AssemblyName System.Windows.Forms
   [System.Windows.Forms.MessageBox]::Show("Всё пропало, шэф!","Кошмар!!!")
}

Всего записей: 502 | Зарегистр. 19-05-2006 | Отправлено: 08:06 05-12-2024 | Исправлено: virjokk, 13:47 05-12-2024
akelboy



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
virjokk
Это если кому-то другому понадобится. VirtualBox устроена так, что присваивает проброшенным папкам буквы диска, начиная с конца алфавита. В моей задаче их более двух быть не может. В общем и целом сетевым дискам может быть присвоена любая буква, кроме первых двух. В редких случаях загрузочному диску может быть присвоена буква, отличная от C:. Ну а первые две зарезервированы под флопповоды.

Всего записей: 252 | Зарегистр. 01-04-2016 | Отправлено: 15:29 05-12-2024
iNNOKENTIY21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
У меня так находятся сетевые:
 
CMD
Код:
net use | findstr /C:"OK" | for /f "tokens=2" %i in ('more') do @echo %i

PowerShell
Код:
[IO.DriveInfo]::GetDrives() | ? DriveType -eq Network | % Name

Всего записей: 3785 | Зарегистр. 16-08-2012 | Отправлено: 21:41 05-12-2024
LevT



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

Всего записей: 18174 | Зарегистр. 14-10-2001 | Отправлено: 03:27 06-12-2024 | Исправлено: LevT, 03:27 06-12-2024
anynamer



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Может кто-то пользуется Rainmeter или догадается в чём может быть проблема и сможет помочь: есть xml который грузят качалки, но почему-то не грузит Rainmeter.
Может чтобы скачать xml для rainmeter не хватает куков или ещё чего?
 
Вот ini файл для Rainmeter для отображения xml
http://forum.ru-board.com/topic.cgi?forum=5&topic=14806&start=260#13

Всего записей: 2437 | Зарегистр. 17-05-2010 | Отправлено: 18:31 06-12-2024 | Исправлено: anynamer, 18:31 06-12-2024
iNNOKENTIY21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
anynamer
Цитата:
https://epg.pw/api/epg.xml?channel_id=79269

запретити изволятъ демоны — isitblockedinrussia

Всего записей: 3785 | Зарегистр. 16-08-2012 | Отправлено: 21:07 06-12-2024
anynamer



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
iNNOKENTIY21
Тут что-то другое, браузером и качалками xml качается.

Всего записей: 2437 | Зарегистр. 17-05-2010 | Отправлено: 10:12 07-12-2024
Izb

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Есть файл сценария Windows для выполнения некой последовательности действий с ADB-сервером.
 
Оканчивается на 2 строки:
 
:quit
@bin\adb kill-server
 
Вопросы (весьма дилетантские) по этим двум строкам от гуманитария. Чисто для понимания:
 
1) Какую функцию выполняет команда Quit и для чего перед командой стоит двоеточие?
2) Какую функцию выполняет @ в последней строке?
3) Не правильнее ли команду :quit переместить на последнюю строчку?
 

Всего записей: 159 | Зарегистр. 23-12-2019 | Отправлено: 16:35 09-12-2024 | Исправлено: Izb, 19:57 10-12-2024
Simple Code



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Izb
 
1) Завершает текущий пакетный скрипт. При выполнении извне пакетного скрипта завершает работу Cmd.exe. Если задано значение «/b», завершает интерпретатор команды или текущий скрипт.
2) По умолчанию пакетный скрипт будет отображать свою команду по мере её выполнения. Если поставить «@» перед командой, отключает отображение этой команды в консоли.
3) Двоеточие это :<label> указывает метку, к которой должен перейти элемент управления пакетной программы. Перемещать на последнею строчку не стоит.

Всего записей: 310 | Зарегистр. 19-11-2022 | Отправлено: 20:30 09-12-2024 | Исправлено: Simple Code, 20:39 09-12-2024
Izb

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

Цитата:
1) Завершает текущий пакетный скрипт. При выполнении извне пакетного скрипта завершает работу Cmd.exe. Если задано значение «/b», завершает интерпретатор команды или текущий скрипт.
2) По умолчанию пакетный скрипт будет отображать свою команду по мере её выполнения. Если поставить «@» перед командой, отключает отображение этой команды в консоли.
3) Двоеточие это :<label> указывает метку, к которой должен перейти элемент управления пакетной программы. Перемещать на последнею строчку не стоит.

 
 
Спасибо!!!




п. 2.8.2. главы VIII Соглашения по использованию

Всего записей: 159 | Зарегистр. 23-12-2019 | Отправлено: 19:58 10-12-2024 | Исправлено: KLASS, 02:52 11-12-2024
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Кому поиграться с кучей XML данных, притом осмысленных.
Анализируем реестр РКН:
 

Код:

# Define the URL of the XML file
$url = "https://rkn.gov.ru/opendata/7705846236-InformationDistributor/data-20241220T0000-structure-20161206T0000.xml"
 
$response = Invoke-WebRequest -Uri $url
 
# Convert response content to UTF-8 string if necessary
$xmlContent = $response.Content
 
# Cast to XML if needed
$xmlData = [xml]$xmlContent
 
# Display the XML data
$xmlData.register.record    # 379 записей на сегодня, некоторые конторы зарегали по нескольку сервисов
 
 
$xmlData.register.record.services.service  
 
PS C:\Users\Lenovo>  $xmlData.register.record.services.service | measure
 
Count             : 487
Average           :
Sum               :
Maximum           :
Minimum           :
StandardDeviation :
Property          :

 
 
Достаём данные:
 

Код:

PS>  ($xmlData.register.record)[3]
 
entryNum                : 4-PP
entryDate               : 2014-09-04
distributorName         : Общество с ограниченной ответственностью "В Контакте"
distributorOGRN         : 1079847035179
distributorINN          : 7842349892
distributorLegalAddress : Российская Федерация, 191024, Санкт-Петербург, Херсонская ул., д. 12-14, литер А, пом. 1-Н
distributorEmail        : korneev@vk.com
distributorPersons      : Корнеев Иван
services                : services
 
PS>  ($xmlData.register.record).Where({$_.entryNum -eq "2-PP"}).services.service
 
domain                  description              email                  accessLimited
------                  -----------              -----                  -------------
www.mail.rambler.ru     Сервис электронной почты rknadzor@rambler-co.ru false
www.comments.rambler.ru Сервис комментирования   rknadzor@rambler-co.ru false

 
Удовлетворяем любопытство:
 

Код:

PS>  $xmlData.register.record.services.service.accesslimited | group
 
Count Name                      Group
----- ----                      -----
  486 false                     {false, false, false, false…}
    1 true                      {true}
 
PS>  $xmlData.register.record.services.service.where({$_.accessLimited -eq "true"})
 
domain   description                 email          accessLimited
------   -----------                 -----          -------------
wolsk.ru Сетевое издание «Вольск.ру» wolsk@inbox.ru true

 
и т.д..
 
Все безоблачно в кроссплатформенном 7.*  
В виндовом 5.1 глюкодром с кодировками кириллицы. Мне лень разбираться и чинить.

Всего записей: 18174 | Зарегистр. 14-10-2001 | Отправлено: 05:42 21-12-2024 | Исправлено: LevT, 05:59 21-12-2024
Открыть новую тему     Написать ответ в эту тему

Страницы: 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 228 229 230 231 232 233 234 235 236 237 238 239

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


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

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

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru