使用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