哪位大侠肯帮兄弟一把:如何用delphi6将一Sql server数据库中的几个表导入到另一Access数据库中?这里sql server表和access表的结构大致相同,但数据类型有些差别,因为两个数据库本身定义的数据类型有些差别。
大力感谢,谢谢!!!!!
大力感谢,谢谢!!!!!
解决方案 »
- delphi现在是不是不能用indy控件开发邮件发送系统了?
- 如何在access里面插入一条记录
- 多线程中执行SQL语句报错
- 100分(因为他只允许最多给100分)定义类的时候出I/O错误
- dbgrided中的DrawcolumnCell事件。如何将组别中带组字的那一行字体变为红色?(下图)
- 在三层设计中为什么不能对 DBGridEH 的 Columns 进行编辑
- 高分求解TDateTimePicker的问题
- 从来未遇到过的问题.....
- 如何将table或query输出为txt文本?
- 谁能给我一点Delphi中关于Socket编程的资料
- 降序排列 和升序排列
- 简单问题!!怎么将字符串放入/转换为TStream,超值50分!
一边取出来数据---循环插入就可以了
我有ACCESS TO SQL 的代码
马上给你
code,name,insertstr:string;
begin
with adoquery1 do
begin
close;
sql.Clear;
sql.Add('select * from 常熟白雪店');
open;
end ;
for i:=0 to adoquery1.RecordCount - 1 do
begin
code :=adoquery1.Fields[7].AsString ;
code:= copy(code,1,7) ;
with adoquery3 do
begin
close;
sql.Clear;
sql.Add('select * from DianNei1 where ProductBarcode='''+code+'''');
open;
end;
name:= adoquery1.Fields[5].AsString ;
insertstr:='insert into DianNei values('''+code+''','''+name+''',2)';
if adoquery3.RecordCount <= 0 then
begin
with adoquery2 do
begin
close;
sql.Clear ;
sql.Add(insertstr);
execsql;
end;
end;
adoquery1.Next ;
end;
showmessage('OK');
end;