Oracle表导入Access 代码实现 有没有办法通过SQL语句 直接实现从Oracle导出到Access中了?因为我存在Oracle和Access两种数据源,但是它们之间有时候需要进行一些相同表的替换。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 这应该没有相应的语句。我这些天正在搞access和oracle之间的数据导出导出问题。我用的是delphi开发的小软件。很简单的。而且你可以转化数据类型,可以在转换的过程中对数据进行处理。下面是delphi开发的两种库之间的导入的代码,你可以参考一下。procedure TForm1.BitBtn1Click(Sender: TObject);varshiye_danwei,aac002,aac003,aac004,syeaac030:string;beginadoquery1.First;while not adoquery1.Eof dobegintryshiye_danwei:=adoquery1.FieldValues['curcompanyid'];exceptshiye_danwei:='';end;tryaac002:=adoquery1.FieldValues['idno'];exceptaac002:='';end;tryaac003:=adoquery1.FieldValues['manname'];exceptaac003:='';end;tryaac004:=adoquery1.FieldValues['sex'];if aac004='0' then aac004:='001' else if aac004='1' then aac004:='002' else aac004:='';exceptaac004:='';end;trysyeaac030:=adoquery1.FieldValues['curcompanydate'];exceptsyeaac030:='';end;adoquery2.Close;adoquery2.SQL.Clear;adoquery2.SQL.Add('insert into sidb.jy_grjcxx(shiye_danwei,aac002,aac003,aac004,syeaac030)' +'values(''' +shiye_danwei+''','''+aac002+''','''+aac003+''','''+aac004+''','''+syeaac030+''')' );adoquery2.ExecSQL;adoquery1.Next;end;//whileadoquery2.Close;adoquery2.SQL.Clear;adoquery2.SQL.Add('select * from sidb.jy_grjcxx');adoquery2.Open;showmessage('数据导入成功!');end;end. insert into temp1 select * from [;database="c:\db1.mdb"].temp用ODBC可不可以执行 Oracle中如何调用MSSQL多表关联语句 如何让oracle中的日期增加一天 Oracle 导入数据时出现问题 连接持续增加,不能释放,请帮忙看看是不是递归引起,如何解决? Oracle817下如何用internal用户连接到远端Oracle数据库 请教Oracle 的查询语句. 请教系统自动创建的数据库有何用处,这是8I和9I的不同,请大家都看看,谢谢 exp导出表报错"指定了冲突模式,导出终止失败"?语句见内 在线等 oracle11g,如何获取建表语句? 存储过程问题 sql优化的问题..求助~~
下面是delphi开发的两种库之间的导入的代码,你可以参考一下。
procedure TForm1.BitBtn1Click(Sender: TObject);
var
shiye_danwei,aac002,aac003,aac004,syeaac030:string;
begin
adoquery1.First;
while not adoquery1.Eof do
begin
try
shiye_danwei:=adoquery1.FieldValues['curcompanyid'];
except
shiye_danwei:='';
end;
try
aac002:=adoquery1.FieldValues['idno'];
except
aac002:='';
end;
try
aac003:=adoquery1.FieldValues['manname'];
except
aac003:='';
end;
try
aac004:=adoquery1.FieldValues['sex'];
if aac004='0' then aac004:='001'
else if aac004='1'
then aac004:='002'
else aac004:='';
except
aac004:='';
end;
try
syeaac030:=adoquery1.FieldValues['curcompanydate'];
except
syeaac030:='';
end;
adoquery2.Close;
adoquery2.SQL.Clear;
adoquery2.SQL.Add('insert into sidb.jy_grjcxx(shiye_danwei,aac002,aac003,aac004,syeaac030)'
+'values('''
+shiye_danwei+''','''+aac002+''','''+aac003+''','''+aac004+''','''+syeaac030+''')' );
adoquery2.ExecSQL;adoquery1.Next;
end;//while
adoquery2.Close;
adoquery2.SQL.Clear;
adoquery2.SQL.Add('select * from sidb.jy_grjcxx');
adoquery2.Open;
showmessage('数据导入成功!');
end;end.