1.問(wèn)題：
在用DELPHI 7編程實(shí)現(xiàn)"EXCEL數(shù)據(jù)導(dǎo)入MS SQL SERVER 2000"時(shí)提示：
“已拒絕OLE DB提供程序‘Microsoft.Jet.OLEDB.4.0’的特殊訪(fǎng)問(wèn)，必須通過(guò)鏈接服務(wù)器來(lái)訪(fǎng)問(wèn)此提供程序。”
2.現(xiàn)狀：
   A:MS SQL SERVER 2000數(shù)據(jù)導(dǎo)入EXCEL程序如下：  -----程序運(yùn)行是成功的！
   第一：連接數(shù)據(jù)庫(kù)：Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\chengji.xls;Extended Properties=excel 8.0
   第二：導(dǎo)入數(shù)據(jù)：SELECT bianhao,yuwen into cj_yuwen  FROM a_chengji IN [ODBC][ODBC;Driver=SQL   server;UID=sys;PWD=;Server=YUAN;DataBase=tbms;]
    說(shuō)明：將a_chengji表中的bianhao,yuwen列的數(shù)據(jù)導(dǎo)出到e:\chengji.xls的cj_yuwen工作表中.
   B:在MS SQL SERVER 2000查詢(xún)分析器執(zhí)行如下命令：  ----命令運(yùn)行是成功的！
    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$
    說(shuō)明: 將e:\chengji.xls的chengji工作表中bianhao,yuwen,shuxue,yingyu列的數(shù)據(jù)導(dǎo)出到a_chengji表的bianhao,yuwen,shuxue,yingyu列中.
   C：在DELPHI 7編程實(shí)現(xiàn)"EXCEL數(shù)據(jù)導(dǎo)入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;
  說(shuō)明：MS SQL SERVER 2000本地?cái)?shù)據(jù)庫(kù)tbms，用戶(hù)名：sys,密碼：無(wú)。
  運(yùn)行時(shí)，提示：
  “已拒絕OLE DB提供程序‘Microsoft.Jet.OLEDB.4.0’的特殊訪(fǎng)問(wèn)，必須通過(guò)鏈接服務(wù)器來(lái)訪(fǎng)問(wèn)此提供程序。”
3.分析：
  A和B的運(yùn)行成功，說(shuō)明MS SQL SERVER 2000和EXCEL是正常的，我們排除了MS SQL SERVER 2000和EXCEL異常的可能性。問(wèn)題就出在DELPHI 7的程序上，B中命令運(yùn)行成功，說(shuō)明C中的s_sql語(yǔ)句是正確的，問(wèn)題就應(yīng)該在“鏈接服務(wù)器”上。
4.解決方案：
  A：找出被拒絕特殊訪(fǎng)問(wèn)的原因，從而解決此問(wèn)題：“通過(guò)對(duì)TADOConnection控件ADOConnection1的屬性設(shè)置”。
  B：新建“鏈接服務(wù)器”，從而訪(fǎng)問(wèn)此提供程序：
     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
     可我在查詢(xún)其chengji數(shù)據(jù)時(shí)：提示說(shuō)找不到chengji表，或用戶(hù)名不具備訪(fǎng)問(wèn)權(quán)限！
     SELECT * FROM EXCEL...chengji
5.新問(wèn)題：
A：如何設(shè)置TADOConnection控件ADOConnection1的屬性設(shè)置，以解決其被拒絕？？？
B：如何編寫(xiě)sp_addlinkedsrvlogin，以使“用戶(hù)名：sys,密碼：無(wú)”有權(quán)限？？？？
C: 如果用sp_addlinkedserver建立新鏈接服務(wù)器，又應(yīng)該如何在DELPHI 7編程實(shí)現(xiàn)"EXCEL數(shù)據(jù)導(dǎo)入MS SQL SERVER 2000"？？？