Question

我正在尝试将查询结果集导出到Excel工作表中。我需要运行8个查询，每个查询都是excel文件中的不同表单。我还需要在工作表周围添加一些格式（添加标题，使报表看起来不错等）。

目前，我的代码只运行一个查询（因此只有一张数据）。这需要很长的时间来填充4000行7列，这是一个很小的样本。有没有更好的方法来做到这一点？非常感谢！

Excel.Application xlApp;
        Excel.Workbook xlWorkBook;
        Excel.Worksheet xlWorkSheet;
        object misValue = System.Reflection.Missing.Value;
        string data = null;
        int i = 0;
        int j = 0; 

        xlApp = new Excel.ApplicationClass();
        xlWorkBook = xlApp.Workbooks.Add(misValue);
        xlWorkSheet = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);

        string cs = "oracle connection string filtered for online posting";

        DataSet ds = new DataSet();

        OracleConnection oconn = new OracleConnection(cs);
        oconn.Open();
        Model_Netstat netstat = new Model_Netstat();
        OracleCommand oc = new OracleCommand(netstat.queryNetstatAll(session.caseName), oconn);
        oc.CommandType = CommandType.Text;

        OracleDataAdapter oda = new OracleDataAdapter(oc);
        try
        {

            oda.Fill(ds);
        } catch(Exception ex)
        {
            Console.Write(ex.Message);
        }

        for (i = 0; i <= ds.Tables[0].Rows.Count - 1; i++)
        {
            for (j = 0; j <= ds.Tables[0].Columns.Count - 1; j++)
            {
                data = ds.Tables[0].Rows[i].ItemArray[j].ToString();
                xlWorkSheet.Cells[i + 1, j + 1] = data;
            }
        }

        xlWorkBook.SaveAs("test.xls", Excel.XlFileFormat.xlWorkbookNormal, misValue, misValue, misValue, misValue, Excel.XlSaveAsAccessMode.xlExclusive, misValue, misValue, misValue, misValue, misValue);
        xlWorkBook.Close(true, misValue, misValue);
        xlApp.Quit();

        releaseObject(xlWorkSheet);
        releaseObject(xlWorkBook);
        releaseObject(xlApp);

Answer 1

检查Microsoft的免费OpenXML SDK 2，它可以在没有自动化的情况下完成所需的操作，而且速度更快，并且在ASP.NET中也可以使用（那里不支持自动化）......

使用C Sharp将带有ODP.NET的Oracle数据导出到Excel文件中

1 个答案: