用vbs 实现从剪贴板中抓取一个 URL 然后在浏览器中打开该 Web 站

2019-01-16 09:23:02王振洲


Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")
strURL = objIE.document.parentwindow.clipboardData.GetData("text")
objIE.Quit

Set objShell = CreateObject("Wscript.Shell")
objShell.Run(strURL)

这个脚本还不赖吧。它还有一个优点 — 它并不是只能用来打开 Web 站点。假定您的剪贴板上有一个文件路径,例如“C:ScriptsScriptLog.txt”。运行此脚本,则该文件将在记事本(或任何您设置为与 .txt 文件相关联的应用程序)中打开。如果您的剪贴板上有一个 .doc 文件的路径,则此脚本将在 Microsoft Word 中打开该文档。它实际上是一个通用的文件打开脚本,而不仅仅是一个只能用于 Web 站点的打开脚本。

您可能感兴趣的文章:

JS复制到剪贴板示例代码JS/FLASH实现复制代码到剪贴板(兼容所有浏览器)ASP.NET jQuery 实例4(复制TextBox的文本到本地剪贴板上)VBS访问剪贴板的几种方法小结VBScript 剪贴板抓取URL并在浏览器中打开[js]javascript与剪贴板交互用vbscript实现将脚本的输出复制到剪贴板一段多浏览器的"复制到剪贴板"javascript代码vb.net借助剪贴板将图片导入excel内