连接水晶报表
Dim myReport = New ch3_worldsales_northwind()Dim myTableLogonInfos = New CrystalDecisions.Shared.TableLogOnInfos()Dim myTableLogonInfo = New
Dim myReport = New ch3_worldsales_northwind()
Dim myTableLogonInfos = New CrystalDecisions.Shared.TableLogOnInfos()
Dim myTableLogonInfo = New CrystalDecisions.Shared.TableLogOnInfo()
Dim myConnectionInfo = New CrystalDecisions.Shared.ConnectionInfo()
'Programmatically set the Selection Formula
'CrystalReportViewer1.SelectionFormula = "{Customer.Country} = 'USA'"
With myConnectionInfo
.ServerName = "localhost"
.DatabaseName = "Northwind"
.UserID = "sa"
.Password = ""
End With
myTableLogonInfo.ConnectionInfo = myConnectionInfo
myTableLogonInfo.TableName = "customers"
myTableLogonInfos.Add(myTableLogonInfo)
CrystalReportViewer1.LogOnInfo = myTableLogonInfos
CrystalReportViewer1.ReportSource = myReport
本文作者:佚名 来源:http://www.51blog.net
CIO之家 www.ciozj.com 微信公众号:imciow
免责声明:本站转载此文章旨在分享信息，不代表对其内容的完全认同。文章来源已尽可能注明，若涉及版权问题，请及时与我们联系，我们将积极配合处理。同时，我们无法对文章内容的真实性、准确性及完整性进行完全保证，对于因文章内容而产生的任何后果，本账号不承担法律责任。转载仅出于传播目的，读者应自行对内容进行核实与判断。请谨慎参考文章信息，一切责任由读者自行承担。
延伸阅读