如何在vb.net中使用OLE DB更改Crystal Reports连接字符串?

如何在vb.net中使用OLE DB更改Crystal Reports连接字符串?,vb.net,crystal-reports,connection,oledb,Vb.net,Crystal Reports,Connection,Oledb,我有一个“Connection.vb”,其中所有的连接字符串都被整个程序存储和使用 我对Crystal Reports不熟悉。。我想根据我创建的连接字符串更改它的连接字符串。。。我正在使用MS SQL 2008。。SQL Server本机客户端10.0 OLE DB提供程序 这是我的连接字符串。 “Provider=SQLNCLI10;Server=..\SQLEXPRESS;Database=Blah;Trusted_Connection=yes” 我试着用谷歌搜索。。但他们使用不同的语言、不

我有一个“Connection.vb”,其中所有的连接字符串都被整个程序存储和使用

我对Crystal Reports不熟悉。。我想根据我创建的连接字符串更改它的连接字符串。。。我正在使用MS SQL 2008。。SQL Server本机客户端10.0 OLE DB提供程序

这是我的连接字符串。 “Provider=SQLNCLI10;Server=..\SQLEXPRESS;Database=Blah;Trusted_Connection=yes”

我试着用谷歌搜索。。但他们使用不同的语言、不同的数据库和复杂的示例


提前感谢。

我刚刚花了一些时间在VB中解决了这个确切的问题。我希望这有帮助

用您的数据上下文替换您的DataContext()。或者,您可以像往常一样从AppConfig获取连接字符串。我是从数据上下文中得到我的,因为我们正在迁移数据库并不断更改连接字符串

   Private Sub SetCrystalReportsConnection(ByRef report As ReportDocument)

    Dim sqlConnInfo As SqlConnectionStringBuilder = New SqlConnectionStringBuilder(New YourDataContext().Connection.ConnectionString)

    For Each connection As InternalConnectionInfo In report.DataSourceConnections
        If sqlConnInfo.IntegratedSecurity Then
            connection.SetConnection(sqlConnInfo.DataSource, sqlConnInfo.InitialCatalog, True)
        Else
            connection.SetConnection(sqlConnInfo.DataSource, sqlConnInfo.InitialCatalog, sqlConnInfo.UserID, sqlConnInfo.Password)
            connection.IntegratedSecurity = False
        End If
    Next

End Sub

我只是花了一些宝贵的时间在VB中解决了这个确切的问题。我希望这有帮助

用您的数据上下文替换您的DataContext()。或者,您可以像往常一样从AppConfig获取连接字符串。我是从数据上下文中得到我的,因为我们正在迁移数据库并不断更改连接字符串

   Private Sub SetCrystalReportsConnection(ByRef report As ReportDocument)

    Dim sqlConnInfo As SqlConnectionStringBuilder = New SqlConnectionStringBuilder(New YourDataContext().Connection.ConnectionString)

    For Each connection As InternalConnectionInfo In report.DataSourceConnections
        If sqlConnInfo.IntegratedSecurity Then
            connection.SetConnection(sqlConnInfo.DataSource, sqlConnInfo.InitialCatalog, True)
        Else
            connection.SetConnection(sqlConnInfo.DataSource, sqlConnInfo.InitialCatalog, sqlConnInfo.UserID, sqlConnInfo.Password)
            connection.IntegratedSecurity = False
        End If
    Next

End Sub

您只是问如何从VB向Crystal Reports传递连接字符串?您只是问如何从VB向Crystal Reports传递连接字符串?