| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Имя файла БД на сервере [D6, IB6.x]
LS © (2002-11-23 12:29:00)Добрый день! Подскажите, можно ли осуществить перевод стандартного имени файла в DBName для FIBDatabase и обратно, если путь - сетевой?
Напр. "\\serv\work\db.gdb" <-> "serv:g:\users\db\db.gdb"
Prooksius (2002-11-23 16:42:00) [1]Вот, в одну сторону уже делал. Держи.
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;
ЮЮ (2002-11-23 12:36:00) [2]А потом спрашиваю, "Как защититить информацию???", а сначала выкладывают БД в расшаренную папку :-)
| |
