怎么从表A把Jepg属性的字段拷贝到表B?数据库是Access。(50分)

  • 主题发起人 主题发起人 abv
  • 开始时间 开始时间
A

abv

Unregistered / Unconfirmed
GUEST, unregistred user!
表A: Name | Photo |。。。|

表B: No.| Photo| Name|。。。

从表A中选择出一个匹配的Photo和Name等若干值,然后Update到表B中。不知道Jpeg文件是什么类型,怎么传送?数据库是Access。
 
TBlobfield(q1.fieldbyname('字段名')).loadfromfile(o1.filename)
 
query1对应表A query2对应表B
建立两表的主从关系或通过查询条件来使两个表中的NAME字段相对应
var Astream:TStream;
begin
//...
Astream:TStream.Create;
TBlobfield(query1.fieldbyname('Photo')).SavetoStreame(Astream);
Asteam.position:=0;
TBlobfield(query2.fieldbyname('Photo')).LoadFromStream(Asteam);
//...
end;
 
A,B表不是主从关系。是用户选择一些条件和ID值,然后从A表中查找出符合这些条件的记录,再添加到B表中相应的ID值后面。B表中的ID字段是本身就存在的。
 
有区别么 哈哈
 
不明白,请详解。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部