Parameterübergabe an das Dataenvironment

  • VB6

    Parameterübergabe an das Dataenvironment

    Hallo,

    ich habe folgende parametrierte Abfrage mit dem DataEnvironment erstellt:

    SELECT ID, DATUM, PROBENSTELLE, ANLAGENZUSTAND, PROBENGRUND, KZ_FREIGABE, BEMERKUNG FROM PROBENKOPF WHERE ID = ?

    Diese Abfrage ist die Datenquelle für ein Datareport, dem ich durch folgenden Quellcode aufrufe und den Parameter übergebe:

    Load Data1
    With Data1
    If .rsProbenkopf.State <> 0 Then .rsProbenkopf.Close
    .probenkopf Me.ListView1.SelectedItem
    End With
    Set Rep1.DataSource = Data1
    Rep1.Refresh
    If Rep1.Visible = False Then Rep1.PrintReport

    Soweit so gut. Das ganze funktioniert auch einwandfrei, nur dauert die Aktion vom Aufruf des Reports bis zur Anzeige über 1

    Minute!!

    Kann man das irgendwie beschleunigen?

    Grüsse Peter