Salve a tutti ho bisogno di creare una lista del tipo

Gruppo1 (campo "gruppo" della tabella)

ciccio (campo "nome" della tabella)
nemo
andrea

gruppo 2

Pino
Gino
Dino
Vino

Gruppo 3
Pierfrancesco
Piergiovanni
Piergiorgio

e uso la seguente
codice:
<%
rs.source="select * from chisiamo order BY gruppo desc" 
g=""
RS.Open ()
while (not rs.eof) and (rs.bof)
gu=rs.field("gruppo")
if g<>gu then
response.write("Gruppo :" & gu & "
")
g=gu
end if
response.write("nome" & rs.field("nome") & "
")
rs.movenext
wend%>
ma mi da il seguente errore

codice:
Microsoft VBScript runtime error '800a01a8' 

Object required: ''
come faccio a creare l'oggetto? o meglio ho paira di aver cancellato l'oggetto, insomma come posso risolvere sto problema?
Grazie ragazzi