>>705
CurrentProject.Pathでフォルダ名、
CurrentDb.NameでMDBのフルパスが取得できます。