SQL SERVER数据导出到Access(只用SQL语句实现)(100分)

  • 主题发起人 主题发起人 江西的delphi
  • 开始时间 开始时间
1、连接ACCESS
EXEC sp_addlinkedserver
@server = 'Mktg',
@provider = 'Microsoft.Jet.OLEDB.4.0',
@srvproduct = 'OLE DB Provider for Jet',
@datasrc = 'C:/My Documents/czf/蚌埠数据恢复/bbnew.mdb'

sp_addlinkedsrvlogin 'Mktg', 'false', '12345678', 'Admin', ''

insert into laborage_provide_table select * from Mktg...dbo_LABORAGE_PROVIDE_TABLE1 where adm_career_company_code = 'B049002'

sp_droplinkedsrvlogin 'Mktg','12345678'
sp_dropserver 'Mktg'



2、连接EXCEL
EXEC sp_addlinkedserver 'ExcelSource',
'Jet 4.0',
'Microsoft.Jet.OLEDB.4.0',
'D:/我的工作/大通物流/Code0/zhiyi_FG.XLS',
NULL,
'Excel 8.0'

EXEC sp_addlinkedsrvlogin ExcelSource, FALSE, NULL, NULL
select * from ExcelSource...Sheet1$
EXEC sp_droplinkedsrvlogin 'ExcelSource', NULL
EXEC sp_dropserver ExcelSource

用TADOQUERY执行以上语句即可。问题是如果SQL数据库 不在本地的话,MDB数据库所在文件夹要完全共享。
 
后退
顶部