Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/mysql/71.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Mysql 从listview内容到crystal reports生成报告时提示数据库登录_Mysql_Vb.net_Crystal Reports - Fatal编程技术网

Mysql 从listview内容到crystal reports生成报告时提示数据库登录

Mysql 从listview内容到crystal reports生成报告时提示数据库登录,mysql,vb.net,crystal-reports,Mysql,Vb.net,Crystal Reports,我得到了这个代码并得到了一个错误提示。数据库登录。即使我输入了正确的密码,它也总是说登录失败 Dim report As New ReportDocument report.Load("rptPrntIss.rpt") report.RecordSelectionFormula = "{tbl_issued.TransactionID}=" & txtIssID.Text & "AND ({tbl_transaction.Department}=" & cBoxDpt.

我得到了这个代码并得到了一个错误提示。数据库登录。即使我输入了正确的密码,它也总是说登录失败

Dim report As New ReportDocument
report.Load("rptPrntIss.rpt")

report.RecordSelectionFormula = "{tbl_issued.TransactionID}=" & txtIssID.Text & "AND ({tbl_transaction.Department}=" & cBoxDpt.Text & ")"
frmPrnt.CrystalReportViewer1.ReportSource = report
frmPrnt.CrystalReportViewer1.Refresh()
frmPrnt.ShowDialog()
可能此代码不正确,因为没有此代码,一切都很完美。

使用此函数可防止每次提示数据库登录

就像

report.SetDatabaseLogon("username", "password", "server", "dbname", false)
在某些情况下,这也行不通(我最近遇到过一些情况),在这种情况下,我们需要为报表中的每个表指定数据库登录名


希望这有帮助。

我应该在reportDoc.Database.Tables上替换什么?yourreportname.Database.Tables设置每个表,先生。先生顺便说一句我只想打印我的listview多个项目并将其传递给crystal reports。先生,你能帮我解决这个问题吗?然后试试这个链接,你发布的代码与从listview打印没有关系。但我提到这一点,它表明他使用该代码能够打印用户选择的内容。
dim connInfo as new ConnectionInfo()
connInfo.ServerName = yourserver
connInfo.DatabaseName = "dbname"
connInfo.UserID = "username"
connInfo.Password = "password"
dim  tableLogOnInfo as new TableLogOnInfo()
tableLogOnInfo.ConnectionInfo = connInfo

   foreach Table as table in reportDoc.Database.Tables

      table.ApplyLogOnInfo(tableLogOnInfo)
      table.LogOnInfo.ConnectionInfo.ServerName = connInfo.ServerName
      table.LogOnInfo.ConnectionInfo.DatabaseName = connInfo.DatabaseName
      table.LogOnInfo.ConnectionInfo.UserID = connInfo.UserID
      table.LogOnInfo.ConnectionInfo.Password = connInfo.Password
   next