水晶报表的简单问题

mjtalhx 2008-03-27 04:04:57
我用VS2003.NET在调用水晶报表的时候老是提示要输入数据库登陆对话框!不知道怎么回事!请大家指教!谢谢了!
...全文
82 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
ckp00001 2008-03-29
  • 打赏
  • 举报
回复
‘ 报表登录服务器方法之一
‘ 直接用CrystalReport登录服务器(未经测试):
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
.........
' 设置登录数据库服务器的登录参数
Private Sub SetDBLogonForReport()
' 已建立的报表CustomersByCity.rpt
Dim CustomerRpt As New CustomersByCity()
Dim tliCurrent As TableLogOnInfo

For Each tbCurrent As Table In CustomerRpt.Database.Tables
tliCurrent = tbCurrent.LogOnInfo
With tliCurrent.ConnectionInfo
.ServerName = ServerName
.UserID = "sa"
.Password = ""
.DatabaseName = "Northwind"
.IntegratedSecurity = False
End With
tbCurrent.ApplyLogOnInfo(tliCurrent)
Next tbCurrent
End Sub
ckp00001 2008-03-29
  • 打赏
  • 举报
回复
行不行?
ckp00001 2008-03-28
  • 打赏
  • 举报
回复
' 请按下例格式设置登录数据库服务器的登录参数,数据库登陆对话框将不跳出来了:
Private Sub SetDBLogonForReport()
Dim myConnectionInfo As ConnectionInfo = New ConnectionInfo()

myConnectionInfo.ServerName = ServerName
myConnectionInfo.DatabaseName = Database
myConnectionInfo.UserID = UserID
myConnectionInfo.Password = UserPWD

Dim myTableLogOnInfos As TableLogOnInfos = myCrystalReportViewer.LogOnInfo
For Each myTableLogOnInfo As TableLogOnInfo In myTableLogOnInfos
myTableLogOnInfo.ConnectionInfo = myConnectionInfo
Next

End Sub
vlsm 2008-03-27
  • 打赏
  • 举报
回复
搜索了一下,看看这个对你有没有帮助
http://topic.csdn.net/t/20030227/22/1475083.html
mjtalhx 2008-03-27
  • 打赏
  • 举报
回复
保存了啊!
vlsm 2008-03-27
  • 打赏
  • 举报
回复
连接数据库串没有保存密码吧
mjtalhx 2008-03-27
  • 打赏
  • 举报
回复
没有人回答吗?

16,553

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧