重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
小编给大家分享一下.Net水晶报表怎么用,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:域名申请、网络空间、营销软件、网站建设、金口河网站维护、网站推广。
1、新建一个windows application:CristalTest;
2、新添加一个数据集DataSet1.xsd
3、在DataSet1里添加表DataTable1 在DataTable1里添加四列Column1,Column2,Column3,Column4 ,保存
4、添加一个水晶报表文件CrystalReport1.rpt 设置数据源:
项目数据(Project Data)-->Ado.net DataSets-->***.DataSet1-->DataTable1
5、把Column1,Column2,Column3,Column4拖到水晶报表的细节( Details )中
6、添加一个控件CrystalReportViewer1到Form1中
7、然后添加Form1_Load的代码
Dim m_sqlConn As SqlConnection Dim m_strSqlConn As String m_strSqlConn = "Data Source=localhost; initial catalog=pubs; User id=sa; password="m_sqlConn = New SqlConnection( m_strSqlConn ) Try Dim sqlAdp As SqlDataAdapter Dim strSql As String Dim ds = New DataSet( ) m_sqlConn.Open( ) strSql = "SELECT au_lname AS Column1, au_fname AS Column2, phone AS Column3, address AS Column4 FROM dbo.authors" sqlAdp = New SqlDataAdapter( strSql, m_sqlConn ) sqlAdp.Fill( ds ) Dim crReportDocument = New CrystalReport1( ) crReportDocument.SetDataSource( ds.Tables( 0 ) ) CrystalReportViewer1.ReportSource = crReportDocument Catch ex As Exception MessageBox.Show( ex.ToString( ) ) End Try
8、在form1.vb文件头加 Imports System.DataImports System.Data.SqlClient
9、 m_strSqlConn = "Data Source=localhost;
initial catalog=pubs; User id=sa;
password="这个可能要修改成你的机器的Sql Server连接信息
以上是“.Net水晶报表怎么用”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!