Главная страница
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.048 c
14-1109061668
__max__
2005-02-22 11:41
2005.03.13
Программы для настрйоки гитары.


3-1108188274
Dyusha
2005-02-12 09:04
2005.03.13
Выполнение запросов в ADOQuery


1-1109620453
DelphiNoK
2005-02-28 22:54
2005.03.13
Разрешение экрана


14-1108642779
wicked
2005-02-17 15:19
2005.03.13
dot net - с чего начать?...


14-1108709845
WondeRu
2005-02-18 09:57
2005.03.13
Книжная ветка 3: Зарубежная Литература