Очистка буфера обмена с помощью VBScript

Question

Как очистить буфер обмена с помощью VBScript на Win32?

Answer 1

Это невозможно сделать напрямую, но вы можете позволить приложению выполнять работу. Это очистит буфер обмена, используя инструмент командной строки clip:

Set WshShell = WScript.CreateObject("WScript.Shell") 
WshShell.Run "cmd.exe /c echo. >NUL | clip", 0, True 

---

Другой способ заключается в использовании приложений, которые имеют COM-интерфейс и может манипулировать в буфер обмена. Например. Microsoft Word и Internet Explorer.

Это будет работать, используя Internet Explorer, но может бросить пользовательский диалог:

Set slaveApplication = CreateObject("InternetExplorer.Application") 
slaveApplication.Navigate("about:blank") 
slaveApplication.document.parentwindow.clipboardData.SetData "text", "" 
slaveApplication.Quit