求解:如何利用将excel文件的数据导入到dbf数据库中?

解决方案 »

  1.   

    EXCEL TO *.dbf
    先用ODBC建立一个数据源,数据源指向*.的表,然后用TTABLE控件联上数据库,
    再建立一个OleObject,然后用Append,Post把数据导入到EXCEL表。
    实例:
    var
      MSExcel:Variant;//定义一个全程变量  MSExcel := CreateOleObject('Excel.Application');
      MSExcel.WorkBooks.Open(Edit1.Text);//创建一个OleObject
      
            Table.Active:=true;
            Table.Append;
            Table.FieldByName('字段名').Value:=MSExcel.Cells[rows_i,1].Value;
            //上面一句可以根据字段的多少多次引用。
            Table.Post;//实现导入
      

  2.   

    再来一个:
    ADO连接Excel或ACCESS使用ADOQuery控件,
    BDE连接的Paradox数据库使用Table或QUERY控件。
    插入数据方法:
    使用程序
      1.Open ADOQuery;
        Open Table;
        ADOQuery.First;
      2.while not ADOQuery.eof do
          begin
            Table.Append;
            Table.Field1.value:=ADOQuery.Field1.Value;   字段赋值
            Table.Field1.value:=ADOQuery.Field1.Value;   
            ...
            Table.Post; 
            ADOQuery.Next
          end;
       3.ADOQuery.Close;
         Table.Close;或者使用SQL语句
        Insert into Paradox.name (Field1,Field2...) 
            Value (Select Field1,Field2... from ADO.Name)
      

  3.   

    EDIT.TEXT是从界面上得到的一个输入名字,用来做创建的EXCEL表名
      

  4.   

    成功了,但是我却不知道怎样判断EXCEL工作簿中怎么判断用哪个工作表,
    工作表中有多少行数据怎么判断呢?