Crystal Reports запрашивает вход только на другом ПК

Question

Я сделал небольшое приложение на VB.NET, которое включает Crystal Report. Запустив Crystal Report на машине я сделал это работает отлично. Когда я запускаю приложение на своем ноутбуке, Crystal Report всегда запрашивает у меня вход в систему, хотя в базе данных ему не задан логин. Я попытался передать "Admin" и "" с кодом, но не повезло.

Я работаю с базой данных Access, вот код, который мне нужен для загрузки отчета Crystal Report:

If frmReport Is Nothing OrElse frmReport.IsDisposed Then
  frmReport = New frmReport
End If

frmReport.CrystalReportViewer1.ReportSource = "../../Reports/Klantenbeheer.rpt"

frmReport.MdiParent = Me
frmReport.Show()

Я посмотрел на Запретить вход в систему драйвера ODBC Text в Crystal Report для Visual Studio 2010 , но я не уверен, применимо ли это к моей ситуации?

Я также попытался установить источник данных rpt в качестве источника данных, с которым я работаю в приложении, а затем присвоить его источнику отчетов, но тоже не повезло.

Некоторые люди нашли решение перейти с DAO на OLEDB, но я использовал OLEDB с самого начала.

Answer 1

Ну, я знаю, что это старый вопрос.Но я думаю, что я должен просто добавить информацию, что я получил ссылку, что после тщательного исследования, он говорит, что мы должны скопировать правильную версию crdb_ado.dll.Прочитайте это здесь: XtremeNetTalk .К сожалению, я еще не смог найти этот файл в интернете!Я надеюсь, что смогу завершить этот ответ этим.

Answer 2

Возможно, код, найденный в внизу этой темы , может вам помочь?В частности:

Imports CrystalDecisions.Shared
Imports CrystalDecisions.CrystalReports.Engine

Dim myConnectionInfo As ConnectionInfo = New ConnectionInfo()
Dim myReport As New ReportDocument()
myReport.Load(Server.MapPath("ReportName")) 'name of your Crystal Report - see note below

Dim myTables As Tables = myReport.Database.Tables

For Each myTable As CrystalDecisions.CrystalReports.Engine.Table In myTables
Dim myTableLogonInfo As TableLogOnInfo = myTable.LogOnInfo
myConnectionInfo.ServerName = <SQL servername>
myConnectionInfo.DatabaseName = "" 'leave database name blank
myConnectionInfo.UserID = 'login name
myConnectionInfo.Password = 'password
myTableLogonInfo.ConnectionInfo = myConnectionInfo
myTable.ApplyLogOnInfo(myTableLogonInfo)
Next

CrystalReportViewer1.ReportSource = myReport

Это сделано для ASP.Net, но может работать с небольшими изменениями?