使用VBScript清除剪贴板

Question

如何在Win32上使用VBScript清除剪贴板？

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