Скрипт vbs для запуска программ с правами администратора

Текст файла:
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "cmd.exe", "/k echo test", "", "runas", 1

Запуск файла скрипта:
wscript Run.vbs
или просто двойным кликом