Array e Recordset

[paginad 0]

Estou fazendo um sistema que precisa de um contador de visitas.

 

No banco de dados eu tenho um recordset que lista os dias e horas que tiveram acesso no sistema. Suponhamos que a base me lista assim:

 

10 | 27/07 | 2

5 | 27/07 | 5

100 | 27/07 | 10

 

Ou seja o terceiro campo são as horas, o segundo o dia e o primeiro o total de visitas.

 

Eu tenho que montar um grafico dentro de um loop de 24h, assim

 

Primeiro array

'0h', '1h', '2h', '3h', '4h', '5h', '6h', '7h', '8h', '9h', '10h', '11h', '12h', '13h','14h', '15h', '16h', '17h', '18h', '19h', '20h', '21h', '22h', '23h'

 

Segundo array é o meu recordset que lista assim:

2, 5, 10 (sendo os dias)

 

Eu não to conseguindo comparar os array de 23 com o record set para comparar o loop com o registro.

 

Tipo:

 

For c = 0 To 23

hora = Empty

total = Empty

For x = 0 To Ubound(RsVisitas)

hora = RsVisitas(2,x)

total = RsVisitas(0,x)

If hora = c Then

Response.Write total & ","

End If

Next

Response.Write 0 & ","

Next

Está dando errado.

Assim:

1,0,2,0,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

Ta colocando um 0 a mais entre as horas

Alguém pode ajudar?