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

Вниз

Вставка большого файла в базу Access   Найти похожие ветки 

 
Arkady   (2003-04-28 08:23) [0]

Имеется таблица (имя t1) Access 2000 с полем (имя bin), имеющим тип «поле объекта OLE». При выполнении команды t1bin.LoadFromFile(‘c:\filename.dat’), если файл ‘c:\filename.dat’ больше 10Мб, запись в таблицу не производится. Выводится сообщение:
Out of memory.
Затем:
Unexpected variant error.
При файлах до 10 Мбайт информация записывается нормально.
Почему возникают эти ошибки?


 
Arkady   (2003-04-28 09:31) [1]

Работа с базой данных через ADO.
t1: TADODataSet;
t1bin: TBlobField


 
Arkady   (2003-04-28 11:26) [2]

Никто не сталкивался с подобной проблемой? Может можно воспользоваться каким-то другим методом вставки данных в поле OLE? Теоретически размер двоичных данных в данном поле ограничивается доступным дисковым пространством. Помогите, пожалуйста.


 
KoluChi   (2003-04-28 12:49) [3]

Попробуй, сначала прочитать файл в поток, а затем загрузить в BLOB.
Проверь сколько осталось места на диске и свободную оперативную память.


 
KoluChi   (2003-04-28 12:52) [4]

function AddFile(FileName: String): Boolean;
var
ArcName: String;
BS: TADOBLOBStream;
FS: TFileStream;
begin
Result := false;
ArcName := ExtractFileName(FileName);
if DatabaseArchiveExists(ArcName) then Exit;
with Query_ADD do
begin
Close();
FS := TFileStream.Create(FileName, fmOpenRead + fmShareDenyNone);
FS.Position := 0;
Parameters.ParamByName("PARAM1").Value := ArcName;
Parameters.ParamByName("PARAM2").LoadFromStream(FS, ftBLOB)
ExecSQL();
Close();
FS.Free();
Result := true;
end;
end;



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

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

Наверх




Память: 0.44 MB
Время: 0.006 c
14-59897
xman
2003-04-29 14:30
2003.05.19
Quake III Arena


3-59565
Belkova
2003-04-26 14:08
2003.05.19
ComboBox.Items.Add( Edit1.Text


1-59671
AndreyDm
2003-05-05 12:38
2003.05.19
Получение сообщений от консольного приложения


14-59854
kol
2003-05-01 15:47
2003.05.19
Серверы приложений


1-59786
RIMMER
2003-05-07 01:11
2003.05.19
Автозаполнение





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский