Форум: "Базы";
Текущий архив: 2005.02.20;
Скачать: [xml.tar.bz2];
Вниз
Сохранение файлов в BLOB поле Найти похожие ветки
← →
DimonNew (2005-01-24 17:42) [0]Привет! Подскажите пожалуста! Сохраняю файл в BLOB-поле:
TBLOBField(dmMain.cldsBlock.FieldByName("DocBlock")).LoadFromFile(OpenDialog.FileName);
И через UpdateSQL пытаюсь вставить в БД:insert into AutoTour(IDCountry,IDTour,IDTextBlock,
TypeTextBlock, NameTextBlock,PathUser,DocBlock)
values (:IDCountry,:IDTour,:IDTextBlock,
:TypeTextBlock, :NameTextBlock,:PathUser,:DocBlock)
DocBlock - BLOB-поле.
В результате выводится ошибка:
Operand type clash:text is incompatible with image
Может в MS SQL Server хранение файлов не в image? Или я не правильно обновляю поле BLOB?
← →
Соловьев © (2005-01-24 18:03) [1]...
UpdateSQL.Parameters.ParamByName("DocBlock").LoadFromFile(OpenDialog.FileName, ftVarBytes);
...
← →
DimonNew (2005-01-24 18:28) [2]LoadFromFile - только один параметр имеет - иимя файла.
← →
DimonNew (2005-01-24 18:35) [3]
procedure TdmMain.dsprBlockBeforeUpdateRecord(Sender: TObject;
SourceDS: TDataSet; DeltaDS: TCustomClientDataSet;
UpdateKind: TUpdateKind; var Applied: Boolean);
begin
usqlBlock.DataSet:=DeltaDS;
usqlBlock.SetParams(UpdateKind);
adocBlock.CommandText:=usqlBlock.SQL[UpdateKind].Text;
adocBlock.Parameters.Assign(usqlBlock.Query[UpdateKind].Params);
adocBlock.Execute;
Applied := true;
end;
В этой процедуре возникает ошибка, в adocBlock.Execute
← →
DimonNew (2005-01-24 18:43) [4]Я сделал вот так
adocBlock.Parameters.ParamByName("DocBlock").LoadFromFile(adocBlock.Parameters.ParamByName("PathUser").Value,ftVar Bytes);
И все заработало, спасибо за помощь Соловьев ©!
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2005.02.20;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.036 c
