Set UAC = CreateObject("Shell.Application")  
UAC.ShellExecute "C:\Users\David\AppData\Roaming\Microsoft\Windows\SendTo\Set Always Run As Admin.cmd", ""E:\Downloads\Disk Utilities\Defraggers\smart-defrag 4-setup.exe"", "", "runas", 1