1.问题: 在用DELPHI 7编程实现"EXCEL数据导入MS SQL SERVER 2000"时提示: “已拒绝OLE DB提供程序‘Microsoft.Jet.OLEDB.4.0’的特殊访问,必须通过链接服务器来访问此提供程序。” 2.现状: A:MS SQL SERVER 2000数据导入EXCEL程序如下: -----程序运行是成功的! 第一:连接数据库:Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\chengji.xls;Extended Properties=excel 8.0 第二:导入数据:SELECT bianhao,yuwen into cj_yuwen FROM a_chengji IN [ODBC][ODBC;Driver=SQL server;UID=sys;PWD=;Server=YUAN;DataBase=tbms;] 说明:将a_chengji表中的bianhao,yuwen列的数据导出到e:\chengji.xls的cj_yuwen工作表中. B:在MS SQL SERVER 2000查询分析器执行如下命令: ----命令运行是成功的! insert into a_chengji (bianhao,yuwen,shuxue,yingyu) select bianhao,yuwen,shuxue,yingyu FROM OpenDataSource('Microsoft.Jet.OLEDB.4.0','Data Source="e:\chengji.xls";Extended Properties="Excel 8.0;HDR=Yes;";Persist Security Info=False')...chengji$ 说明: 将e:\chengji.xls的chengji工作表中bianhao,yuwen,shuxue,yingyu列的数据导出到a_chengji表的bianhao,yuwen,shuxue,yingyu列中. C:在DELPHI 7编程实现"EXCEL数据导入MS SQL SERVER 2000": procedure Tf_chengji.BitBtn1Click(Sender: TObject); var s_sql:string; begin s_sql:'insert into a_chengji (bianhao,yuwen,shuxue,yingyu) select bianhao,yuwen,shuxue,yingyu FROM OpenDataSource ('''+'Microsoft.Jet.OLEDB.4.0'+''''+ ','+''''+'Data Source="'+'e:\chengji.xls'+'";Extended Properties="Excel 8.0;HDR=Yes;";Persist Security Info=False'+''''+')...chengji$'; ADOConnection1.Connected:=false; ADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;Persist Security Info=false;User ID=sys;Initial Catalog=tbms'; ADOConnection1.Connected:=true; ADOConnection1.Execute(s_sql); end; 说明:MS SQL SERVER 2000本地数据库tbms,用户名:sys,密码:无。 运行时,提示: “已拒绝OLE DB提供程序‘Microsoft.Jet.OLEDB.4.0’的特殊访问,必须通过链接服务器来访问此提供程序。” 3.分析: A和B的运行成功,说明MS SQL SERVER 2000和EXCEL是正常的,我们排除了MS SQL SERVER 2000和EXCEL异常的可能性。问题就出在DELPHI 7的程序上,B中命令运行成功,说明C中的s_sql语句是正确的,问题就应该在“链接服务器”上。 4.解决方案: A:找出被拒绝特殊访问的原因,从而解决此问题:“通过对TADOConnection控件ADOConnection1的属性设置”。 B:新建“链接服务器”,从而访问此提供程序: sp_addlinkedserver N'Excel', N'Jet 4.0', N'Microsoft.Jet.OLEDB.4.0', N'e:\chengji.xls', NULL, N'Excel 5.0' GO exec sp_addlinkedsrvlogin N'Excel', false, sa, N'ADMIN', NULL 可我在查询其chengji数据时:提示说找不到chengji表,或用户名不具备访问权限! SELECT * FROM EXCEL...chengji 5.新问题: A:如何设置TADOConnection控件ADOConnection1的属性设置,以解决其被拒绝??? B:如何编写sp_addlinkedsrvlogin,以使“用户名:sys,密码:无”有权限???? C: 如果用sp_addlinkedserver建立新链接服务器,又应该如何在DELPHI 7编程实现"EXCEL数据导入MS SQL SERVER 2000"???
|