C#中如何将数据库数据直接导出到Excel?
我的数据库是Oracle,我已经把需要导出的数据放到了DataSet里了,请问怎么导出到一个指定录下的Excel里,而且还能指定Excel名称。最好给源码,谢谢。解决了大...
我的数据库是Oracle,我已经把需要导出的数据放到了DataSet里了,请问怎么导出到一个指定录下的Excel里,而且还能指定Excel名称。最好给源码,谢谢。解决了大量追加分。
展开
1个回答
2013-08-08
展开全部
'初始化excel工作环境
Dim exapp As Microsoft.Office.Interop.Excel.Application = New Microsoft.Office.Interop.Excel.Application '定义excel应用程序
Dim exbook As Microsoft.Office.Interop.Excel.Workbook '定义工作簿
Dim exsheet As Microsoft.Office.Interop.Excel.Worksheet '定义原始数据工作表
Try
'得到EXCEL表格
exapp.Visible = False '显示excel 程序
exbook = exapp.Workbooks.Open("f:\副本服务站库1.xls") '打开已在工作薄
exsheet = exbook.Sheets(1) '获得原始数据工作表第一页 '写入数据(按照单元格循环写入)
'具体写入数据样式
exsheet.Cells(1, 1).Value=xxxxx 'xxxxx为任意数据 '保存EXCEL表格
exbook.Save()
Catch ex As Exception
Response.Write(ex.Message)
'关闭EXCEL表格
exapp.Workbooks.Close()
End Try
'关闭EXCEL表格
exapp.Workbooks.Close() 这个是vb.NET的代码,语法可能不一样,但是方法调用应该一样的,读取数据库数据按照你自己的来然后就是把数据写入EXCEL文件exsheet.Cells(1, 1).Value=xxxxx这个是往A1单元格写入变量XXXX的值具体的数据你自己写吧
Dim exapp As Microsoft.Office.Interop.Excel.Application = New Microsoft.Office.Interop.Excel.Application '定义excel应用程序
Dim exbook As Microsoft.Office.Interop.Excel.Workbook '定义工作簿
Dim exsheet As Microsoft.Office.Interop.Excel.Worksheet '定义原始数据工作表
Try
'得到EXCEL表格
exapp.Visible = False '显示excel 程序
exbook = exapp.Workbooks.Open("f:\副本服务站库1.xls") '打开已在工作薄
exsheet = exbook.Sheets(1) '获得原始数据工作表第一页 '写入数据(按照单元格循环写入)
'具体写入数据样式
exsheet.Cells(1, 1).Value=xxxxx 'xxxxx为任意数据 '保存EXCEL表格
exbook.Save()
Catch ex As Exception
Response.Write(ex.Message)
'关闭EXCEL表格
exapp.Workbooks.Close()
End Try
'关闭EXCEL表格
exapp.Workbooks.Close() 这个是vb.NET的代码,语法可能不一样,但是方法调用应该一样的,读取数据库数据按照你自己的来然后就是把数据写入EXCEL文件exsheet.Cells(1, 1).Value=xxxxx这个是往A1单元格写入变量XXXX的值具体的数据你自己写吧
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询