Imports System.Data.SqlClient
Imports System.Configuration
Imports System.Linq
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim cryRpt As New ReportDocument
Dim crtableLogoninfos As New TableLogOnInfos
Dim crtableLogoninfo As New TableLogOnInfo
Dim crConnectionInfo As New ConnectionInfo
Dim CrTables As Tables
Dim CrTable As Table
cryRpt.Load("C:\Users\dad\Desktop\report\myfile2.rpt")
With crConnectionInfo
.ServerName = "127.0.0.1"
.DatabaseName = "xxx"
.UserID = "sa"
.Password = "123456"
End With
CrTables = cryRpt.Database.Tables
For Each CrTable In CrTables
crtableLogoninfo = CrTable.LogOnInfo
crtableLogoninfo.ConnectionInfo = crConnectionInfo
CrTable.ApplyLogOnInfo(crtableLogoninfo)
Next
CrystalReportViewer1.ReportSource = cryRpt
CrystalReportViewer1.Refresh()
End Sub
End Class
Я получаю ошибку ниже при попытке загрузить отчет кристалла в визуально студии 2013.Ошибка загрузки кристалл отчет в vb.net
необработанное исключение типа «CrystalDecisions.Shared.CrystalReportsException» произошло в CrystalDecisions.CrystalReports.Engine.dll
Дополнительная информация: Ошибка загрузки отчета.
На этой линии cryRpt.Load("C:\Users\dad\Desktop\report\myfile2.rpt")
Путь является правильным.