使用VBScript从Windows上下文（右键单击）菜单中选择特定菜单项？

Question

有没有办法让我可以自动右键单击Windows 7文件夹中的文件，并在一个简单的VB脚本中选择“发送到 - >＆gt; Amazon Cloud Drive”上下文菜单选项？

Answer 1

答案是肯定的，不是。没有直接的方法可以做到这一点。你可以创建一个解决方法，但它会非常复杂。

“正确”的方法是使用ShellFolderItem对象的InvokeVerb方法。它看起来像这样：

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("C:")
Set objFile = objFolder.ParseName("test.vbs")

' Execute context menu item
'objFile.InvokeVerb("&Copy")

' List all possible verbs
Set colFolderItemVerbs = objFile.Verbs

For Each objFolderItemVerb in colFolderItemVerbs
    WScript.Echo Chr(34) & objFolderItemVerb.Name & Chr(34)
Next

问题是子菜单项被列为空字符串。

一种可能的解决方法是导航到“发送到”文件夹并获取要使用的快捷方式的命令行。然后你可以直接实现它。