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

問題は、サブメニュー項目が空の文字列としてリストされることです。

考えられる回避策の1つは、Send Toフォルダーに移動し、使用するショートカットのコマンドラインを取得することです。その後、直接実装できます。

于 2012-05-04T02:43:48.033 に答える