Форум программистов, компьютерный форум, киберфорум
Администрирование Windows
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.54/13: Рейтинг темы: голосов - 13, средняя оценка - 4.54
 Аватар для Leon56
90 / 11 / 5
Регистрация: 14.12.2015
Сообщений: 120

Ярлык "Пробная печать" для принтера. Как вывести?

30.11.2018, 08:33. Показов 3069. Ответов 10
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день!
Для периодической профилактики струйного принтера юзерам нужно вывести ярлык "пробной печати" принтера на рабочий стол, ибо путь до данной кнопки для них слишком тяжело запомнить... Подскажите, как это сделать?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
30.11.2018, 08:33
Ответы с готовыми решениями:

Как вывести данные на печать принтера.
Здравствуйте ! Помогите новичку. Есть форма (создал визардом), убрал кнопки (OK и Cancel ), добавил меню и кнопку. Из функции на...

Как вывести содежимое переменной PHP на печать принтера?
Доброе время суток. Возник срочный вопрос, нуждаюсь в помощи. Есть ли возможность вывода большой переменной на печать принтером, не...

Принтеры и пробная печать (тестовая страница)
Всем добрый день. Задачка такая: 1. необходимо вывести список установленных принтеров 2. их состояние (Готов, не готов, не подкл. и...

10
1320 / 539 / 67
Регистрация: 16.01.2013
Сообщений: 4,119
30.11.2018, 09:54
Leon56, пусть любой файл печатают.
0
Супер-модератор
Эксперт 1СЭксперт по компьютерным сетямЭксперт HardwareЭксперт Windows
 Аватар для Maks
9420 / 5218 / 624
Регистрация: 13.03.2013
Сообщений: 18,354
Записей в блоге: 17
30.11.2018, 13:46
Leon56, можно написать батник, который будет распечатывать определенный файл, например, тот же тестовый, но предварительно отсканированный.
Windows Batch file
1
print /?
Линк
0
6986 / 2876 / 1106
Регистрация: 06.06.2017
Сообщений: 9,767
30.11.2018, 17:50
Лучший ответ Сообщение было отмечено Maks как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
With CreateObject("WScript.Shell")
  With .CreateShortcut(.SpecialFolders(4) & "\Пробная печать.lnk")
    .TargetPath  = "printui"
    .Arguments   = "/n ""Название принтера"" /k"
    .Description = "Пробная печать"
    .Save
  End With
End With
2
1 / 1 / 0
Регистрация: 25.03.2014
Сообщений: 24
04.04.2023, 18:37
Здорово помогло.
А как сделать печать определённой тестовой фотки? Ну чтобы все цвета прогонялись.
0
6986 / 2876 / 1106
Регистрация: 06.06.2017
Сообщений: 9,767
05.04.2023, 05:44
Лучший ответ Сообщение было отмечено Maks как решение

Решение

remin, по мотивам темы:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
'————————————————————————————————————————————————
' Назначение: печать графического файла
Const File = "D:\Temp\test.jpg" ' путь к картинке
'————————————————————————————————————————————————
With CreateObject("Scripting.FileSystemObject")
   HTML = .GetSpecialFolder(2) & "\" & .GetTempName & ".html"
   With .CreateTextFile(HTML, 1)
      .Write "<style>body{margin:0;padding:0}</style><img src=""file:///" & File & """ width=100%>"
      .Close
   End With
   For Each oVerb in CreateObject("Shell.Application").NameSpace(0).ParseName(HTML).Verbs
      Verb = LCase(Replace(oVerb.Name, "&", ""))
      If Verb = "печать" Or Verb = "print" Then oVerb.DoIt: Exit For
   Next
   .DeleteFile HTML
End With
1
1 / 1 / 0
Регистрация: 25.03.2014
Сообщений: 24
06.04.2023, 13:42
FlasherX спасибо но не знаю что делать с этим)
В первом варианте сделал текстовый файл, вставил туда код, сменил расширение txt на vbs , запустил, и на раб столе появился нужный ярлык, который запускаешь и сразу идёт печать.
Как со вторым вариантом так же сделать? Или в первом прописать не пробную страницу а фотку.
0
6986 / 2876 / 1106
Регистрация: 06.06.2017
Сообщений: 9,767
06.04.2023, 19:32
remin, я не увидел в запросе цели создания ярлыка. Этот vbs сам печатает указанную картинку.
1
1 / 1 / 0
Регистрация: 25.03.2014
Сообщений: 24
07.04.2023, 20:13
Цитата Сообщение от FlasherX Посмотреть сообщение
With CreateObject("WScript.Shell")
  With .CreateShortcut(.SpecialFolders(4) & "\Пробная печать.lnk")
    .TargetPath  = "printui"
    .Arguments   = "/n ""Название принтера"" /k"
    .Description = "Пробная печать"
    .Save
  End With
End With
Как сюда файл для печати вставить вместо пробной печати?

Добавлено через 4 минуты
Цитата Сообщение от FlasherX Посмотреть сообщение
Этот vbs сам печатает указанную картинку.
Не печатает у меня. Я только картинку вписал и картинка в нужном месте есть.

Добавлено через 5 часов 2 минуты
Нашёл вот такое решение, может кому понадобится:

"Хорошо, чтобы распечатать конкретный JPG файл на конкретном принтере, можно также создать для этого ярлык. Выполните следующие шаги:

Найдите файл JPG, который нужно распечатать.
Нажмите правой кнопкой мыши на файле и выберите "Открыть с помощью" -> "Просмотр изображений и факсов" (или другой программой, которую используете для просмотра изображений).
Когда файл JPG откроется в просмотрщике изображений, выберите "Печать" (или нажмите Ctrl+P).
В диалоговом окне "Печать" выберите нужный принтер из раскрывающегося списка "Имя принтера".
Настройте нужные параметры печати (число экземпляров, ориентацию, размер бумаги и т.д.).
Перед нажатием кнопки "Печать" в верхней части диалогового окна убедитесь, что в поле "Принтер" выбран нужный принтер.
Теперь создадим ярлык для печати этого конкретного файла на этом конкретном принтере:

Нажмите правой кнопкой мыши на рабочем столе и выберите "Создать" -> "Ярлык".
В поле "Место расположения элемента" введите следующую команду, заменив путь и название файла на реальный путь и название JPG файла, а "PrinterName" на название конкретного принтера, выбранного на шаге 4:
"rundll32.exe C:\WINDOWS\system32\shimgvw.dll,ImageVie w_PrintTo /pt "C:\path\to\your\file.jpg" "PrinterName""

Нажмите "Далее".
Введите название ярлыка в поле "Введите имя для этого ярлыка".
Нажмите "Готово".
Теперь на рабочем столе у вас есть ярлык, который позволяет напечатать конкретный JPG файл на конкретном принтере. Перетащите файл JPG на этот ярлык, чтобы начать печать."
1
6986 / 2876 / 1106
Регистрация: 06.06.2017
Сообщений: 9,767
09.04.2023, 08:52
Цитата Сообщение от remin Посмотреть сообщение
Как сюда файл для печати вставить вместо пробной печати?
printui не имеет такой функции.
Цитата Сообщение от remin Посмотреть сообщение
Не печатает у меня. Я только картинку вписал и картинка в нужном месте есть.
А когда на любом html-файле жмёте ПКМ или клавишу Menu, в списке есть слово Печать или типа того?
Цитата Сообщение от remin Посмотреть сообщение
rundll32.exe C:\WINDOWS\system32\shimgvw.dll,ImageVie w_PrintTo /pt "C:\path\to\your\file.jpg" "PrinterName"
Любопытно. Пока проверить не на чем, но ImageView_PrintTo там вижу. Жаль, что нет Print без To.
1
1 / 1 / 0
Регистрация: 25.03.2014
Сообщений: 24
10.04.2023, 09:20
Цитата Сообщение от FlasherX Посмотреть сообщение
А когда на любом html-файле жмёте ПКМ или клавишу Menu, в списке есть слово Печать или типа того?
Нет такого слова.
Цитата Сообщение от FlasherX Посмотреть сообщение
Любопытно. Пока проверить не на чем, но ImageView_PrintTo там вижу. Жаль, что нет Print без To.
Это chatGPT подсказал))
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
10.04.2023, 09:20
Помогаю со студенческими работами здесь

Помогите получить HDC принтера вывести печать текста функцией DrawText
Написал программку (для бух.) и хочу сделать свою процедуру печати. Помогите получить HDC принтера с помощью CreateDC, вывести туда...

Как настроить печать принтера?
Получилось исправить проблему с принтером, теперь при печати документа текст идет полосками. Как можно настроить печать в принтере? Я знаю,...

Печать Excel файла. Выбор принтера для печати
Добрый день. Подскажите пожалуйста, используя Ole сервер excel для печати: vVarApp.OlePropertyGet(&quot;WorkBooks&quot;,...

Как отправить на печать данные с выбором принтера?
Помогите пожалуйста :) Допустим E:=CreateOleObject('Excel.Application'); E.Visible:=true; ...

Как отправить на печать активную страницу с выбором принтера
Как в MS Office Excel отправить на печать активную страницу с выбором принтера Добавлено через 1 минуту например вот это на печать с...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru