关于excel

Question

通过BDE或ADO配置数据库引擎,通过一个TTAble,TQuery.TADODataSet等控件将其读出来,显示在相关联的DBGrid中.

Answer 1

DATABASE NAME=
USER NAME=
ODBC DSN=
OPEN MODE=READ/WRITE
SCHEMA CACHE SIZE=8
SQLQRYMODE=
LANGDRIVER=
SQLPASSTHRU MODE=SHARED AUTOCOMMIT
SCHEMA CACHE TIME=-1
MAX ROWS=-1
BATCH COUNT=200
ENABLE SCHEMA CACHE=FALSE
SCHEMA CACHE DIR=
ENABLE BCD=FALSE
ROWSET SIZE=20
BLOBS TO CACHE=64
PASSWORD=
都应该填写什么

Answer 2

procedure TForm1.importBtnClick(Sender: TObject);
var
  I,J,k,Row,Col,sRow,sCol: integer;
  ExcelFile: string;
  TmpString: String;
begin
  ExcelFile := Trim(Edit1.Text);
  Row := strtoint(Edit4.Text);  //the total Rows
  Col := strtoint(Edit5.Text);  //the total Columns
  sRow := strtoint(Edit2.Text);    //the start of Row
  sCol := strtoint(Edit3.Text);    //the start of Column
  try
    if VarIsEmpty(XlsApp) then
      XlsApp := CreateOleObject('Excel.Application');
    XlsSheet := XlsApp.workbooks.open(ExcelFile);
    for I := sRow to (sRow + Row) - 1 do   //from the start row to the end row
    begin
      k := 0;     //the item of the field
      TmpString := '';
      Table1.open;
      Table1.Append;
      for J := sCol to (sCol + Col) - 1 do  //from the start column to the end column
      begin
        TmpString := XlsSheet.ActiveSheet.Cells[I,J].Text;
        Table1.Fields[k].AsString := TmpString;
        k := k + 1;
      end;
      Table1.Post;
    end;
    XlsApp.Visible := true;
  except
    XlsSheet.close;
    XlsApp.Application.quit;
    XlsApp := Unassigned;
    XlsSheet := Unassigned;
  end;
end;

Answer 3

通过BDE或ADO配置数据库引擎,通过一个TTAble,TQuery.TADODataSet等控件将其读出来
Tquery and tadodataset 都要cmdtxt我的sql该怎么写

Answer 4

用TADODataSet是cmdtxt的内容填什么
用Ttable tablename是什么??

Answer 5

根据mengbo(心有独钟) 的上下文，XlsApp是一个 olevariant,只不过没有在这个过程中声明
mengbo(心有独钟) 思路是创建一个excel ole对象，用它来打开excel文件
读取当前激活表页的每一个单元格，并插入到对应的字段中，完成一行提交一次也是一种办法adoconnection.connectionString='Provider=MSDASQL.1;Persist Security Info=False;Mode=Read;Extended Properties="DSN=Excel Files;DBQ=C:\;DriverId=790;MaxBufferSize=2048;PageTimeout=5;"';
用adoquery.connection:=adoconnection;
adoQuery.SQL:='select * from [sheet1!]';以上是核心的几句伪代码

Answer 6

怎样用Delphi把.dat文件中的数据调出来？
谢谢！！！！！！！！！

Answer 7

select * from [sheet1!]
 提示:invalid bracketing of name 'sheet1!'

Answer 8

我用odbc已经建立起了连接,test connect ok；
[sheet1！]是什么含义；
平时写sql的时候，from + 表名，[sheet1!]是什么东东

Answer 9

ADOQuery.Close;
ADOQuery.connectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\bk.xls;Extended Properties=Excel 8.0;Mode=ReadWrite|Share Deny None;Persist Security Info=False';
ADOQuery.sql.text:='select * from [Sheet1$]';
ADOQuery.open;

Answer 10

对于excel中的数据,如果同一列的数据格式不一样有数字和串。读到tquery中的
数据会缺少如下：
       我
       你
       他
       12
那么数字12不会被tquery接收，这是怎么回事，怎么解决

Answer 11

问题是出在从excel到Tquery的时候,加asstring的话加在哪
从tquery中读出数据的时候showmessage(adoquery1.fields[i].asstring)
到12的时候,是空的

Answer 12

这是由数据引擎负责转换的，客户端无法干预你只能对excel文件进行规范后在处理（用text函数）
或者使用逐个单元读出的方法ps:你可以要求数据提供者提供规范的数据