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

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

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



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

Цитата:
Видимо "$([char]0xE0B1)" не любой…

Ну, там ведь символ должен быть, а не его код... но да, скорее всего, не любой.
 

Цитата:
как использовать, надо же событие отловить, при незаконченном вводе, ошибке в ввода…

Не знаю... надо уже либо инструкции искать, либо экспериментировать...
Но, примерно, как-то так:

Код:
$esc = [char]27
"$esc[91m"
"$esc[91mцветной$esc[0mобычный"

- проверять надо вводом непосредственно в консоль и лучше построчно, нагляднее будет...

Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 21:20 28-12-2019 | Исправлено: YuS_2, 21:26 28-12-2019
iNNOKENTIY21



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

Цитата:
Но, примерно, как-то так:

Перекрасить то ладно, важно когда перекрашивать

Всего записей: 3521 | Зарегистр. 16-08-2012 | Отправлено: 22:09 28-12-2019
YuS_2



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

Цитата:
важно когда перекрашивать

Наверное, смотреть надо в сторону Set-PSReadlineKeyHandler и с помощью него ловить, что-либо...  
и заодно посмотреть методы:

Код:
[Microsoft.PowerShell.PSConsoleReadLine]|gm -s

В общем, копать надо тему, чтобы понять как оно работает... если, конечно, есть желание и время на изучение.
Но, имхо, стоит ли овчинка выделки?
 
ЗЫ
В каталоге модуля есть пример SamplePSReadlineProfile.ps1, может быть там, что-то есть...

Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 07:35 29-12-2019 | Исправлено: YuS_2, 07:37 29-12-2019
iNNOKENTIY21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Дело в одной строчке. Есть опция.
PSReadLine/Set-PSReadLineOption.md at master · PowerShell/PSReadLine · GitHub

Код:
Set-PSReadLineOption -PromptText "$([char]0xE0B1) "

Там в справке, через запятую указывается, на что менять, но у меня принимает только одну строку.
То ли устарела немного справка, то ли модуль у меня
Все уже придумано, успевай доки читать, лучше по утрам.

Всего записей: 3521 | Зарегистр. 16-08-2012 | Отправлено: 08:33 29-12-2019 | Исправлено: iNNOKENTIY21, 08:41 29-12-2019
YuS_2



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

Цитата:
То ли устарела немного справка, то ли модуль у меня

то ли pwsh

 
а справка, которая выкачивается по update-help, у них явно не поспевает за релиз-кандидатами:

Цитата:
-PromptText <String>
        When there is a parse error, PSReadLine changes a part of the prompt red. PSReadLine analyzes your prompt function to determine how it can change just the color of part of your prompt, but this analysis cannot be 100% reliable.

должно быть, как минимум:
<String[]>

Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 12:16 29-12-2019 | Исправлено: YuS_2, 12:32 29-12-2019
iNNOKENTIY21



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

Цитата:
то ли pwsh  

Вот ведь. В 7 не проверял
 


Мудрёно как то и сотые минуты…
Код:
function Get-LastExecutionTime {
    $Diff = $Script:LastHistory.EndExecutionTime -
            $Script:LastHistory.StartExecutionTime
 
    if ($Diff.TotalMilliseconds -lt 1000) {
        "{0:000.00} ms" -f [math]::Round($Diff.TotalMilliseconds, 2)
    } elseif ($Diff.TotalMilliseconds -lt 60000) {
        "{0:00.00} s" -f [math]::Round($Diff.TotalMilliseconds / 1000, 2)
    } elseif ($Diff.TotalMilliseconds -lt 3600000) {
        "{0:00.00} m" -f [math]::Round($Diff.TotalMilliseconds / 60000, 2)
    } elseif ($Diff.TotalMilliseconds -ge 3600000) {
        "{0:00.00} h" -f [math]::Round($Diff.TotalMilliseconds / 3600000, 2)
    }
}

Как бы лучшее формат сделать?

Всего записей: 3521 | Зарегистр. 16-08-2012 | Отправлено: 16:35 29-12-2019
YuS_2



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

Цитата:
Мудрёно как то и сотые минуты…

а чойта ваще?
что должно выдавать?

Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 19:33 29-12-2019
iNNOKENTIY21



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

Цитата:
а чойта ваще?
что должно выдавать?

Время исполнения последней команды.
Вкратце: (Get-History -Count 1).EndExecutionTime - (Get-History -Count 1).StartExecutionTime, а та функция и вывод форматирует.
А через переменную, скриптовую: $Script:LastHistory, дабы пустые не обрабатывать в prompt… может еще, чего, забыл уже
 
т.е. $Diff = $Script:LastHistory.EndExecutionTime - $Script:LastHistory.StartExecutionTime вычисляет время [System.TimeSpan], а что ниже форматирует. Вот как  форматирует, мне и не нравится

Всего записей: 3521 | Зарегистр. 16-08-2012 | Отправлено: 20:50 29-12-2019
bifido 76



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Маленькая ремарка в продолжение темы. Благодаря дискуссии, как раз и обратил внимание, что в 32 битных файловых менеджерах на 64 битных системах, контекстное меню не функционирует. Обновил набор, и теперь он не только нормально устанавливается в таких условиях, но и самое главное, позволяет использовать его функционал (в том числе и такие пункты как работа с cab файлами обновлений системы, и пункты запуска от имени TrustedInstaller).

Всего записей: 2474 | Зарегистр. 08-04-2016 | Отправлено: 01:39 30-12-2019
farag



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

Код:
 
# Что запускается автоматически
Get-EventLog -LogName System -InstanceId 1073748869 | ForEach-Object {
    [PSCustomObject]@{
        Date = $_.TimeGenerated
        Name = $_.ReplacementStrings[0]
        Path = $_.ReplacementStrings[1]
        StartMode = $_.ReplacementStrings[3]
        User = $_.ReplacementStrings[4]
    }
}
 

Всего записей: 2477 | Зарегистр. 27-07-2009 | Отправлено: 08:40 30-12-2019
YuS_2



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

Цитата:
Вот как  форматирует, мне и не нравится

А, надо просто форматировать время...
Тогда, можно, наверное, без деления обойтись и округление убрать:

Код:
    if ($Diff.TotalMilliseconds -lt 1000) {
        "{0:000.00} ms" -f $Diff.TotalMilliseconds
    } elseif ($Diff.TotalMilliseconds -lt 60000) {
        "{0:00.00} s" -f $Diff.TotalSeconds
    } elseif ($Diff.TotalMilliseconds -lt 3600000) {
        "{0:00.00} m" -f $Diff.TotalMinutes
    } elseif ($Diff.TotalMilliseconds -ge 3600000) {
        "{0:00.00} h" -f $Diff.TotalHours
    }
 

выдумывать, что-то более другое... не знаю, надо сначала определиться с тем, что хочется видеть в итоге.
 
ЗЫ
А ежели смущает:

Цитата:
...и сотые минуты…

всегда ведь можно в строку вытянуть:

Код:
$diff.tostring()

Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 10:59 30-12-2019 | Исправлено: YuS_2, 11:47 30-12-2019
iNNOKENTIY21



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

Код:
(Get-AutoStartedFromEventLog | Group Name | Where Count -gt 1).Group | ft Date, Name, StartMode, User

 
YuS_2
Расчитывал на чего то простое и красивое, до чего в жизни бы не додумался

Код:
([datetime]::Parse("30 декабря 2019 г. 21:26:02") - [datetime]::Parse("30 декабря 2019 г. 21:20:00")).Tostring()

не информативен, надо бы обозначение единиц измерения.

Всего записей: 3521 | Зарегистр. 16-08-2012 | Отправлено: 20:45 30-12-2019 | Исправлено: iNNOKENTIY21, 20:51 30-12-2019
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
iNNOKENTIY21
farag
 
У меня тут крайне странный коротенький комплект из:
 
- пары Minitool PW драйверов
- WUDFRd.sys
- трёх дефендер апдейтов с генно-модифицированными именами
- Bonjovi DPS  
- Docker Desktop Service
 
# Подробнее...
 
autoruns показывает много больше всякого
 

Всего записей: 17163 | Зарегистр. 14-10-2001 | Отправлено: 21:20 30-12-2019 | Исправлено: LevT, 21:21 30-12-2019
iNNOKENTIY21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
LevT
И что за дата, чего то там генерации, с сентября, у вас там, чего то  

Всего записей: 3521 | Зарегистр. 16-08-2012 | Отправлено: 21:30 30-12-2019
YuS_2



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

Цитата:
не информативен, надо бы обозначение единиц измерения.

ну, как бы, у timespan есть как стандартный формат, так и пользовательский... можно представить его как нравится, в том числе и с единицами измерения. Но, как и говорил выше:

Цитата:
надо сначала определиться с тем, что хочется видеть в итоге.


Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 21:59 30-12-2019
iNNOKENTIY21



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

Код:
$Diff = [TimeSpan]::new(6, 14, 32, 17, 685)
$Diff.ToString("d' дн. 'hh' ч. 'mm' мин. 'ss' сек. 'fffffff' мс'")

как привести мс (Milliseconds ) к виду: {0:000.00}
 
Добавлено:

Код:
$Diff = [TimeSpan]::new(0, 0, 0, 0, 685)
$Diff.ToString("d' дн. 'hh' ч. 'mm' мин. 'ss' сек. 'fffffff' мс'")

вывод:
0 дн. 00 ч. 00 мин. 00 сек. 6850000 мс
нули вот нафиг, не надо бы, возращаемся к ifelse ?

Всего записей: 3521 | Зарегистр. 16-08-2012 | Отправлено: 22:57 30-12-2019
PhoenixUA



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
iNNOKENTIY21
https://stackoverflow.com/questions/5398241/remove-leading-zeros-from-time-to-show-elapsed-time

Цитата:
(new TimeSpan(0, 0, 30, 21, 3))
  .ToString(@"d\d\ hh\hmm\mss\s")
  .TrimStart(' ','d','h','m','s','0');

Всего записей: 2184 | Зарегистр. 17-11-2005 | Отправлено: 01:40 31-12-2019
iNNOKENTIY21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
PhoenixUA
Trim вариант, но (char) и с .ToString("d' дн. 'hh' ч. 'mm' мин. 'ss' сек. 'fffffff' мс'") не катит и вопрос с миллисекундами остаётся.
 
Сформировалась хотелка: 1 дн. 01 ч. 01 мин. 01 сек. 999.099 мс
Нулевые значения не показывать, кроме миллисекунд
Видимо без логики никак…
 
 
Добавлено:
С наступающим!
Merry Christmas and Happy New Year! – Stefan Stranger's Weblog – Manage your IT Infrastructure
Тамошний код копипастится в консоль PowerShell

Всего записей: 3521 | Зарегистр. 16-08-2012 | Отправлено: 09:44 31-12-2019 | Исправлено: iNNOKENTIY21, 09:58 31-12-2019
farag



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

Цитата:
Полезняшки я люблю.  

До больницы себе выписал. Я уже не помню, где я наше и зачем мне это надо было.

Всего записей: 2477 | Зарегистр. 27-07-2009 | Отправлено: 15:52 31-12-2019
PhoenixUA



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

Код:
 
$t = [timespan]::new(0,2,0,0,365)
"{0:### дн;;#}{1:## ч;;#}" -f $t.Days, $t.Hours
# 2 ч
 

 
Добавлено:
C Наступающим всех!

Всего записей: 2184 | Зарегистр. 17-11-2005 | Отправлено: 18:43 31-12-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


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

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

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru