原文:http://www.cnblogs.com/zfanswer/archive/2009/05/20/1425140.html

 

 

本人自己写的程序基于vs2005,Office Excel 2007,Oracle 9i,导入的数据库是Oracle,其实其他数据库也差别不大,改一改引用文件和数据库操作类名就行.转载请注明,谢谢.
另文本参考《电脑知识与技术》2007年第09期,CSDN某提问贴(抱歉忘啦提问人ID了)...特此鸣谢.

从Excel文件读取文件导入数据库,一般情况有以下几个问:
1.执行速度要比较快,否则大量数据写入时有http请求超时的问题;
2.Excel文件有最多65535行数据的限制;
3.数字会有格式变成指数方式的麻烦;
    比如身份证号码,以数字方式保存后,信息末几位有丢失的情况.
4.如果目标是Oracle数据库,其中的日期格式需要自己format一下;
5.对于读取过的Excel一般保存成DataSet,或DataTable,在dt中进行数据的分析整理更新等操作.

解决思路:
1.使用oledb,把excel文件当作数据库处理,效率相对其他五花八门的导出方案来说,算比较高的.得到的excel文件是真正的二进制Excel文件,如果要把导出的数据整理后导回到系统,那么恭喜了,这种方法是你最好的选择.
2.也可以将Excel上传到服务器后再分析导入,不过我的代码中导入的使用率不是很高,不想在服务器上再单独弄个文件夹管理上传一次就再也用不到的xls文件,就没有采用上传;
3.一般人手动输入的Excel数据不会在Sheet1上超出数据限制,就是如果人为地添加了Sheet2,Sheet3...需要分析并提取出来加入到自己的DataSet中再写入数据库;
4.对于DataSet和DataTable的操作,请看本人另外一篇博客(http://www.cnblogs.com/zfanswer/archive/2009/03/30/1425178.html).

代码实例:
个人代码版权所有哦,可以对我的代码和提示进行修改完成自己想得到的功能.

1.首先是吧Excel读取到ds或dt中,在Web环境下,在页面中添加html工具箱里的uploadfile,或自己写<input id="uploadfile" type="file" runat="server"/>,红字记得要加,不然后台代码无法操作该控件.该函数返回一个由Excel转换的DataSet,其实还可以改一下封装,函数有个参数是xls文件地址的path,就更好了,我是写完能运行了懒得改了...

private DataSet Excel_To_Dataset()
   {
       DataSet dsUpload = new DataSet();
       try
       {
           string[] filename = uploadFile.Value.ToString().Split(Convert.ToChar("."));
           string filetype = filename[filename.Length - 1].ToLower();
           if (filetype != "xls")
           {
               Message_lab.Text = "错误:只能提交xls文件,即Excel2003文档!";
           }
           else
           {
               string connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" 
                       + uploadFile.Value.ToString().Replace("\\", "\\\\") + ";Extended Properties=Excel 8.0;";
               OleDbConnection connUpload = new OleDbConnection(connstr);
               connUpload.Open();

               string strSQL = "SELECT * FROM [Sheet1$] WHERE [Yes/No]='Y'";
               OleDbDataAdapter oda = new OleDbDataAdapter(strSQL, connUpload);
               oda.Fill(dsUpload, "[Sheet1$]");

               connUpload.Close();
               return dsUpload;
           }
       }
       catch (Exception ex)
       {
           string e = ex.Message;
       }
       return dsUpload;
   }

 

2.得到Excel转化后的dataset之后,对其中的内容可以进行操作,即写入数据库的数据不一定和Excel的列内容完全对应,比如我的Excel中我的第一个列就是标记,标记该行内容是否写入数据库,所以就要对读取到得ds进行分析和编辑,这一段详见令一篇博客(http://www.cnblogs.com/zfanswer/archive/2009/03/30/1425178.html);如果你只需原封不动的把数据表写入数据库,那么接着看下去吧.

 

#region 把编辑好的DataTable写入数据库
string connstr = ConfigurationManager.ConnectionStrings["ConnectionString"].ConnectionString;
OracleConnection conn = new OracleConnection(connstr);
conn.Open();
int iSuccess = 0, iFail = 0;//记录储存过程中每条指令执行情况
string strInsert = "insert ...";//下边部分需要改成自己的数据库操作
OracleParameter[] parameters =   {
                new   OracleParameter("category_id",OracleDbType.Decimal,ParameterDirection.Input),
                new   OracleParameter("q_question",OracleDbType.Varchar2,200,ParameterDirection.Input),
                new   OracleParameter("q_answer",OracleDbType.Clob,ParameterDirection.Input),
                new   OracleParameter("q_fresh",OracleDbType.Date,ParameterDirection.Input),
                new   OracleParameter("q_author",OracleDbType.Varchar2,20,ParameterDirection.Input)};
OracleCommand cmd = new OracleCommand(strInsert, conn);

for (int iRow = 0; iRow < dsUpload.Tables["[Sheet1$]"].Rows.Count; iRow++)
{
    DataRow[] rows = TitleDT.Select("c_title = '" + Convert.ToString(dsUpload.Tables["[Sheet1$]"].Rows[iRow][1]) + "'");
    parameters[0].Value = int.Parse(rows[0]["id"].ToString());
    parameters[1].Value = Convert.ToString(dsUpload.Tables["[Sheet1$]"].Rows[iRow][2]);
    parameters[2].Value = Convert.ToString(dsUpload.Tables["[Sheet1$]"].Rows[iRow][3]);
    parameters[3].Value = System.DateTime.Now;
    parameters[4].Value = "外部数据导入";

    //每次重新填入参数
    cmd.Parameters.Clear();
    foreach (OracleParameter parameter in parameters)
        cmd.Parameters.Add(parameter);

    if (cmd.ExecuteNonQuery() != 0)
    {
        iSuccess++;
    }
    else
    {
        iFail++;
    }
}
conn.Close();
Message_lab.Text = "成功" + iSuccess + "条,失败" + iFail + "条记录.";
#endregion

 

 

代码都是我自己项目的,不能直接使用,仅做参考.

 

posted on 2010-02-19 21:44  来看一看  阅读(3458)  评论(0编辑  收藏  举报