ChDir Left(CurrentDB.Name, InstrRev(CurrentDB.Name, "") - 1)

Shell "C:abcdefxyz.exe"

ChDir "C:abcdef"
Shell "xyz.exe"  ' No *need* to include path information anymore
                 ' because it is now in "current" directory