使用VBScript清除剪贴板

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

它不能直接完成,但可以让应用程序完成这项工作。 这将使用命令行工具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