Форум OlegON > Компьютеры и Программное обеспечение > Операционные системы и программное обеспечение > Windows

Как штатными средствами сделать скриншот экрана в буфер обмена? : Windows

29.03.2024 8:26


03.03.2019 20:53
OlegON
 
Подсобите, пожалуйста?
Попробовал
Код:
WshShell.SendKeys("{PRTSC}")
не работает. Собственно, об этом и сами MS пишут.
Задача простая, без всяких сторонних средств, скриптом или еще как-то автоматически по расписанию делать скриншот всего экрана и поместить его в буфер обмена. Ничего скрытно делать не обязательно.
03.03.2019 23:02
student
 
Цитата:
OlegON Ничего скрытно делать не обязательно
тогда ножницы тебе в руки :)
===
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "snippingtool.exe"
WScript.Sleep (2000)
WshShell.SendKeys("%{N}")
WScript.Sleep (500)
WshShell.SendKeys("^{C}")
WScript.Sleep (500)
WshShell.SendKeys("^{S}")
WScript.Sleep (500)
WshShell.SendKeys("{ENTER}")
WScript.Sleep (500)
WshShell.SendKeys("%{F4}")
===
и допилить при необходимости смену имени файла...
04.03.2019 09:35
OlegON
 
К сожалению, вариант не подошёл совсем.
На загруженной машине ножницы могут не запуститься и скрипт хреначит, закрывая другие окна...
А нужно снимать достаточно частый ряд скриншотов...
Может, есть ещё какой-нибудь способ?
04.03.2019 09:53
student
 
Цитата:
OlegON могут не запуститься и скрипт хреначит, закрывая другие окна
просто допилить с проверкой запущены ножницы или нет и закрывать не по альтF4 а по имени, ну или ваапче не закрывать а просто активировать ...
04.03.2019 10:13
vdm
 
Если не пойдет, из стандартного остается только powershell, в нем реализуемо, примеры есть.
04.03.2019 10:15
OlegON
 
да вот уже нашел... в результате налетел на какую-то политику, запрещающую запуск таких скриптов, хотя wsh запускается
04.03.2019 10:26
OlegON
 
проклятые индусские программисты!
хоткеи совсем ничего общего с реальными не имеют при локализации...
при запуске ножниц они по умолчанию запускаются в режиме прямоугольника и хоткея на выбор полного экрана нет... через Alt-N вообще странно работает, иногда вообще не делает снимок, пока не перезапустишь
04.03.2019 10:42
student
 
Цитата:
OlegON и хоткея на выбор полного экрана
там вроде бы надо сначала вручную выставить режим и потом юзать последний установленный - я просто особо не заморачивался ...
а кнопки там
ALT+M Выбор режима ножниц
ALT+N Создание нового фрагмента в том же режиме, что и последний
SHIFT+клавиши со стрелками Перемещение курсора для выбора прямоугольной области фрагмента
ALT+D Задержка захвата на 1–5 секунд
CTRL+C Копирование фрагмента в буфер обмена
CTRL + S Сохранение фрагмента

кстати в настройках есть параметр типа всегда копировать в буфер - т.е. по идее CTRL+C можно не посылать
04.03.2019 12:33
OlegON
 
в общем, немного наврал, получается, с условием, поскольку используется Word, на этой машине он есть
Код:
Set Wshshell=CreateObject("Word.Basic")
for i=0 to 50
WshShell.sendkeys"{prtsc}"
WScript.Sleep 100
next
сделает 50 скриншотов в буфер почти моментально
04.03.2019 13:09
Димитрий
 
ctrl + print screen
и экран в буфере
Часовой пояс GMT +3, время: 08:26.

Форум на базе vBulletin®
Copyright © Jelsoft Enterprises Ltd.
В случае заимствования информации гипертекстовая индексируемая ссылка на Форум обязательна.