Отправляет email-рассылки с помощью сервиса Sendsay

[TC] Предлагаю для ознакомления Скрипты для проводника вин 7

Привет участникамлиста.

Предлагаю несколько скриптов для проводника виндовс 7. Скрипты простые
незамысловатые, но при этом позволяют пользователям избежать большого
колличества манипуляций руками, особенно когда приходится часто прибегать к
таким системным настройкам, как:
создание текстовых документов;
сокрытие и отображение расширения файлов;
сокрытие и отображение скрытых файлов и папок.
Текстовый файл с описанием скриптов и горячих клавиш, прилагается.
Поскольку скрипты привязаны к интерфейсу виндовс 7, то естественно они
не работают в вин 8.1 и в вин10.
Кто желает ознакомиться с данными скриптами, берём их отсюда:

https://yadi.sk/d/UwGKOWWA3GEz9W

Ответить   Wed, 22 Mar 2017 20:44:24 +0500 (#3481134)

 

Ответы:

Всем доброго времени суток! Здравствуйте, air!

Большое спасибо за скрипты! Единственно, из раза в раз возникает
проблема при создании с их помощью текстовых файлов: если данную функцию
вызвать в только что открытой папке, без выделения какого-либо из
файлов, то он создает почему-то файл с расширением .vsd; а если в этот
момент будет выделен какой-либо из файлов, какая-либо папка, то
проводник зависнет, и выйти из этого состояния можно будет только по
ctrl+alt+del / Завершить сеанс. Все же остальные функции скрипта
работают нормально и подобных ошибок не вызывают.

Скажите, пожалуйста, как можно исправить эту ситуацию?

22.03.2017 20:44, "air" пишет:
Предлагаю несколько скриптов для проводника виндовс 7.
... ... ...
создание текстовых документов;

Ответить   Fri, 24 Mar 2017 12:01:50 +0500 (#3481553)

 

Привет рассылка!

Вадим Шмаков сообщил следующее:
из раза в раз возникает
проблема при создании с их помощью текстовых файлов: если данную функцию
вызвать в только что открытой папке, без выделения какого-либо из
файлов, то он создает почему-то файл с расширением .vsd; а если в этот
момент будет выделен какой-либо из файлов, какая-либо папка, то
проводник зависнет, и выйти из этого состояния можно будет только по
ctrl+alt+del / Завершить сеанс.

Это общеизвестная проблема со скриптом "CreateTextDocument" так как она
возникает не только у вас. Здесь нужен индивидуальный подход к каждой
системе, которая обвешана конкретным набором пользовательского софта,
который, в свою очередь, прописывает в альтовом и контекстном меню системы
свои позиции, и от количества этих пунктов зависит корректная работа
упомянутого скрипта. Пишите в личку и будем разбираться с вашим конкретным
случаем, тем более, что уже имеется новая, более усовершенствованная версия
этих скриптов, но она не снимает вашей проблемы, поскольку она требует
индивидуального подхода, за исключением случаев совпадения набора программ у
различных пользователей, что бывает крайне редко.

Ответить   Fri, 24 Mar 2017 12:54:36 +0500 (#3481567)

 

Всем доброго времени суток! Здравствуйте, air!

Хотел написать в Л.С., но возникли дополнительные вопросы, о которых,
думаю, других тоже нужно оповестить...

24.03.2017 12:54, "air" пишет:

как она

системы

Что ж, раз это общеизвестная проблема, то может вы еще можете сказать,
как можно избавиться от ее побочных последствий?
Вообще перестал работать пункт файл альтового меню проводника, когда
курсор стоит на каком-либо из файлов папки. Причем, как с JAWS, так и с
NVDA. У меня такое ощущение, что скрипт что-то повредил в самом
проводнике, и что с этим делать мне пока не совсем понятно.

Заглянул я и в сам скрипт... (очевидно, это нужно было сделать раньше)
Честно говоря, я удивлен его несгибаемой прямолинейностью. В нем нет ни
одного условия проверки корректности выполняемых команд, все делается
совершенно напрямую, без оглядки на получаемые в ходе его выполнения
результаты. Даже циклы в нем не используются! Я, конечно, могу
ошибаться, но он мне кажется опасным. Тем более, что у меня что-то он,
видимо, уже натворил...

Ответить   Fri, 24 Mar 2017 14:17:45 +0500 (#3481579)

 

Привет рассылка!
Здравствуйте Вадим Шмаков.

Не стану цитировать строчки из вашего сообщения, поскольку оно
оченьобширное, за исключением одного, наиболее важного момента.

Вы написали следующее:
Хотел написать в Л.С., но возникли дополнительные вопросы, о которых,
думаю, других тоже нужно оповестить...
У меня такое ощущение, что скрипт что-то повредил в самом
проводнике, и что с этим делать мне пока не совсем понятно.

Ну что ж, Вы всех оповестили об исходящей опасности от выложенных мной
скриптов. Благодарю за своевременный сигнал. Всвязи с чем предлагаю всем кто
скачал данные скрипты , немедленно их удалить, независимо от того работают
они или нет.
Вам же уважаемый Вадим, Советую также удалить данные скрипты и
выполнить откат системы на момент, когда эти скрипты отсутствовали в
системе.
Если ещё у кого-то ещё имеются ко мне вопросы, прошу всех
направлять своюкорреспонденцию на мою личную почту.
Air.

Ответить   Fri, 24 Mar 2017 18:16:09 +0500 (#3481617)

 

Ну что ж, Вы всех оповестили об исходящей опасности от выложенных мной
скриптов. Благодарю за своевременный сигнал. Всвязи с чем предлагаю всем кто
скачал данные скрипты , немедленно их удалить, независимо от того работают
они или нет.

Здравствуйте!
Советую не зацикливаться на использовании горячек в своем скрипте. Изучайте
дальше. Делайте более универсальные скрипты. Не гнушайтесь возможностями
самой системы с которыми позволяет работать JAWS.
Вот пример создания текстового файла в проводнике с последующим открытием в
блокноте:
Script NewTxtFile ()
Var
Int i,
Object oShellWin,
String s,
string s1
oShellWin=CreateObject ("shell.application")
i=0
While i < oShellWin.windows.count
&&oShellWin.windows(i).HWnd != GetForegroundWindow ()
i=i+1
EndWhile
oShellWin=oShellWin.windows(i).document
s1=oShellWin.FocusedItem.Path
For i=1 to StringSegmentCount(s1,"\\")-1
s=s+StringSegment(s1,"\\",i)+"\\"
EndFor
s1="Новый текстовый документ.txt"
If !(InputBox("Введите имя файла"," ",s1)) then
Say("Отменено",0)
EndIf
s=s+s1
Run("notepad "+s)
EndScript
Новые версии JAWS позволяют выдрать текущую папку еще проще и скрипт станет
раз в 5 короче. Этот будет работать начиная с 4.5.
Удачи.

Ответить   Fri, 24 Mar 2017 23:28:05 +1000 (#3481621)

 

Вот и простое восприятие для тех, кто не делает ошибок, а сам протупил.
Перед EndIf надо воткнуть Return.
Удачи.

Ответить   Fri, 24 Mar 2017 23:46:38 +1000 (#3481626)

 

Здравствуйте, Светлый.

Вы писали 24 марта 2017 г., 16:28:05:

Изучайте

в

Блин, обожаю когда дают умные советы, тем более коли это происходит
публично! :)
да, как вы догадались я поставил ваш код скрипта, хотя сразу вспомнил,
что он косячный! :)
конечно код красивый, но увы и ах!
вот пример бага, создаю пустую папку и пытаюсь с помощью скрипта
создать текстовый файл.
Мда, он файл то создаёт, но почему-то не в текущей папке, а в папке
Jaws. :)
коли предлагать скрипт, то давайте делать это от души, так сказать
опробированный продукт, хотя бы на своей машине.
например, что предлагал иван.
Пробовал на Windows7, Jaws15.
Удачи всем!
Спасибо.

Ответить   Wed, 29 Mar 2017 15:48:25 +0300 (#3482779)

 

Всем доброго времени суток! Здравствуйте, Air!

24.03.2017 18:16, "Air" пишет:

всем кто

работают

Пожалуйста, всегда рад помочь. Удалять же их я не призывал, просто перед
тем, как их использовать нужно понять 3 вещи:
1. Перед первым их запуском нужно в них залезть и заново пересчитать
количество команд движения курсора, и проверить свое альтовое меню на
предмет соответствия алгоритму данного скрипта.
2. После каждой установки новой программы, ярлыки которой могут
оказаться в альтовом меню, данную операцию нужно повторить.
3. Следите за актуальностью ваших образов системы, потому как, с
достаточно высокой долей вероятности, они вам все-таки понадобятся. И,
да, хранить их лучше на внешнем диске, т.к. при восстановлении системы с
ее образа, при возникновении малейшей ошибке, система падает в синий
экран, а дальше, как повезет....

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

Ответить   Sat, 25 Mar 2017 14:33:52 +0500 (#3481841)

 

Здравствуйте, Вадим.

Вы писали 25 марта 2017 г., 12:33:52:

не хотел вмешиваться в вашу симпатичную дискуссию, но руки сами
возмутились.
никогда не было и не будет таких страшных скриптов, что вы описали.
ибо это уже не скрипт это вирус мутант. :)
да, скрипт может не работать корректно из-за специфики, как системы,
так и использованного инструментария Jaws. В остальном это всё чудеса
и страшилки.
не нужно обижать тем более через рассылку людей, которые привыкли
малейшей крохой делиться с окружающими. :)
По крайней мере за десять лет с хвостиком я таких разработчиков
скриптов не встречал, что бы лезли ручками в вашу систему, и конечно в
мою тоже.
перестаньте писать чушь. :)
надеюсь на понимание и удачи.

Ответить   Sat, 25 Mar 2017 18:15:05 +0300 (#3481916)

 

Всем доброго времени суток! Здравствуйте, Grolin!

25.03.2017 20:15, Grolin пишет:

Я в данной ситуации пока вижу лишь 2 варианта: переустановить explorer
и, как уже предлагалось, откатиться в системе. Второй кажется очевиднее,
но я не очень люблю иметь дело с этим процессом, т.к. имелся не слишком
воодушевляющий опыт. Впрочем, это уже мои проблемы.

Также вы пишете:

Согласен. Прошу прощения у автора за мою неадекватно нервную реакцию. В
программировании и последующем использовании кода случается всякое.
Просто я впервые столкнулся с необходимостью предварительной проверки
кода, написанного на незнакомом мне языке.

P.S. Думаю, что тема закрыта, т.к. итак слишком затянута. Всем спасибо
за отзывы!

Ответить   Sun, 26 Mar 2017 12:04:38 +0500 (#3482015)

 

Привет Grolin и автор скриптов(не обратил внимания на то кто это)!
ц
никогда не было и не будет таких страшных скриптов, что вы описали.
ибо это уже не скрипт это вирус мутант. :)
смотрим альтовое меню в проводнике:
чисто его несколько пунктов в обратном порядке

Переименовать
Удалить
Создать ярлык
Копировать
Вырезать
Отправить Подменю
Переместить в Облако@M*****.Ru
***
впринципе ничего смертельного, из корзины и из облака достать можно.
хотя, конечно, если стоит мимо корзины и без предупреждения, то могут быть
проблемы
и ещё есть пункт
"Удалить содержимое папки " - это уже мои личные программерские приколюхи и
не так часто могут встретиться на компе.
но вот автор вместо того что бы начинать обижаться на неблагодарного
пользователя, взял бы и поинтересовался
а как сделать так, что бы ничего не попадало не туда.
если и на моё замечание автор этого шедеврального кода обидется, то значит
туда
ему и дорога.
если же он серьёзный человек то вот ему код, посредством которого можно
решить задачу.
получаем объект:
let o= GetObjectFromEvent (hWnd, OBJID_CLIENT, 0, 0)

а так получаем и читаем количество объектов:
SayInteger (o.accChildCount)
что бы потом в цикле можно было их перебрать и найти нужный пункт.
от 1 до accChildCount включительно.

вот так получаем и читаем роль и имя нужного дочернего объекта:
SayString (FormatString ("роль : %1, Имя: %2", getRoleText (o.accRole
(nChild)), o.accName(nChild)))

находим нужное и активирумем например вот так:
o.accDoDefaultAction(nChild)

и это ещё не самый рациональный способ.
лучше всего сделать точно так, как делает винда при нажатии на пункт меню
но это уже посложнее,
точнее не факт что это реально сложнее,
просто не смотрел как там и что делается.

при этом строковые константы пунктов меню выносим в JSM для возможной
дальнейшей локализации.

скрипты типа 3 раза NextLine (), а далее TypeKey ("Enter")
хороши когда только начинаешь писать скрипты и для статичных интерфейсов.
а когда хочешь поделиться да ещё что бы тебя хвалили
нужно хотя бы немного напрячься и поизучать написание скриптов
тем более что в листе есть люди, которые помогут выбраться из песочницы и
научиться чему то большему.

п.с.
за подробностями работы скриптов отсылаю к моим скриптам к QIP Infium,
скриптам проекта JSonar и к любым скриптам Сергея Туманяна и Анатолия
Камынина.
а у Анатолия на тифлокомпе ещё и статей интересных можно почитать.
наверняка есть ещё много хороших и классных скриптописателей, чей код может
послужить примером,
но эти 2 человека, точнее их скрипты частенько служили и продолжают служить
примером для меня самого
и поэтому очень рекомендую смотреть как пишут скрипты Анатолий и Сергей.

Виктор Горелов

Ответить   Sun, 26 Mar 2017 13:07:41 +0300 (#3482048)

 

Здравствуйте!

Опробовал обсуждаемые скрипты на работоспособность . И, о чудо" У меня
все четыре скрипта работают вполне себе нормально.
Вероятно у меня в альтовом меню совпало количество пунктов и
подпунктов с автором скриптов.
Заглянул я в сами скрипты и ничего дурного там я не увидел.
Простенький код. Но такие скрипты удобны тем, что их довольно-таки легко
подправить под структуру своего альтового меню.
Если в системе что-то изменится, то дописал пару строк кода или
наоборот убрал лишние строчки и все дела.
Не могу понять, почему эти скрипты вызвали такой ажиотаж.Скрипты как
скрипты. Не сказать что б гениальные, но и отвратительными их тоже не
назовёшь. Мне кажется, что автор не заслуживает чрезмерной критики и
навязывать свой стиль написания скриптов - это тоже не дело. Тот подписчик,
который сбросил сюда свои "труды" сам решит какого уровня сложности
написания скриптового кода он хочет достич.
В общем, на мой взгляд нормальные скрипты. Пусть человек дерзает и ни
к чему подрезать крылья тем, кто учится летать.

Ответить   Sun, 26 Mar 2017 20:57:50 +0500 (#3482095)

 

Привет Labuda!
ц
Заглянул я в сами скрипты и ничего дурного там я не увидел.
потому что дурного там нет и быть не может.
просто начинающий скриптописатель и все наступают на эти грабли когда
начинают.
я сам так писал к примеру для библиотеки в кармане более десятка лет назад.
и самое забавное что когда попробовал написать правильно, сама прога не
отдала инфы и скрипты остались как были написаны впрошлом десятилетии.
это только тем кто не в теме может казаться что существуют какие то стили
написания и т.д.
иногда бывают проги в которых выбираешь между плохим решением и очень
плохим.
в проводнике к счастью объектная модель есть и всё отлично можно сделать
да так, что реально это будет работать у всех.
и ты получишь только положительные отзывы.
и заметь, я не столько критиковал скрипты, сколько реакцию автора на
критику.
так же есть замечательный принцип: отвергаешь - предлагай, и я предложил
набор функций не таких уж сложных.

ц
Мне кажется, что автор не заслуживает чрезмерной критики и
навязывать свой стиль написания скриптов - это тоже не дело.
это у топик стартера не стиль, это его отсутствие.
а хочется что бы человек не просто писал какие нибудь скрипты
а реально творчески рос.
если вы или того хуже он этого не понимаете, то я ничем помочь увы не смогу.
но если вместо обиды, "я такой хороший а меня критикуют"
человек сможет разобрать мои подсказки,
одним хорошим скриптописателем а может и программером в дальнейшем станет
больше.

Виктор Горелов

Ответить   Sun, 26 Mar 2017 19:56:51 +0300 (#3482102)

 

Здравствуйте.

* Исходное сообщение * РР> Мне кажется, что автор не заслуживает чрезмерной критики и
<...>

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

Ответить   Sun, 26 Mar 2017 21:27:23 +0300 (#3482111)

 

Здравствуйте.
подбераю гарнитуру для компа с двумя протоколами работы По блютуз и USB.
на подобие logitech h800.
Кто знает ещё какие подобные гарнитуры прошу делиться.
Просто надо качественную гавнитуру.

Ответить   Sun, 26 Mar 2017 21:05:29 +0300 (#3482116)

 

Доброго времени суток всем!
Dmitriy в письме от 26.03.2017; 21:05 пишет:

Мой вам совет: возьмите отдельно гарнитуру для компа и
моно-bluetooth-гарнитуру для смартфона. Bluetooth-гарнитуры на
компьютере ведут себя из рук вон плохо, ну а в части смартфонов
задайте вопрос в sph, посоветую конкретные опробованные модели, в
Тифлокомпе это - оффтоп.

Ответить   yuniks Mon, 27 Mar 2017 08:15:31 +0300 (#3482167)