aproject = av.GetProject filen = FileName.GetCWD aProject.SetWorkDir(filen)