0 / 0 / 0
Регистрация: 26.04.2015
Сообщений: 1
|
||||||
1 | ||||||
VBS Печать JPEG-изображений26.04.2015, 13:26. Показов 4508. Ответов 18
Метки нет (Все метки)
Извеняюсь, может вопрос не в этот раздел....
Есть скрипт (скачан с какого то форума), рабочий. Он значит, мониторит определённую папку, и как только в неё попадает doc или xls он отправляет это дело на печать на принтер по умалчанию и удаляет документ. Если попадают файлы с другим расширением, он не делает ничего... Так вот, надо добавит, что бы распечатывались также и jpg. Помогите неучу :ges_help:
0
|
26.04.2015, 13:26 | |
Ответы с готовыми решениями:
18
Алгоритм сжатия и распаковки изображений по стандарту Jpeg-Ls Cжатие изображений методом JPEG, цвет пикселя Вывод на печать и степень качества jpeg Печать изображений |
251 / 239 / 16
Регистрация: 31.12.2009
Сообщений: 324
|
|
27.04.2015, 13:50 | 2 |
а чем печатать то его - ваш скрипт для каждого типа файлов "doc", "xls" использует соотв. Word / Excel а jpg вы паинтом печатать хотите или как картинку в Word вставлять, да и как печатать "портретно", "ландшафтно"?
1
|
Модератор
5197 / 2079 / 406
Регистрация: 06.01.2013
Сообщений: 4,793
|
|||||||||||
27.04.2015, 17:02 | 3 | ||||||||||
buggydancer, возможно, через
Впрочем, у меня в тестовой папке сработало только на самом скрипте, хотя залогировало на всех. Добавлено через 17 секунд
3
|
251 / 239 / 16
Регистрация: 31.12.2009
Сообщений: 324
|
|||||||||||
27.04.2015, 21:29 | 4 | ||||||||||
А на моем (xp/sp2/ru/x32) и сработало на всех (по крайней мере все ушли в очередь на принтер [принтер, правда был выключен])
а скрипт - да красивый, я-то думал попроще, что-то типа такого: Кликните здесь для просмотра всего текста
или такого: Кликните здесь для просмотра всего текста
1
|
2618 / 548 / 109
Регистрация: 21.03.2012
Сообщений: 1,051
|
||||||
28.04.2015, 20:49 | 5 | |||||
Из моей практики следует, что непосредственное использование метода InvokeVerb - ненадёжный путь, т.к. гарантировано отправляет на печать текстовые файлы, а картинку может и не отправить (у меня, например, ни на XP Home, ни на XP Pro не отправляет).
Мой вариант таков: Кликните здесь для просмотра всего текста
4
|
Модератор
5197 / 2079 / 406
Регистрация: 06.01.2013
Сообщений: 4,793
|
||||||
28.04.2015, 21:04 | 6 | |||||
Dmitrii, на моей Win 7 он вообще имеет вид
"Пе&чать" Добавлено через 4 минуты Мой скрипт практически это же и использует - только сравнивает только со строкой Печать, а не Print. С другой стороны, можно и так...
Ну и весь скрипт мог бы написать сейчас... Другое дело, что у меня просто отказывается в принципе печатать файлы...
2
|
2618 / 548 / 109
Регистрация: 21.03.2012
Сообщений: 1,051
|
|
28.04.2015, 21:05 | 7 |
Значит и такой вариант надо учитывать.
Впрочем, более надёжным представляется всё же вариант с использованием какого-либо приложения из комплекта "MS Office" (благо, у автора темы он имеется).
0
|
Модератор
5197 / 2079 / 406
Регистрация: 06.01.2013
Сообщений: 4,793
|
|
28.04.2015, 21:06 | 8 |
Dmitrii, угу, закинуть картинку в ворд и оттуда послать.
0
|
2618 / 548 / 109
Регистрация: 21.03.2012
Сообщений: 1,051
|
|
28.04.2015, 21:07 | 9 |
0
|
Модератор
5197 / 2079 / 406
Регистрация: 06.01.2013
Сообщений: 4,793
|
|
28.04.2015, 21:12 | 10 |
Dmitrii, картинки. Сам скрипт послал на принтер - благо к ноуту у меня никакой не присоединён)
0
|
251 / 239 / 16
Регистрация: 31.12.2009
Сообщений: 324
|
||||||
29.04.2015, 13:27 | 12 | |||||
макрос из первого спойлера #4 поста, переделанный в Sub() этим и занимается:
Кликните здесь для просмотра всего текста
правда у ТС и так вордовские файлы распечатывались - можно было административными мерами обязать пользователей класть кратинки в doc-файлы, видимо ТС так и поступил - пропал куда-то
2
|
82 / 72 / 15
Регистрация: 18.01.2014
Сообщений: 348
|
|||||||||||
08.03.2018, 09:10 | 13 | ||||||||||
Dmitrii, в вашем примере
насколько я понял, отправка на печать JPG-картинок идет по одному файлу, т.е. если в тестовой папке 10 картинок, то запустится 10 Мастеров по печати изображений. А нельзя ли как-нибудь запустить один мастер с 10 картинками "на борту". Я пишу на vb.net, там есть у меня такое:
Может кто-нибудь знает, как должна выглядеть эта строчка?
0
|
2618 / 548 / 109
Регистрация: 21.03.2012
Сообщений: 1,051
|
|||||||||||
08.03.2018, 17:50 | 14 | ||||||||||
Как это должно выглядеть на VB.Net я не имею представления, а на VBS может выглядеть, например, так:
1
|
82 / 72 / 15
Регистрация: 18.01.2014
Сообщений: 348
|
|
08.03.2018, 19:22 | 15 |
Dmitrii, Супер! все работает (и первый и второй вариант) с небольшими дополнениями (адаптацией к vb.net), однако что делать если например из папки D:\Temp нужно не все файлы распечатать, а некоторые, список которых известен (к примеру D:\Temp\1.jpg и D:\Temp\2.jpg, а всего в папке 10 файлов)?
ЗЫ. Так интересно: это уже третий способ, который я нашел, запустить из своей программы Мастер по печати изображений
0
|
82 / 72 / 15
Регистрация: 18.01.2014
Сообщений: 348
|
|||||||||||
09.03.2018, 09:32 | 17 | ||||||||||
FlasherX, Спасибо, наконец-то все заработало, и еще вопрос (для повышения общей эрудиции): что означает цифра 64 в
Да уж, рано радовался, все же в вышеуказанном коде осталась привязка к папке, т.е. одновременно послать несколько файлов на печать из разных папок не получится. Добавлено через 15 минут Раньше (до того как начал искать альтернативный вариант) я использовал такой:
А еще больше стало раздражать когда я случайно наткнулся на примерчик с кодпрожект, где среди прочего можно было запустить этот Мастер с файлами из разных папок и он запускался и сразу же окно его активным становилось. Но исходники примерчика были урезанными, из них я не понял как отправлять одновременно несколько файлов на печать из разных папок.
0
|
6228 / 2670 / 1051
Регистрация: 06.06.2017
Сообщений: 9,114
|
||||||
09.03.2018, 10:19 | 18 | |||||
Флаг фильтрации элементов, не являющихся папками. В контексте невиртуальных папок это файлы. Я обычно к сумме флагов добавляю 8192 для ускорения поиска по индексации. Для поиска скрытых файлов накидываю 128 и 65536. Здесь эти числа заданы в HEX.
В одном потоке нет. Собственно, вы и не ставили так задачу. Поэтому тут только перебором как во втором варианте:
0
|
82 / 72 / 15
Регистрация: 18.01.2014
Сообщений: 348
|
|
09.03.2018, 11:21 | 19 |
Привычный для рядового пользователя инструмент для печати картинок. В win7 по сравнению с XP стал еще лучше и удобнее. Все работники в нашей конторе (для которых я и пишу вьювер с элементами редактирования, специфичными исключительно для той сферы деятельности, которой занимается наша контора) пользуются им с "детства".
Не скрою есть у него несколько моментов, реализованных не очень удачно, но на 99% устраивает. Подумывал писать свой контрол, заменяющий стандартный мастер по печати картинок, но это может в будущем.
0
|
09.03.2018, 11:21 | |
09.03.2018, 11:21 | |
Помогаю со студенческими работами здесь
19
Печать изображений PrintDialog печать изображений Печать на бумагу динамических изображений Печать сканированных изображений в масштабе 1:1 с исходником Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |