L'esempio era solo una traccia .....

Sostituisci il codice che va da "SUGGERIMENTO DI CHICO62" a "Loop" con:
codice:
'SUGGERIMENTO DI chico62
If LP <> OldValue Then
    Print #1, LP; vbTab; NUMERO_BRANO; vbTab; DURATA; vbTab; VOTO; vbTab; NOME_BRANO
    OldValue = LP
Else
    Print #1, Chr(34); vbTab; NUMERO_BRANO; vbTab; DURATA; vbTab; VOTO; vbTab; NOME_BRANO
End If
rs.MoveNext
Loop
E, quando con determinate istruzioni non si ottengono i risultati desiderati, è buona norma postare:
-eventuali codici di errore e la riga del codice nella quale si presentano
-diversamente, il risultato che si ottiene e quello che si sarebbe voluto ottenere.


Ciauz

CHico