2016-01-13 137 views
0

我想点击某个按钮时发出Excel报告。 Excel中的数据显示交易号码(收到的ID)和项目(材料名称)。一个交易号码可能包含一个或多个项目。我已经编写了Excel报告。但这总是错误的。下面是代码:从数据库创建Excel

SaveFileDialog sfd = new SaveFileDialog(); 
sfd.Title = "Save Report"; 
sfd.FileName = ("Transaction History Report From").Replace("/","-"); // ganti slah jadi strip 
sfd.Filter = "Excel FIle| *.xlsx"; 

/* 
* open dialog 
* -misValue pakai System.Reflection.Missing 
* -Excel.Range 
* -Excel : app,workbook,worksheet 
* -tarik data 
* -isi ke excel 
* 
*/ 
int row; 
if (sfd.ShowDialog() == DialogResult.OK) 
{ 
    //show dialog berhasil 
    object misValue = System.Reflection.Missing.Value; 
    Excel.Range rng; 

    Excel.Application app = new Excel.Application(); 
    Excel.Workbook wb = app.Workbooks.Add(misValue); // bikin workbook 
    Excel.Worksheet ws = wb.Worksheets.get_Item(1); // nikin worksheet 

    rng = ws.get_Range("A1:I1"); 
    rng.Merge(); 
    rng.Value = "Transaction History Report From" ; 
    rng.Font.Bold = true; 
    rng.Font.Size = 21; 
    rng.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter; 

    row = 3; 
    ws.Cells[row, 1] = "TransactionID"; 
    ws.Cells[row, 2] = "Material"; 

    DataTable dttrID = con.executeSelect("SELECT receivedID FROM TrInventoryReceived WHERE receivedDate BETWEEN '" + dateTimePicker1.Value + "' AND '" + dateTimePicker2.Value + "'"); 
    row++; 
    for (int i = 0; i < dttrID.Rows.Count; i++) //looping sebanyak transaksi yang ada 
    { 
     String transactionID = dttrID.Rows[i][0].ToString(); 
     DataTable material = con.executeSelect("SELECT materialID FROM TrStock WHERE receivedID ='" + transactionID + "'"); 

     ws.Cells[row + 4, 1] = transactionID; 
     row++; 
     for (int j = 0; j < material.Rows.Count; j++) //mengulang sebanyak data yang ada di detail transaction 
     { 
      DataTable Materianame = con.executeSelect("SELECT materialName FROM MsMaterial WHERE materialID ='" + material.Rows[j][0].ToString() + "'"); 

       ws.Cells[row + 4 + j, 2] = Materianame.Rows[0][0].ToString(); 
     } 
    } 

    ws.Columns.AutoFit();//buat nyamain uk7ran cellnyq sama kontenya 

    wb.SaveAs(sfd.FileName, Excel.XlFileFormat.xlOpenXMLWorkbook, misValue, misValue, misValue, misValue, Excel.XlSaveAsAccessMode.xlExclusive, misValue, misValue, misValue, misValue, misValue); 
    wb.Close(true, misValue, misValue); 
    app.Quit(); 

    releaseObject(ws); 
    releaseObject(wb); 
    releaseObject(app);  
    MessageBox.Show("Flie created"); 
} 

错误消息说,“目前还没有排在0位置”

另外,我有ClassConnection连接到我的数据库。下面是代码:

class Connect 
{ 
    SqlConnection con; 
    public Connect() 
    { 
     String connectionString = @"Data Source=.\SQLEXPRESS;AttachDbFilename=" + Application.StartupPath + @"\Database1.mdf;Integrated Security=True;User Instance=True"; 
     con = new SqlConnection(connectionString); 
    } 

    public DataTable executeSelect(String query) 
    { 
     con.Open(); 
     SqlDataAdapter adapter = new SqlDataAdapter(query, con); 
     DataTable dt = new DataTable(); 
     adapter.Fill(dt); 
     con.Close(); 

     return dt; 
    } 

    public void execute(String query) 
    { 

     con.Open(); 
     SqlCommand cmd = new SqlCommand(query, con); 
     cmd.ExecuteNonQuery(); 

     con.Close(); 
    } 
} 

My FOrmDatagGridVIewTrInventoryReceived,底部是在Excel enter image description here

谁能帮助这里的错误是位于我的代码,以及如何TrStockTable

结果样本我解决这个问题吗?

+0

'IndexOutOfRangeException' [当使用无效索引访问数组或集合的成员时引发IndexOutOfRangeException异常](https://msdn.microsoft.com/zh-cn/library/system.indexoutofrangeexception (v = vs.110).aspx)或[Read This](http://stackoverflow.com/questions/20940979/what-is-indexoutofrangeexception-and-how-do-i-fix-it) –

+0

我如何修复我的代码? –

+0

是的,这是可以解决的。您必须在您的for循环中逐步调试,然后才会抛出异常,您将看到数组的超范围索引。 –

回答

0

也许这可以帮助你。这是一种从数据库中导出表格并将其保存为excel文件的方法。 它使用SqlConnection连接到数据库。当它读取数据时,它将它们同时写入excel文件。

这种方法将数据导出到Excel的文件:

public static void DataBaseToExcel(string connectionString, string table, string saveAs) 
    { 
     Excel.Application app = new Excel.Application(); 
     Excel.Workbook workbook = app.Workbooks.Add(System.Reflection.Missing.Value); 
     app.ActiveWindow.DisplayGridlines = false; 
     Excel.Worksheet worksheet = workbook.Worksheets.Item[1]; 
     List<string> ColumnsNames = GetColumnsNames(connectionString, table); 
     int Row = 2; 
     for (int i = 0; i != ColumnsNames.Count; i++) 
     { 
      worksheet.Cells[1, i + 1].Value = ColumnsNames[i]; 
     } 
     using (SqlConnection connection = new SqlConnection(connectionString)) 
     { 
      string commandString = "SELECT * FROM " + table; 
      connection.Open(); 
      using (SqlCommand command = connection.CreateCommand()) 
      { 
       command.CommandText = commandString; 
       using (SqlDataReader reader = command.ExecuteReader()) 
       { 
        while (reader.Read()) 
        { 
         for (int Column = 0; Column != ColumnsNames.Count; Column++) 
         { 
          worksheet.Cells[Row, Column + 1] = reader.GetValue(Column); 
         } 
         Row++; 
        } 
       } 
      } 
      connection.Close(); 
     } 
     workbook.SaveAs(saveAs); 
     app.Quit(); 
    } 

另外,它还包含列标题,我检索与此方法:

public static List<string> GetColumnsNames(string connectionString, string table) 
    { 
     List<string> columnNames = new List<string>(); 
     using (SqlConnection connection = new SqlConnection(connectionString)) 
     { 
      using (SqlCommand command = connection.CreateCommand()) 
      { 
       command.CommandText = "select c.name from sys.columns c inner join sys.tables t on t.object_id = c.object_id and t.name = '" + table + "' and t.type = 'U'"; 
       connection.Open(); 
       using (SqlDataReader reader = command.ExecuteReader()) 
       { 
        while (reader.Read()) 
        { 
         columnNames.Add(reader.GetString(0)); 
        } 
       } 
       connection.Close(); 
      } 
     } 
     return columnNames; 
    } 

也许你不得不修改这些方法为你的目的。