Sub ChangeDir(p$)

Sets the working directory that the directory commands use