Einstellung des Crystal Report-Datenquelle zur Laufzeit

Beim erstellen meines Crystal-Reports-Bericht habe ich natürlich eine Datenbank einrichten und server-Verbindung, die ich für die Entwicklung verwenden.

Was ich nun tun möchte in meinem VB-Anwendung ist dynamisch festlegen der Datenbank-und server-Namen zu verwenden, mit den berichten. Ich habe diese Werte als strings varServer und varDatabase.

Jemand wissen, wie Sie gehen über das tun dies?

Vielen Dank im Voraus.

P. S ich habe versucht, mehrere online-Lösungen, aber ich habe Probleme mit VB6.

InformationsquelleAutor | 2009-02-26

  1. 4

    Dieser link hat alle Informationen, die Sie wissen wollen.

    UPDATE: Hier ist ein minimal-Beispiel arbeiten für die integrierte Authentifizierung mit SQL Server. Sollten Sie die ConnectionProperties der Tabelle-Objekt für die Verbindungseinstellungen.

    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
    Danke für den link, es scheint genau das, was benötigt wird. Wissen Sie, ob es einen Weg gibt, lassen Sie sich den Benutzernamen und das Passwort? Unser Kunde verwendet Windows-Authentifizierung zum herstellen einer Verbindung zur DB. Nochmals vielen Dank
    Auch wenn ich versuche die Beispiel-code, den ich erhalten eine "benutzerdefinierter Typ ist nicht definiert" - Fehler auf "Dim logInfo Als Neue TableLogOnInfo', eine Vorstellung, welche Referenz, die ich bin fehlt?

    InformationsquelleAutor MicSim

  2. 1

    Tolle Arbeit! vielen Dank Für den code! Ich ändere es ein bisschen, aber da dieser Teil nicht funktioniert:

    'View the report
Viewer.ReportSource = rpt
Viewer.ViewReport

    War es ein Fehler, dass Objekt konnte nicht gefunden werden

    Also hab ich es so:

    With Me.CRViewer91
    .ReportSource = rpt
    .ViewReport
End With

    InformationsquelleAutor Tasos

  3. 0

    Welche version von crystal verwenden Sie?

    In der .net-Welt, ich in der Regel übergeben Sie das dataset für den Bericht als emoreau sagt hier.

    Diese Weise, Ihre Verbindung von code statt Kristall und gespeichert werden können in einer globalen connection-Eigenschaft. Allerdings, das ist .net. Ich denke, dass entweder die version von Kristall, die Sie haben sollte die gleiche Funktionalität haben ODER Emoreau haben können, ein Beispiel, wie es in VB6 in der version, die Sie verwenden.

    Hoffen, dass Holen Sie sich Sie gestartet.

    Ich bin mit Crystal Reports 11 (XI) und VB6. Für die Gestaltung des Berichts, die ich brauchte, um die Datenbank hinzufügen, um das layout der Felder usw und bin jetzt zu wollen, setzen Sie den servername und Datenbankname durch code, wie Sie vorschlagen. Lesen Sie auf diesen link jetzt vielen Dank.

    InformationsquelleAutor Bill Martin

  4. 0

    Kann man auch die Standard-Anbieter für den Bericht, durch hinzufügen dieser code bit.

     Dim MyProvider As Object = logOnInfo.ConnectionInfo.LogonProperties.LookupNameValuePair("Provider")
            If IsNothing(MyProvider) = False Then
                MyProvider.Value = "SQLOLEDB"
            End If

    InformationsquelleAutor KenDog

Schreibe einen Kommentar