Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.12;
Скачать: 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 вся ветка

Текущий архив: 2002.12.12;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.016 c
1-36189
4x4
2002-12-04 10:53
2002.12.12
Splash форма!!!


1-36187
volph7777
2002-12-04 10:39
2002.12.12
цветной StringGrid


1-36079
Vcoder
2002-11-28 22:02
2002.12.12
Вертикальный текст в TCanvas


1-36117
qwertXX
2002-12-03 10:53
2002.12.12
переход с Delphi5 на Delphi6


14-36402
Ольга
2002-11-21 23:03
2002.12.12
Глюки отладчика