想在需要做将数据库的数据导入导出,不知道怎么做了,开始的时候打算用excel做的,做到最后了突然发现表里面有二进制文件,弄不成了 求救啊
下面是我弄的代码
string Sqlconection = @"server=(local)\SQLEXPRESS;database=GeneralSurveySystemDB;Trusted_Connection=True";
SqlConnection objConnection = new SqlConnection(Sqlconection);
SqlCommand cmd = new SqlCommand("Select * from VenuesCheckTable", objConnection);
DataSet objDataset = new System.Data.DataSet();
SqlDataAdapter objAdapter = new SqlDataAdapter(cmd);
objConnection.Open();
objAdapter.Fill(objDataset, "Excel");
objConnection.Close();
Microsoft.Office.Interop.Excel.Application xlsApp = new Microsoft.Office.Interop.Excel.Application();
if (xlsApp == null)
{
MessageBox.Show("请确认你的电脑上安装有OFFICE软件");
return;
}
Workbook workbook = xlsApp.Workbooks.Open(@"D:\xxx.xls", Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
Worksheet mySheet = workbook.Sheets[1] as Worksheet;
int iMaxRow = objDataset.Tables["Excel"].Rows.Count;
int iMaxCol = objDataset.Tables["Excel"].Columns.Count;
for (int iRow = 0; iRow < iMaxRow; iRow++)
{
for (int iCol = 0; iCol < iMaxCol; iCol++)
{
xlsApp.Cells[iRow + 2, iCol + 1] = objDataset.Tables["Excel"].Rows[iRow][iCol].ToString();
}
}
if (File.Exists(@"C:\xxx.xls") == true)
{
File.Delete(@"C:\xxx.xls");
}
object missing = System.Reflection.Missing.Value;
workbook.Saved = true;
workbook.SaveCopyAs(@"C:\xxx.xls");
workbook.Close(true, Type.Missing, Type.Missing);
workbook = null;
xlsApp.Quit();
xlsApp = null;
MessageBox.Show("成功");
下面是我弄的代码
string Sqlconection = @"server=(local)\SQLEXPRESS;database=GeneralSurveySystemDB;Trusted_Connection=True";
SqlConnection objConnection = new SqlConnection(Sqlconection);
SqlCommand cmd = new SqlCommand("Select * from VenuesCheckTable", objConnection);
DataSet objDataset = new System.Data.DataSet();
SqlDataAdapter objAdapter = new SqlDataAdapter(cmd);
objConnection.Open();
objAdapter.Fill(objDataset, "Excel");
objConnection.Close();
Microsoft.Office.Interop.Excel.Application xlsApp = new Microsoft.Office.Interop.Excel.Application();
if (xlsApp == null)
{
MessageBox.Show("请确认你的电脑上安装有OFFICE软件");
return;
}
Workbook workbook = xlsApp.Workbooks.Open(@"D:\xxx.xls", Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
Worksheet mySheet = workbook.Sheets[1] as Worksheet;
int iMaxRow = objDataset.Tables["Excel"].Rows.Count;
int iMaxCol = objDataset.Tables["Excel"].Columns.Count;
for (int iRow = 0; iRow < iMaxRow; iRow++)
{
for (int iCol = 0; iCol < iMaxCol; iCol++)
{
xlsApp.Cells[iRow + 2, iCol + 1] = objDataset.Tables["Excel"].Rows[iRow][iCol].ToString();
}
}
if (File.Exists(@"C:\xxx.xls") == true)
{
File.Delete(@"C:\xxx.xls");
}
object missing = System.Reflection.Missing.Value;
workbook.Saved = true;
workbook.SaveCopyAs(@"C:\xxx.xls");
workbook.Close(true, Type.Missing, Type.Missing);
workbook = null;
xlsApp.Quit();
xlsApp = null;
MessageBox.Show("成功");
解决方案 »
- 【源码共享 】- 多线程版仿PS的缩放模糊(ZoomBlur),支持进度显示、中途取消、适时更新等。
- 请问C#中DataGridView修改了显示顺序,导出的时候该怎样处理
- C# 多窗体中,怎么在一个窗体中用到另一个的控件
- 上次写错
- access 连接问题 在线等
- 〓〓c#无法在windows2000下打开access数据库~!!!急啊。。
- 提供了数据表,请高手帮忙设计个.NET的曲线图(在线等一晚上,急)
- 输入流是无效的二进制格式。开始内容(以字节为单位.................,这个是不是.net2.o的Bug?
- 如何将字符转化为ASCII码值, 如输入a,能得到97 ?
- 关于邮件附件的问题,请高手帮忙
- C# TCP网络编程问题
- PC通过5个串口给下位机发送命令并取会数据。这5个可以分别不受干扰的进行吗?
Parameters = new Object[1] { "'" + this.alarmlist.Tables[0].Rows[j][i].ToString() };