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

Question

有没有一种方法可以自动右键单击Windows 7文件夹中的文件，然后在简单的VB脚本中选择“发送至 - > 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 

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

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