Dim crtableLogoninfos As New TableLogOnInfos() Dim crtableLogoninfo As New TableLogOnInfo() Dim crConnectionInfo As New ConnectionInfo() Dim CrTables As Tables Dim CrTable As Table 'Dim crReportDocument As New CrystalDecisions.CrystalReports.Engine.ReportDocument With crConnectionInfo .DatabaseName = Application.StartupPath & "\sdcartdb.mdb" .Password = "" End With CrTables = Report.Database.Tables For Each CrTable In CrTables crtableLogoninfo = CrTable.LogOnInfo crtableLogoninfo.ConnectionInfo = crConnectionInfo CrTable.ApplyLogOnInfo(crtableLogoninfo) Next
Report.DataSourceConnections.Clear() Report.DataSourceConnections.Item(0).SetConnection(Application.StartupPath & "\db.mdb", "db.mdb", 1)
my solution was by installing SQL Server 2012 Client Tool Connectivity, and backward client connectivity components using SQL Server setup source.
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)