我怎么在程式中把EXCEL导入到SQL  SERVER中,
不能有SQL SERVER的导入导出的工具,我希望有程式中实现

解决方案 »

  1.   

    /********************** EXCEL导到远程SQL
    insert OPENDATASOURCE(
             'SQLOLEDB',
             'Data Source=远程ip;User ID=sa;Password=密码'
             ).库名.dbo.表名 (列名1,列名2)
    SELECT 列名1,列名2
    FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
      'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
      

  2.   

    查一查sqlserver的系统存储过程,有专门做导入导出的。
      

  3.   

    EXCEL TO SQL SERVER
    先用ODBC建立一个数据源,数据源指向sql server的表,然后用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;//实现导入
      

  4.   

    OPENDATASOURCE,或者用ado 连接Excel文件即可