Public Function AccessPfad() As String
    
    AccessPfad = SysCmd(acSysCmdAccessDir)
    
End Function