problemi datareport

[peppone.09]

qualcuno può aiutarmi?
in pratica devo visualizzare in un datareport di vb6 i dati relativi ad un periodo di malattia dal__________ al____________

nella section2 del datareport ho inserito due label (esattamente laber1 che dovrebbe filtrare la data di inizio malattia e label2 per la data di fine malattia (e conteggiare i giorni) forse con la funzione Sum

aprendo il report invece viene visualizzata nelle due label la data di inizio malattia. come mai?

posto il codice nella speranza che possiate aiutarmi
grazie


Set cn = New ADODB.Connection
'Apro connessione...
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Malattie.mdb;Persist Security Info=False"
Set rs = cn.Execute("SELECT dipendenti.cognome, dipendenti.Nome, dipendenti.residenza, malattia.data, malattia.congedo FROM dipendenti INNER JOIN malattia ON dipendenti.idcontatore = malattia.idanagrafica WHERE dipendenti.cognome = '" & txtdipendenti & "' and malattia.Data between #" & Format$(Text1, "dd/mm/yyyy") & "# and #" & Format$(Text2, "dd/mm/yyyy") & "#")

Set DataReport1.DataSource = rs

With DataReport1
.Sections("section2").Controls.Item("Label1").Caption = rs.Fields("data").Value
.Sections("section2").Controls.Item("Label2").Caption = rs.Fields("data").Value

.Refresh
.Show
End With
End If