2010-03-07 523 views

回答

5

它不能直接完成,但可以讓應用程序完成這項工作。這將清除 剪貼板,使用命令行工具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 
+1

第一個是很酷。第二個可以通過向受信任的站點添加「about:blank」來解決問題。 – 2010-03-07 12:55:53