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