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

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



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

Цитата:
на предоставленном в студию примере работает

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

Цитата:
Любая задача подстраивается под универсальную методологию

Так что же Вы ее не подстроили, не смогли?
Может быть Вы быстренько поправите свое решение с учетом того, что это php и выложите его?
Тогда можно будет сравнить его с решением YuS_2, и уже дальше рассуждать, какое решение лучше.
 
 

Всего записей: 5365 | Зарегистр. 08-02-2006 | Отправлено: 16:06 01-10-2018 | Исправлено: NIKZZZZ, 16:16 01-10-2018
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
NIKZZZZ
 
Я не занимаюсь самоудовлетворением, "решая задачи" (да ещё с какими-то искусственными условиями, да ещё "на слабо"..)
И вовсе даже ни с кем не соревнуюсь.
 
Я "даю удочку", желающим того.
Точнее, помогаю выбрать подходящие приёмы использования готовой "удочки" повершел, доступной каждому на модерновой винде.

Всего записей: 17164 | Зарегистр. 14-10-2001 | Отправлено: 16:21 01-10-2018 | Исправлено: LevT, 16:47 01-10-2018
Smitis



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

Цитата:
так работает повершел!  
Любая задача подстраивается под универсальную методологию:

Эта методология называется "метод тыка". Может сработает, а может и нет. Никому не нужная методология.

Цитата:
Я "даю удочку", желающим того.  

Благодетель
Кому нужны не работающие "удочки" (а других у Вас я не видел)?
К тому же в оригинале там голодного ещё рыбу ловить учили (тоже весело - человек жрать хочет, а ему не дают, зато какую-то философскую фигню втирают).
Ваш метод - бросить сломанную никому не нужную удочку и поставить себе галочку "совершил доброе дело".
Перехвалил я Вас сегодня.


----------
Разум когда-нибудь победит

Всего записей: 3216 | Зарегистр. 09-02-2003 | Отправлено: 17:15 01-10-2018
NIKZZZZ



Gold Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
LevT
Ответил здесь.

Всего записей: 5365 | Зарегистр. 08-02-2006 | Отправлено: 17:15 01-10-2018 | Исправлено: NIKZZZZ, 17:18 01-10-2018
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Smitis
NIKZZZZ
 
Вот это вполне удочка для желающих самостоятельно воспользоваться головой.
Не для вас... ну так тему не вы одни читаете.

Всего записей: 17164 | Зарегистр. 14-10-2001 | Отправлено: 17:58 01-10-2018
Smitis



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


----------
Разум когда-нибудь победит





Сутки

Всего записей: 3216 | Зарегистр. 09-02-2003 | Отправлено: 20:15 01-10-2018 | Исправлено: KLASS, 00:26 02-10-2018
LevT



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Smitis
 
Да, именно так: мастер-класс состоит в умении тыкать палочкой в PS движок и интерпретировать его выдачу.
С этим я готов помогать.
Желающим, не флудерам.
 





Сутки

Всего записей: 17164 | Зарегистр. 14-10-2001 | Отправлено: 00:04 02-10-2018 | Исправлено: KLASS, 00:26 02-10-2018
NIKZZZZ



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

Цитата:
мастер-класс состоит в умении тыкать палочкой в PS движок

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





Сутки

Всего записей: 5365 | Зарегистр. 08-02-2006 | Отправлено: 00:16 02-10-2018 | Исправлено: KLASS, 00:27 02-10-2018
Unitaz



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Товарищи как из консоли читать SMART SSD информацию , а ещё лучше её мониторить и сообщать о появившихся проблемах или хотя бы складивать данные в файл что потом можно было динамику параметров SMART посмотреть

Всего записей: 2290 | Зарегистр. 28-06-2002 | Отправлено: 15:35 02-10-2018
danetz

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Unitaz
wmic diskdrive get status
Но не рекомендую - метод нагло врет
CrystalDiskInfo - из free самое лучшее решение

Всего записей: 400 | Зарегистр. 25-02-2012 | Отправлено: 16:28 02-10-2018
Taran2ul



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

Цитата:
задавший вопрос потерял интерес к самой задаче

Нет. Простите, были причины.
Ваш скрипт ругается

Код:
Get-ChildItem : Не удается найти параметр, соответствующий имени параметра "file".
C:\1.ps1:23 знак:28
+ dir $fld\* -filt $flt -file <<<< |%{$arr=@()}{
    + CategoryInfo          : InvalidArgument: ( [Get-ChildItem], ParameterBindingException
    + FullyQualifiedErrorId : NamedParameterNotFound,Microsoft.PowerShell.Commands.GetChildItemCommand
 
Export-Csv : Не удается найти параметр, соответствующий имени параметра "app".
C:\1.ps1:52 знак:27
+ $arr |export-csv $out -app <<<<  -force -not -enc utf8
    + CategoryInfo          : InvalidArgument: ( [Export-Csv], ParameterBindingException
    + FullyQualifiedErrorId : NamedParameterNotFound,Microsoft.PowerShell.Commands.ExportCsvCommand

 
LevT
Извините. По причине моего скудоумия, я вообще не понял, как воспользоваться вашим решением. Скопировать в буфер обмена содержимое всех 900 php и потом это вставить в $input консоли PS?

Всего записей: 458 | Зарегистр. 18-02-2008 | Отправлено: 16:36 02-10-2018
Unitaz



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Огромное спасибо за  CrystalDiskInfo как раз то что надо , готовое решение для автомониторинга HDD

Всего записей: 2290 | Зарегистр. 28-06-2002 | Отправлено: 16:48 02-10-2018
YuS_2



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

Цитата:
Ваш скрипт ругается

То не скрипт ругается, а powershell хочет, чтобы его обновили
если ОС не XP, то рекомендую это сразу сделать... переписывать скрипт под PS v 2.0, в принципе, возможно, но позже. Сейчас времени на тест не выберу, только завтра...
 
Добавлено:
Хотя, можете самостоятельно протестировать... если проблема только именно в этом:
заменить эту часть:

Код:
dir $fld\* -filt $flt -file|

на такую:

Код:
dir $fld\* -filt $flt|?{!$_.psiscontainer}|

а в этой строке:

Код:
$arr |export-csv $out -app -force -not -enc utf8

параметр -app, можно безболезненно удалить...  
 

Цитата:
Скопировать в буфер обмена содержимое всех 900 php и потом это вставить в $input консоли PS?


Нет, это у LevT, просто такой способ обучения powershell, он дает только наживку, а "удочку", "крючок" и "леску", Вам придется делать самому...

Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 18:30 02-10-2018 | Исправлено: YuS_2, 18:46 02-10-2018
LevT



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

Цитата:
 я вообще не понял, как воспользоваться вашим решением. Скопировать в буфер обмена содержимое всех 900 php и потом это вставить в $input консоли PS?

 
Если повершел старый, то на моё решение забить и слушаться YuS_2  
Иначе:
 
1) Шаблон исправить на реальный, основанный на паре верхних записей.
Т.е. убрать многоточия а может и всякую фигню, короче помочь машине а не мешать ей
 
2) вместо $input | ConvertFrom-String... написать  
Get-Content -Path 'C:\mypath\index_u0.php' | ConvertFrom-String ...
 
В случае непоняток результат в студию, иначе:
 
3) написать  
Get-Content 'C:\mypath\index_u*.php' | ConvertFrom-String ...
 
Непонятки в студию

Всего записей: 17164 | Зарегистр. 14-10-2001 | Отправлено: 10:17 03-10-2018 | Исправлено: LevT, 13:05 03-10-2018
sundraw

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

Всего записей: 844 | Зарегистр. 15-05-2011 | Отправлено: 11:25 03-10-2018 | Исправлено: sundraw, 11:29 03-10-2018
Taran2ul



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
YuS_2
Обновил. Все заработало. А можно еще добавить в поле Notes идентефикатор из имени файла, например u0 для файла index_u0.php

Всего записей: 458 | Зарегистр. 18-02-2008 | Отправлено: 15:15 03-10-2018
YuS_2



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

Цитата:
А можно еще добавить в поле Notes идентефикатор из имени файла, например u0 для файла index_u0.php

легко...
чтобы не расписывать где и что менять:

Код:
function init-obj {
    $script:obj = [pscustomobject]@{
    'Name'=$null;'Given Name'=$null;'Additional Name'=$null;'Family Name'=$null;'Yomi Name'=$null
    'Given Name Yomi'=$null;'Additional Name Yomi'=$null;'Family Name Yomi'=$null;'Name Prefix'=$null
    'Name Suffix'=$null;'Initials'=$null;'Nickname'=$null;'Short Name'=$null;'Maiden Name'=$null
    'Birthday'=$null;'Gender'=$null;'Location'=$null;'Billing Information'=$null;'Directory Server'=$null
    'Mileage'=$null;'Occupation'=$null;'Hobby'=$null;'Sensitivity'=$null;'Priority'=$null
    'Subject'=$null;'Notes'=$null;'Language'=$null;'Photo'=$null;'Group Membership'=$null
    'Phone 1 - Type'=$null;'Phone 1 - Value'=$null;'Organization 1 - Type'=$null;'Organization 1 - Name'=$null
    'Organization 1 - Yomi Name'=$null;'Organization 1 - Title'=$null;'Organization 1 - Department'=$null
    'Organization 1 - Symbol'=$null;'Organization 1 - Location'=$null;'Organization 1 - Job Description'=$null
    }
}
function init-tmp {
    $script:tmp = new-object 'system.object[]' 3
}
$fld = 'test'
$flt = '*.php'
$out = 'test.csv'
 
if (test-path $out){del $out}
 
dir $fld\* -filt $flt -file|%{$arr=@()}{
    $ftmp = $_
    gc $_.fullname -enc utf8|%{$flg1,$flg2=$false,$false;init-tmp;init-obj}{
        if ($_ -match '<div class=\"username\"><h4>\s*(.*?)\s*<span class=\"position\">[^<]*</span></h4></div>'){
            $tmp[0] = $matches[1] # [0] Nickname
        }
        if ($tmp[0]){
            if ($_ -match '<dt>\s*Имя:\s*</dt>'){$flg1 = $true}
            if ($_ -match '<dt>\s*Телефон:\s*</dt>'){$flg2 = $true}
            if ($_ -match '<dd><a\s*href=\"[^\"]*\"\s*title=\"[^\"]*\">\s*(.*?)\s*</a></dd>'){
                $obj.Nickname = $tmp[0];$obj.Name = $tmp[1];$obj.'Given Name' = $tmp[1]
                $obj.'Phone 1 - Value' = $tmp[2]
                $obj.Notes = [string]$matches[1] + ' - ' + $($ftmp.basename -replace '.*index_(.*)','$1') # [3] Notes
                $arr += $obj;init-obj;init-tmp
            }
        }
        if ($flg1){
            if ($_ -match '<dd>(.*?)</dd>'){
                $tmp[1] = $matches[1] # [1] Name, Given Name
                $flg1 = $false
            }
        }
        if ($flg2){
            if ($_ -match '<dd>(.*?)</dd>'){
                $tmp[2] = $matches[1] # [2] Phone 1 - Value
                $flg2 = $false
            }
        }
    }
}
 
$arr |export-csv $out -app -force -not -enc utf8

Всего записей: 3218 | Зарегистр. 03-02-2009 | Отправлено: 17:24 03-10-2018 | Исправлено: YuS_2, 17:26 03-10-2018
RomkafrVlad



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
парни, подскажите как решить задачу (сам не программист).
требуется -  
а) дать на вход папку, где лежат файлы, или папки (числом от 10 до 1000 ед).  
б) поставить задание на раздельную архивацию (каждый файл или папка в отдельный архив), где имя архива автоматически равно имя файла или имя папки  
в) в процессе архивации дать каждому архиву свой уникальный пароль (любой, от какого-то кол-ва символов)  
г) выдать отчет в виде списка: полученные имена архивов - их пароли  
 
в сущности, мне нужен простой батник, вроде такого, только чтобы он еще пароль создавал, и отчет -  
set _in=с:in  
set _out=с:out  
set _arcpath=c:Program Files7-zip  
for %%i in (%_in%*.*) do "%_arcpath%7z" a "%_out%%%~ni.7z" "%%i"

Всего записей: 78 | Зарегистр. 01-05-2006 | Отправлено: 23:37 03-10-2018
Taran2ul



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

Всего записей: 458 | Зарегистр. 18-02-2008 | Отправлено: 09:44 04-10-2018
Baltazar500



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Хм, а как запихнуть математические действия через set /a с полученными token'ами первой итерации двойного for, дабы использовать результат во второй итерации ?
 
Консоли запихивание set внутрь for зело не нравится
 
Прямого примера где это нужно задействовать под рукой сейчас нет, так что могу описать только принцип задуманного. С мат.операциями за for и кодом в несколько дополнительных строк всё работает, но хочется оптимизировать это дело и написать обработку данных в одну строку.

Всего записей: 2101 | Зарегистр. 19-09-2011 | Отправлено: 20:17 07-10-2018 | Исправлено: Baltazar500, 20:27 07-10-2018
Открыть новую тему     Написать ответ в эту тему

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