Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.13;
Скачать: CL | DM;

Вниз

Файлы в Access   Найти похожие ветки 

 
kblc ©   (2005-02-12 23:24) [0]

Уважаемые мастера,
у меня к вам вопросы:
- Как в в определённо поле таблицы загонять *.doc, *.xls, и возможно image файлы(т.е. какой формат должна иметь ячейка таблицы?) и как лучше всего это реализовать.
- А как лучше всего их там хранить (мне сообщили, что при добавлении небольших файлов(примера я не видел), таблица вырастает где то (размер того файла * 5). Почему?
- Как можно зжать базу, и будет ли от этого уменьшена скорость работы приложений? (т.е. при помощи запроса)

Всё это я спрашиваю про MS Access 97-2003


 
sniknik ©   (2005-02-13 01:13) [1]

1
"Поле объекта OLE"
TBlobField(ADODataSet1.FieldByName("x")).LoadFromFile("x.x");
TBlobField(ADODataSet1.FieldByName("x")).LoadFromStream(xStream);

2
там страничная организация, это значит если размер превысит хоть на один байт существующюю страницу то добавится новая несколько мегабайт. (скорость записи по готовой выше чем на каждый байт файл расширять)
плюс какаято рабочая область (обьеденения/запросы извне делаются в ней, и там тоже страничная организация... ;о))) возможны ситуации когда в страницах появляются "дырки", незаполненые зоны.
убирается это паковкой базы.

3
конечно будет, сжатая база в работе начнет немедленно увеличиваться (вот те самые рабояие области создавать) на время увеличений и будут задержки.
вообще лучше не трогать без необходимости, ну или делать паковку достаточно редко (раз в неделю к примеру), а не после каждой записи. резко размер растет только вначале... реально данных именно столько сколько положил (по размеру) .
но изредка делать всетаки необходимо, для профилактики, дело в том что упаковка по совместительству является и "ремонтником" базы.

лишнее выкини

function TDMod.PackAccess(BaseName: string): boolean;
var je: Variant;
   sPath: string;
begin
 result:= false;
 BaseName:= GetMdbName(BaseName);
 sPath:= ExtractFilePath(BaseName);
 try
   try
     ADOConnection1.Close;
     ADOConnection2.Close;
     je:=CreateOleObject("JRO.JetEngine");
     je.CompactDatabase("Provider=Microsoft.Jet.OLEDB.4.0;"+
                        "Data Source="+BaseName+";",
                        "Provider=Microsoft.Jet.OLEDB.4.0;"+
                        "Data Source="+sPath+"NewBase$$$.Mdb;"+
                        "Jet OLEDB:Encrypt Database=True");
     DeleteFile(BaseName);
     RenameFile(sPath+"NewBase$$$.Mdb", BaseName);
     result:= true;
   except
     on E: Exception do DoIfError(E.Message);
   end;
 finally
   je:= Null;
 end;
end;


 
kblc ©   (2005-02-13 21:09) [2]

2sniknik:
Большое тебе спасибо!

И ещё фопрос: А как закидывать туда файл, который создан через OLE? т.е. есть, скажем, какой-то вордовский файл, работа с которым ведёться через OLE, как не сохраняя этот файл на диск закинуть его в базу?


 
kblc ©   (2005-02-14 02:44) [3]

и вот ещё проблемка:

при выполнении je.CompactDatabase("...") у меня вылетает ошибка: Недопустимое число параметров. Почему?


 
sniknik ©   (2005-02-14 08:17) [4]

потому что у тебя количество параметров не такое как нужно/как я привел. переписывать надо акуратно.



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

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

Наверх




Память: 0.48 MB
Время: 0.029 c
1-1109279954
Руслана
2005-02-25 00:19
2005.03.13
Отправить письмо незаметно от пользователя


1-1109714823
Shnabs
2005-03-02 01:07
2005.03.13
Графика


4-1107077574
Максим
2005-01-30 12:32
2005.03.13
Выключение компьютера


14-1109074987
}|{yk
2005-02-22 15:23
2005.03.13
Футбольный сезон 2005


14-1109061668
__max__
2005-02-22 11:41
2005.03.13
Программы для настрйоки гитары.