oWSH = CreateObject( "WScript.Shell" ) oWSH.AppActivate( "Command Prompt - FOXPROX" ) oWSH.SendKeys("%~")