comparar o recordset atual com o anterior

[amiltongomes]

Ola pessoal tenho um relatorio que mostra os campos da minha tabela atraves de um instrução <%While Not objRS.EOF%> data, hora, sala, professor e etc, gostaria de saber como faço para comparar o registro atual com o anterior e caso for igual não mostrar. exemplo

como sai

20/08/2010-----08:00-----sala1-----fulano1

20/08/2010-----09:00-----sala1-----fulano2

20/08/2010-----10:00-----sala1-----fulano3

20/08/2010-----11:00-----sala1-----fulano1

21/08/2010-----08:00-----sala2-----fulano2

21/08/2010-----09:00-----sala1-----fulano3

22/08/2010-----08:00-----sala2-----fulano1

como desejo

20/08/2010-----08:00-----sala1-----fulano1

20/08/2010-----09:00-----sala1-----fulano2

20/08/2010-----10:00-----sala1-----fulano3

20/08/2010-----11:00-----sala1-----fulano1

21/08/2010-----08:00-----sala2-----fulano2

21/08/2010-----09:00-----sala1-----fulano3

22/08/2010-----08:00-----sala2-----fulano1

[kuroi]

<% Dim data
data = ""

Do While Not objRS.EOF
    If objRS("data") <> data Then
        'Mostra a data
    Else
        'Não mostra a data        
    End If

    '...
    'Resto do codigo
    '...

    data = objRS("data")
    objRS.MoveNext
Loop %>[/code]

[amiltongomes]

Funcionou perfeitamente agradeço ao Kuroi pela ajuda

Obrigado