Gracias Myakire
como dijo einstein "Make everything as simple as possible, but not simpler".
Te expreso mis mas enormes agradecimientos y admiración.
Esta seria otra forma pero usando el server.MapPath tambien funciona
<%
set objShell = CreateObject("Shell.Application")
ruta=server.MapPath(".")
objShell.ShellExecute "makeov2.exe", "micasa.txt", ruta, "open", 1
%>