VBS如何获取桌面的右键菜单，不是Desktop文件夹的右键菜单

woetu

我尝试了很多方法，也查了很多资料，都没有找到，下面这种方式好像只能获取第一个文件上的右键菜单

1. 
   
2. Set shApp = CreateObject("Shell.Application")
   
3. ' 获取文件上的所有右键菜单项
   
4. ' Set items = shApp.NameSpace(0).Self.Verbs()
   
5. Set items = shApp.NameSpace(0).Self.Verbs()
   
6. ' 遍历所有菜单项
   
7. For Each item In items
   
8.     MsgBox item.Name
   
9. Next
   

复制代码