水晶报表制作是.net平台上的一个重要功能`,对使用他,我的体会是很深刻的.
水晶报表有两种模式,分别是推模式和拉模式,前者一般不用设置登陆信息,后者是一定要写上登陆信息;以下实例以vb.net为例介绍拉模式报表的使用
1. 在选择报表数据时,最好采用SQL命令;
2. 在设置数据源后,如果想在界面上看到结果,就要采用crystalreportviewer控件,代码如下:
Dim Rpts As New 报表名
Dim logon As CrystalDecisions.Shared.TableLogOnInfo
Try
Dim Str As String = "" SQL语句
Dim dvStruc As DataView = db.RunSelectSQL(Str) 采用视图方式
Dim DTStruct As New DataTable
DTStruct = dvStruc.Table
dsdataSet = dvStruc.Table.DataSet
logon = Rpts.Database.Tables(0).LogOnInfo 设置登录信息
logon.ConnectionInfo.ServerName = Serve ‘服务器名
logon.ConnectionInfo.UserID = UserName ‘用户名
logon.ConnectionInfo.Password = Pass ‘密码
logon.ConnectionInfo.DatabaseName = "" 数据库名
Rpts.Database.Tables(0).ApplyLogOnInfo(logon)
Rpts.SetDataSource(dsdataSet)
Me.CrystalReportViewer1.ReportSource = Rpts
db.Dispose()
水晶报表有两种模式,分别是推模式和拉模式,前者一般不用设置登陆信息,后者是一定要写上登陆信息;以下实例以vb.net为例介绍拉模式报表的使用
1. 在选择报表数据时,最好采用SQL命令;
2. 在设置数据源后,如果想在界面上看到结果,就要采用crystalreportviewer控件,代码如下:
Dim Rpts As New 报表名
Dim logon As CrystalDecisions.Shared.TableLogOnInfo
Try
Dim Str As String = "" SQL语句
Dim dvStruc As DataView = db.RunSelectSQL(Str) 采用视图方式
Dim DTStruct As New DataTable
DTStruct = dvStruc.Table
dsdataSet = dvStruc.Table.DataSet
logon = Rpts.Database.Tables(0).LogOnInfo 设置登录信息
logon.ConnectionInfo.ServerName = Serve ‘服务器名
logon.ConnectionInfo.UserID = UserName ‘用户名
logon.ConnectionInfo.Password = Pass ‘密码
logon.ConnectionInfo.DatabaseName = "" 数据库名
Rpts.Database.Tables(0).ApplyLogOnInfo(logon)
Rpts.SetDataSource(dsdataSet)
Me.CrystalReportViewer1.ReportSource = Rpts
db.Dispose()