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

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

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

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

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

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
гугл ничего похожего не показывает.
нету что ли непрерывной команды для трассировки узлов?
так как tracert ya.ru показывает лишь 30 прыжков.
а мне нужна непрерывность.

Всего записей: 1108 | Зарегистр. 27-02-2015 | Отправлено: 10:58 26-03-2022 | Исправлено: yuriko1158, 11:00 26-03-2022
fscpsd



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

Цитата:
нету что ли непрерывной команды для трассировки узлов?
так как tracert ya.ru показывает лишь 30 прыжков

Поглядите на:

Код:
pathping [-h maximum_hops]

— там можно кол-во прыжков задать, возможно даже бесконечное.
 
Добавлено:
yuriko1158

Цитата:
необходимо сделать трассировку в консоли и при этом оно должно быть циклическим.
нельзя чтоб он завершался.
по аналогии WinMRT.  

Ну так в цикл же его:  

Код:
for /l %l in () do (ping -n 1 ya.ru)

— будет бесконечный пинг одним пакетом.

Всего записей: 1944 | Зарегистр. 16-09-2010 | Отправлено: 11:51 26-03-2022 | Исправлено: fscpsd, 11:55 26-03-2022
yuriko1158

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

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

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

Цитата:
— будет бесконечный пинг одним пакетом.

это не совсем понятно пока ...

Всего записей: 1108 | Зарегистр. 27-02-2015 | Отправлено: 12:28 26-03-2022 | Исправлено: yuriko1158, 12:34 26-03-2022
gntix



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

Цитата:
так как tracert ya.ru показывает лишь 30 прыжков.

tracert -h 255 example.com – тогда отвалится не через 30 хопов (по умолчанию), а через 255.

Цитата:
а мне нужна непрерывность

За попытку организации ICMP-флуда в приличном обществе морды бьют.

Всего записей: 719 | Зарегистр. 07-12-2004 | Отправлено: 03:03 27-03-2022
yuriko1158

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

Цитата:
За попытку организации ICMP-флуда в приличном обществе морды бьют.

я вежливо собираюсь флудить.поэтому ищу способ ...

Всего записей: 1108 | Зарегистр. 27-02-2015 | Отправлено: 09:39 27-03-2022
msmih



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Доброго времени суток!
Как из командной строки запустить параллельно два скрипта python?
 
------
python script1.py
python script2.py
 
получается последовательное исполнение.
 
------
start python script1.py
start python script2.py
 
вместо запуска скриптов открывает среду разработки (idle)
 
Может кто-то сталкивался и есть решение проблемы?

Всего записей: 1195 | Зарегистр. 29-01-2006 | Отправлено: 17:31 10-04-2022
BorlandIMHO

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

Цитата:
start python script1.py
start python script2.py
 
вместо запуска скриптов открывает среду разработки (idle)

Не пробовали справку по start почитать?...

Код:
start "" python script1.py
start "" python script2.py
 



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

Всего записей: 2638 | Зарегистр. 12-10-2006 | Отправлено: 19:57 10-04-2022
newhk



BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Приветствую!
Вопрос такой.
Есть необходимость прочитать изатем записать данные в тот же файл.
В данном примере, при сохранении файл спрашивает что делать (Сохранить, Не сохранять и Отмена)
 

Код:
 
$file = «C:\Users\user1\Downloads\Книга1.xlsx»
$ExcelObj = New-Object -comobject Excel.Application
$ExcelObj.visible=$true
$WorkBook = $ExcelObj.Workbooks.Open($file)
$AddressBook = $WorkBook.Worksheets.Item(2)

тут некий код

$AddressBook.Rows.Item(1).Font.Bold = $true
$UsedRange = $AddressBook.UsedRange
$UsedRange.EntireColumn.AutoFit() | Out-Null
 
$AddressBook.SaveAs($file) # как мне здесь сохранять без запроса?
$ExcelObj.Quit()
 

 
Как мне сохранить файл без запроса?
 
Добавлено:
Нашел решение )
 
Надо добавить  
$ExcelObj.DisplayAlerts=$False
 
и добавть  таймаут, иначе эксель не успевает понять что его сохранили...
$AddressBook.SaveAs($file)
sleep 2
$ExcelObj.Quit()

Всего записей: 400 | Зарегистр. 02-02-2009 | Отправлено: 13:16 21-04-2022 | Исправлено: newhk, 14:21 21-04-2022
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
newhk
 
http://forum.ru-board.com/topic.cgi?forum=33&topic=10903&start=4200#lt

Всего записей: 17727 | Зарегистр. 14-10-2001 | Отправлено: 16:00 21-04-2022
kubrix

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
При использовании графического планшента иногда приходиться перезапускать службу "Служба ввода планшетного ПК"  C:\Windows\System32\svchost.exe -k LocalSystemNetworkRestricted
Можно ли написать bat файл для быстрого перезапуска?

Всего записей: 86 | Зарегистр. 11-06-2019 | Отправлено: 15:37 29-05-2022
GCRaistlin



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

Код:
 
sc.exe stop "<service_name>"
>nul ping.exe -n 5 127.0.0.1
sc.exe start "<service_name>"
 

<service_name> смотреть в свойствах службы.

----------
Magically yours
Raistlin

Всего записей: 4132 | Зарегистр. 18-04-2005 | Отправлено: 15:44 29-05-2022
newhk



BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Приветствую!  
В конторе есть крипты, написанные на VB6, я их хочу переделать на PowerShell
На текущий момент, занимают написанием скрипта, который проверяет бэкапы филиалов.
Структура сети такова, что единственный способ получить информацию, это запись данных на ФТП. Между доменами не настроено доверия.
Сервер филиала выполняет бэкап и после выполнения пишет отчет в файл, который находиться в головном офисе.
Т.е. информация для проверки берется из текстового файла на сетевой шаре.
Филиалов много, есть 4 вида бэкапа.
 
Формат файла: <Тип>_<Дата>_<Регион>.txt
 
Внутри в файл идет запись в формате: <Дата> <Время>    <ХЗ что такое, похоже на Хеш> <Имя файла(Тип_Дата_Время.7z)>
 
Я своял такое чудо:
 
Подробнее...
 
Проблема в том, что некоторые файлы пустые и мой скрипт ловит здесь глюк.
Конкретно, дата бэкапа 03.06.2022, а скрипт считает, что 06.06.2022
 
Еще старые даты, например 01.06.2021, не красит в красный цвет, почему-то красит в зеленый.
 
Помогите плиз решить проблему.
Чтобы было проще понять о чем я, прикладываю HTML-код файла отчета...
 
Подробнее...
 
Если нужна дополнительная информация, спрашивайте.
Для примера, могу скинуть скрипт на VB6, хотя я его не использовал при написании своего. Да и плаваю в VB6.

Всего записей: 400 | Зарегистр. 02-02-2009 | Отправлено: 17:02 07-06-2022 | Исправлено: newhk, 14:39 08-06-2022
newhk



BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Дошло, почему так происходит ))
 
Я сравнивал строки и отсюда неправильная окраска.
Перевернул строки, чтобы начинались с года и все стало сравниваться нормально.
 
Добавлено:
У меня другая проблема, я с ней не разберусь самостоятельно, скорее всего.
 
Есть 2 варианта заполнения:
1 - С раскраской
2 - Без раскраски
 
В 1 варианте, почему-то происходит сдвиг в некоторых ячейках, не могу понять почему.  
Во 2 варианте все данные в целости.
 
Разница между ними в нескольких строчках кода.
1 вариант

Код:
 
foreach ($key in $heshData.Values){
    Add-Content $backupReport "<tr>"
    foreach ($v in $key){
        if ($v -match '[a-zA-Z]'){
            Add-Content $backupReport "<td width='15%' bgcolor='Lavender' align='center'><font color='Black' size='3'>$v</font></td>"
        }
        else
        {
            $v_string = $v.Substring(6,4) + $v.Substring(2,4) + $v.Substring(0,2)
            if ($v_string -le $dateCritical){
                Add-Content $backupReport "<td width='15%' bgcolor='Red' align='center'><font color='White' size='3'>$v</font></td>"
            }
            elseif ($v_string -ge $dateActual){
                Add-Content $backupReport "<td width='15%' bgcolor='Lime' align='center'><font color='Black' size='3'>$v</font></td>"
            }
            elseif ($v_string -le $dateAttens){
                Add-Content $backupReport "<td width='15%' bgcolor='Yellow' align='center'><font color='Black' size='3'>$v</font></td>"
            }
        }
    }
    Add-Content $backupReport "</tr>"
}
 

 
2 вариант

Код:
 
foreach ($key in $heshData.Values){
    Add-Content $backupReport "<tr>"
    $s1 = $key[0]
    $s2 = $key[1]
    $s3 = $key[2]
    $s4 = $key[3]
    $s5 = $key[4]
    Add-Content $backupReport "<td width='15%' align='center'>$s1</td>"
    Add-Content $backupReport "<td width='15%' align='center'>$s2</td>"
    Add-Content $backupReport "<td width='15%' align='center'>$s3</td>"
    Add-Content $backupReport "<td width='15%' align='center'>$s4</td>"
    Add-Content $backupReport "<td width='15%' align='center'>$s5</td>"
    Add-Content $backupReport "</tr>"
}
 

 
Помогите, пожалуйста, разобраться

Всего записей: 400 | Зарегистр. 02-02-2009 | Отправлено: 15:49 08-06-2022 | Исправлено: newhk, 16:28 08-06-2022
iNNOKENTIY21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Оттуда Поиск программ
Alatena
если есть powershell и можете его запустить…

Код:
 

$StartDate = "06.06.2022" # дата начала
$DaysContinue = 365 # дней продолжать
$Period = 7 # дней выводить дату каждые
$DateFormat = "ddd.dd.MM.yy" # формат отображения даты
 
# магия
$result = for ($i = 0; $i -lt $DaysContinue; $i += $Period) {
    (get-date -Date $StartDate).AddDays($i).ToString($DateFormat)
}
 
$result.Count # подсчёт записей
# или
$result # на эту консоль результат
# или
$result | Set-Clipboard # в буфер обмена результат
# или
$result > dates_mondey_22-23.txt # в файл "dates_mondey_22-23.txt" результат

 

результат

Всего записей: 3640 | Зарегистр. 16-08-2012 | Отправлено: 07:36 09-06-2022
newhk



BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Окончательный вариант такой
 
Подробнее...
 
Но, при использовании условных конструкций, для раскрашивания ячеек таблицы, не важно, в цикле или через функцию, теряется часть данных, не могу понять почему.
 
Например, если просто выводить данные, то в первой же строчке (TRSROSTOV) порядок такой:
 
________________________________________
|                  |          |         |          |         |
| TRSROSTOV | Empty | Дата | Empty | Дата |
|___________|_______|_____|______|______|
 
А, если с условной конструкцией, то такой:
 
_______________________________________
|                  |          |          |         |         |
| TRSROSTOV | Empty | Empty | Дата |         |
|___________|_______|______|______|_____|
 
Не могу понять почему...
 
Добавлено:
В общем, нашел причину пропажи данных.
Данные пропадали, когда я использовал сортировку  

Код:
Sort-Object -Property LastWriteTime -Descending

 
Если отсортировать по имени, то данные на месте, но тогда ломается логика сравнения дат...
Блин, все "не слава богу"

Всего записей: 400 | Зарегистр. 02-02-2009 | Отправлено: 09:27 09-06-2022 | Исправлено: newhk, 10:14 09-06-2022
newhk



BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Все, домучил
 
Немного некорректное условие было, но непонятно, почему пропадали значения.

Всего записей: 400 | Зарегистр. 02-02-2009 | Отправлено: 12:01 09-06-2022 | Исправлено: newhk, 12:02 09-06-2022
Linksach



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
как с  этого сайта скачать названия файлов на данной странице в текстовый файл txt в таком виде:
 
Москва - Кассиопея. Отроки во Вселенной (Ричард Викторов) [1974, фантастика, DVDRip]  2.65 гб
Гостья из будущего (Павел Арсенов) [1984, фантастика, приключения, семейный, DVDRip]  3.63 гб
Капитан Немо (Василий Левин) [1975, фантастика, приключения, DVDRip]    2.18 гб и т.д.
 
https://rutracker.org/forum/viewforum.php?f=1666
 
Спасибо!

Всего записей: 113 | Зарегистр. 11-07-2015 | Отправлено: 07:24 18-06-2022 | Исправлено: Linksach, 08:18 19-06-2022
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Есть тут знатоки батников?  
Помогите отреверсить билд скрипт uup-dump, считаю необходимым эту нечитаемую хтонь перевести на повершел.
Повершел часть возьму на себя.
 
https://uupdump.net/
 
Подробнее...
 
Добавлено:
 
 
Для начала мне нужно самое высокоуровневое описание алгоритма, пошагово человеческим языком.
 
Вижу, что там куча менюшек, пересказывать их не обязательно.
Достаточно такого описания: Меню по метке такой-то, ответ используется вот так:
 

Всего записей: 17727 | Зарегистр. 14-10-2001 | Отправлено: 17:15 19-06-2022 | Исправлено: LevT, 19:30 19-06-2022
newhk



BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Вот это портянка...
 
Добавлено:
Может быть на досуге, как-нить




Флейм. Когда "на досуг" наступит тогда и...

Всего записей: 400 | Зарегистр. 02-02-2009 | Отправлено: 19:13 19-06-2022 | Исправлено: KLASS, 19:15 19-06-2022
Linksach



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
как с  этого сайта скачать названия файлов на данной странице в текстовый файл txt в таком виде:
 
Москва - Кассиопея. Отроки во Вселенной (Ричард Викторов) [1974, фантастика, DVDRip]  2.65 гб
Гостья из будущего (Павел Арсенов) [1984, фантастика, приключения, семейный, DVDRip]  3.63 гб
Капитан Немо (Василий Левин) [1975, фантастика, приключения, DVDRip]    2.18 гб и т.д.
 
Спасибо!
 
 
Никто ничего не сварганил,печально!!!...............





Подъем темы.

Всего записей: 113 | Зарегистр. 11-07-2015 | Отправлено: 12:48 22-06-2022 | Исправлено: KLASS, 13:09 22-06-2022
Открыть новую тему     Написать ответ в эту тему

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

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