' List Shell Object Verbs


Const RECYCLE_BIN = &Ha&

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.NameSpace(RECYCLE_BIN)
Set objFolderItem = objFolder.Self      
Set colVerbs = objFolderItem.Verbs

For i = 0 to colVerbs.Count - 1
    Wscript.Echo colVerbs.Item(i)
Next

search for scripts

VbsEdit contains all these sample scripts!





Home   Scripts

Copyright © 2001-2019 adersοft