Set rsPositivo_pos = dbDati.OpenRecordset("SELECT DISTINCT DSum(""[Totale]"",""vst_PianoConti_Dati"",""[CodificaCoGe] = 'Attività' AND [IDTitolo]=" & IdTitoloSelezionato & " AND (SegnoRiclassifica='' or isnull(SegnoRiclassifica) or lcase(SegnoRiclassifica)='positivo')"") AS Totale " & _
"From vst_PianoConti_Dati")