vb mysql 设置数据源_database – 在运行时设置Crystal Report数据源

This link拥有您想要了解的所有信息.

更新：这是使用sql Server进行集成身份验证的最低工作示例.您应该使用表对象的ConnectionProperties来设置连接参数.

Dim app As New CRAXDDRT.Application

Dim rpt As CRAXDDRT.Report

Dim tbl As CRAXDDRT.DatabaseTable

Dim tbls As CRAXDDRT.DatabaseTables

Set rpt = app.OpenReport("C:\report\repotest.rpt")

For Each tbl In rpt.Database.Tables

tbl.ConnectionProperties.DeleteAll

tbl.ConnectionProperties.Add "Provider","sqlOLEDB"

tbl.ConnectionProperties.Add "Data Source","localhost"

tbl.ConnectionProperties.Add "Initial Catalog","testdb"

tbl.ConnectionProperties.Add "Integrated Security","True" ' cut for sql authentication

'tbl.ConnectionProperties.Add "User Id","myuser" ' add for sql authentication

'tbl.ConnectionProperties.Add "Password","mypass" ' add for sql authentication

Next tbl

'This removes the schema from the Database Table's Location property.

Set tbls = rpt.Database.Tables

For Each tbl In tbls

With tbl

.Location = .Name

End With

Next

'View the report

Viewer.ReportSource = rpt

Viewer.ViewReport