[VB6] Portare i valori del DB nel DataReport

[LMondi]

Devo portare i dati di diversi campi e di diverse Tabelle di un unico DB, nei controlli del DataReport.
Attualmente uso questo codice:
.... .... ....
Per la Prima Tabella del DB:
' Controlla che il DB contenga i dati da visualizzare:
If RSTpr1.EOF = False And RSTpr1.BOF = False Then
' Assegna il riferimento all'oggetto:
Set DRInfo.DataSource = RSTpr1
' Inserisce i dati nel DataReport:
With DRInfo.Sections("Section1")
.Controls("Txt1").DataField = "Campo1"
.Controls("Txt2").DataField = "Campo2"
... ... ...
End With
Fino a qui tutto funziona. Il problema sorge quando devo collegarmi alla 2^ Tbl del DB
per selezionare gli altri records.
Devo riassegnare al DR un secondo RecordSet (Set DRInfo.DataSource = RSTpr2)
dopo aver chiuso ed annullato il primo, lasciando la connessione attiva?
Quest'ultima operazione l'ho tentata ma il DR va in errore (8526 - rptErrInvalidDataField -
Impossibile trovare il campo dati).
Credo che dipenda da questa assegnazione: Set DRInfo.DataSource = RSTpr2 Avendo dato
prima Set DRInfo.DataSource = RSTpr1
Come devo fare?

[LMondi]

Ho fatto svariate prove, tutte fallite; a questo punto ritengo che il metodo seguito (Set DRInfo.DataSource = RSTpr1) non sia compatibile con il DataReport nel momento in cui si deve assegnare un nuovo rs per collegarsi ad una nuova Tbl del database.
Vi sarei grato se confermaste questa mia supposizione.