Here is a VBScript that will do elevation when you RUNAS in Vista:

Set objShell = CreateObject("Shell.Application") app = wscript.arguments(0) args = "" for i = 1 to (WScript.Arguments.length - 1) args = args + wscript.arguments(i) next objShell.ShellExecute app, args, "", "runas" 

Use like so: runas.exe /user:domain\user "wscript.exe runas_script.vbs mmc.exe"