请问Delphi+Oracle9中,怎样将SqlServer表中的图片转储到Oracle一个表中? Oracle中的表字段用Blob类型,急问!谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 SQL server 里也有啊binary 仮定: 1)SQLServer <-> ADOConnection1 <-> ADOQuery1 ADOQuery1.SQL.Text := 'SELECT * FROM SQLServer_Table WHERE 条件';2)Oracle <-> ADOConnection2 <-> ADOQuery2ADOQuery2.SQL.Text := 'INSERT INTO Oracle_Table (photo_id, photo) VALUES (:photo_id, :photo)'; 从ADOQuery1一個一個取出記録後、挿入ADOQuery2、TempStream := TMemoryStream.Create;try TBlobField(ADOQuery1.FieldByName('photo')).SaveToStream(TempStream); //TField -> TStream {...} TempStream.Position := 0; ADOQuery2.Parameters.ParamByName('photo').LoadFromStream(TempStream,ftBlob); //TStream -> TField ADOQuery2.ExecSQL;finally TempStream.Free;end;(注:写的只是一個大体、需要NI自己完善) 什么在一个工程中添加TRORemoteDataModule窗体? 关于dbgrideh中特定的字段求和或者合计,我搞不定~ 怎样将excel中的多个表导入到数据库中 关于 sql模糊查询多个返回值的问题 急:WebBrowser,粘贴,复制,快捷键,问题,高手大师帮忙下啊 RadioGroup组件问题 我想把后台的多条记录显示于前台,并能让用户修改部分数据,每条记录后面想附上一个象CHECKBOX之类的小东西,让用户同时提交多条选中的记 关于时间转换的问题 System.Move如何用? 很急!大家帮忙 如何编写函数?? NETWORK LIBRARY 是什么东西啊??
binary
1)SQLServer <-> ADOConnection1 <-> ADOQuery1
ADOQuery1.SQL.Text := 'SELECT * FROM SQLServer_Table WHERE 条件';2)Oracle <-> ADOConnection2 <-> ADOQuery2
ADOQuery2.SQL.Text := 'INSERT INTO Oracle_Table (photo_id, photo) VALUES (:photo_id, :photo)'; 从ADOQuery1一個一個取出記録後、挿入ADOQuery2、
TempStream := TMemoryStream.Create;
try
TBlobField(ADOQuery1.FieldByName('photo')).SaveToStream(TempStream); //TField -> TStream
{...}
TempStream.Position := 0;
ADOQuery2.Parameters.ParamByName('photo').LoadFromStream(TempStream,ftBlob); //TStream -> TField
ADOQuery2.ExecSQL;
finally
TempStream.Free;
end;(注:写的只是一個大体、需要NI自己完善)