今天看啥
热点:

ActiveReport导出功能


在网上查了不少资料,有个讲解比较完整的方案,我在系统中一试,发现并不好用,在使用导出功能,必须是引用几个命名空间

\

接下来,导出功能就变得更加简单

Dim xlsExport1 As New DataDynamics.ActiveReports.Export.Xls.XlsExport()
Dim saveDlg As New SaveFileDialog()
saveDlg.Filter = "Excel文件(*.xls)|*.xls"
saveDlg.ShowDialog()


Dim sFileName As String = saveDlg.FileName.Trim
If String.IsNullOrEmpty(sFileName) = True Then
MsgBox("没有输入导出文件名,系统不能导出!", MsgBoxStyle.Exclamation)
Return
End If
xlsExport1.Export(rpt.Document, sFileName)
xlsExport1 = Nothing

导出Excel 搞定收工

www.bkjia.comtruehttp://www.bkjia.com/sybase/998859.htmlTechArticleActiveReport导出功能 在网上查了不少资料,有个讲解比较完整的方案,我在系统中一试,发现并不好用,在使用导出功能,必须是引用几个命...

相关文章

相关搜索: 功能

帮客评论

视觉看点