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位置”
另外,我有Class
Connection
连接到我的数据库。下面是代码:
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 FOrm 顶DatagGridVIew
为TrInventoryReceived
,底部是在Excel enter image description here
谁能帮助这里的错误是位于我的代码,以及如何TrStock
Table
结果样本我解决这个问题吗?
'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) –
我如何修复我的代码? –
是的,这是可以解决的。您必须在您的for循环中逐步调试,然后才会抛出异常,您将看到数组的超范围索引。 –