Скачать: CL | DM;

Имя файла БД на сервере   Найти похожие ветки 

← →
LS   (2002-11-23 12:29) [0]

Добрый день! Подскажите, можно ли осуществить перевод стандартного имени файла в DBName для FIBDatabase и обратно, если путь - сетевой?
Напр. "\\serv\work\db.gdb" <-> "serv:g:\users\db\db.gdb"

---

← →
ЮЮ ©   (2002-11-23 12:36) [1]

А потом спрашиваю, "Как защититить информацию???", а сначала выкладывают БД в расшаренную папку :-)

---

← →
Prooksius ©   (2002-11-23 16:42) [2]

Вот, в одну сторону уже делал. Держи.
function GetDBPath: String;
var
ServerName, DriveName, Path: String;
begin
ServerName := pFIBDataBase.DBSiteName;
DriveName := Copy(pFIBDataBase.DBFileName, 1, 1);
Path := Copy(pFIBDataBase.DBFileName, 3, Length pFIBDataBase.DBFileName) - 2);
Result := "\\" + ServerName + "\" + DriveName + Path;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c