DBDir := @LeftBack(@Subset(@DbName;-1); "\\"); DBName := "database.nsf"; Database := @If(@Trim(DBDir) != ""; DBDir + "\\" + DBName; DBName); Server := @Subset(@DbName;1);