我将EXCEL文件导入SQL代码如下:
SELECT * into member
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
 'Data Source="d:\";User ID=Admin;Password=;Extended properties=excel 97-2000')...member
报错:
服务器: 消息 7399,级别 16,状态 1,行 1
OLE DB 提供程序 'Microsoft.Jet.OLEDB.4.0' 报错。 
[OLE/DB provider returned message: 找不到可安装的 ISAM。]
改为:
SELECT * into member
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
 'Data Source="d:\";User ID=Admin;Password=;Extended properties=excel 8.0')...member
报错:
服务器: 消息 7399,级别 16,状态 1,行 1
OLE DB 提供程序 'Microsoft.Jet.OLEDB.4.0' 报错。提供程序未给出有关错误的任何信息。
该如何解决.我的excel是2000.这个函数导dbf没问题

解决方案 »

  1.   

    ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+
          ExtractFilePath('Main.exe')+'ShuiWu.mdb;Persist Security Info=False';看看我的,正确的!!!
      

  2.   

    'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
        ExtractFilePath(Application.ExeName) +
        'sixdata.mdb;Persist Security Info=False;Jet OLEDB:Database;';
    我写的是连接access的 excel应该没有什么区别的吧
      

  3.   

    还是不行,那位大哥把SQL语句可以写出来,谢谢!
      

  4.   

    ado指向你的SQLSERVER:
    ADOQUERY:
    select * into zqqq from [try$] in "d:\rsc\try1.xls" "excel 8.0;"
      

  5.   


    ar
     sSQL:string;
    begin
     qry1.Close;
     qry1.SQL.Clear;
     sSQL :=
      'INSERT INTO cardTYPE  ( CARDNO,worker_id, DEPARTMENT_ID )'
      + ' SELECT CARDNO,worker_id, DEPARTMENT_ID '
      + ' FROM [excel 8.0;database=' + XlsName + '].[sheet1$]';
     qry1.SQL.Text := sSQL;
     qry1.Execsql;
    end;