如何将Excel的数据调入到Dbgrid中显示?如何将Dbgrid显示的数据存为文本文件?
  
 
 
 回复人: Gongshl(阿单) ( ) 信誉:99  2003-10-30 16:34:00  得分:0 
 
 
  将Excel的数据调入到Dbgrid中显示和显示数据库表的数据是一样的,
下面是连接Excel字符串:
  connstr='Provider=MSDASQL.1;Persist Security Info=False;'+
          'Connect Timeout=15;Extended Properties="DBQ='+
          '%S;Driver={Microsoft Excel Driver (*.xls)};'+   
          'DriverId=790;FIL=excel 8.0;'+
          'MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;'+      
          'ReadOnly=1;SafeTransactions=0;Threads=3;UID=admin;'+
          'UserCommitSync=Yes;";Locale Identifier=2052';将里面的%S替换为Excel文件名即可.查询语句为
Sql.Text:='Select * from `'+sFileName+'`.`sheet1$`';
query1.savetofile('s.txt')即可保存为文本文件
  
 
Top 
 
 
 
 
    
 
 
 管理 | 关闭窗口