1

有没有一种方法可以自动右键单击 Windows 7 文件夹中的文件并在简单的 VB 脚本中选择“发送到 -> Amazon Cloud Drive”上下文菜单选项?

4

1 回答 1

2

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

“正确”的方法是使用 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

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

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

于 2012-05-04T02:43:48.033 回答