Windows 2000 Server
Office 2000

解决方案 »

  1.   

    这是我的程序中的一段:
          ADOConnection1.Close;
          ADOConnection1.Connected:=false;
          ADOConnection1.ConnectionString:='';
          str:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;Data Source=';
          AppPath:=ExtractFileDir(Application.ExeName);
          str:=str+AppPath+'\'+Node.Text;
          ADOConnection1.ConnectionString:=str+'.xls;Mode=Share Deny None;'+'Extended Properties="";Jet OLEDB:System database="";'+'Jet OLEDB:Registry Path="";'+'Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=4;'+'Jet OLEDB:Database Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;'+'Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";'+'Jet OLEDB:Create System Database=False;'+'Jet OLEDB:Encrypt Database=False;'+'Jet OLEDB:Don''t Copy Locale on Compact=False;'+'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False';
          ADOConnection1.Connected:=true;
          ADOConnection1.Open;
      

  2.   

    应该是改一个属性,ADOTABLE中的什么DIRECTLY的FALSE改成TRUE
    还有一点是把扩展属性改为excel 8。0
    不好意思,记不清了
    或者用ADO通过ODBC连接,很好用
    我正在做这个,你可以在QQ上留言,我告诉你详细的方法
    QQ;15189757
      

  3.   

    在ado连接的最后一步中的Extended Properties的值改为excel 8.0即可。