select su più tabelle (join?)

[mahimo]

sarebbe stato troppo bello aver finito qui...
integrando il codice nella mia pagina funziona tutto, ma viene visualizzato solo un record...
oppure tutti i record, ma con lo stesso valore del primo visualizzato.

'spe che riguardo :master:

'-------------------------------------------------------------
'creo la parte superiore della tabella
response.write "<table width='500' border='1'>"
response.write "<tr>"
response.write "<td><div align='center'>ID</div></td>"
response.write "<td><div align='center'>aggiungi IMG</div></td>"
response.write "<td><div align='center'>NOME</div></td>"
response.write "<td><div align='center'>TIPOLOGIA</div></td>"
response.write "<td><div align='center'>N° IMG</div></td>"
response.write "<td><div align='center'>MODIFICA</div></td>"
response.write "<td><div align='center'>ELIMINA</div></td>"
response.write "<tr>"

strSQL = "SELECT COUNT(immagini.id_immagine) AS totImg, " &_
         "elenco_gallery.id_gallery, " &_
         "elenco_gallery.nome_gallery, " &_
         "elenco_gallery.id_tipologia_gallery " &_
         "FROM elenco_gallery " &_
         "INNER JOIN immagini " &_
         "ON elenco_gallery.id_gallery = immagini.id_gallery " &_
         "GROUP BY elenco_gallery.id_gallery, nome_gallery, id_tipologia_gallery  " &_
         "ORDER BY elenco_gallery.nome_gallery"

Set rs=Server.CreateObject("ADODB.recordset")
rs.Open strSQL, objcon
while not rs.EOF

id_gallery = rs("id_gallery")
nome_gallery = rs("nome_gallery")
id_tipologia_gallery = rs("id_tipologia_gallery")
immaginiingallery = rs("totImg")

response.write "<td><div align='center'>" & id_gallery & "</div></td>"
response.write "<td><div align='center'>[img]aggiungi_img.gif[/img]</td>"
response.write "<td><div align='center'>" & nome_gallery & "</div></td>"
response.write "<td><div align='center'>" & id_tipologia_gallery & "</div></td>"
response.write "<td><div align='center'>" & immaginiingallery & "</div></td>"
'e poi i tasti modifica ed elimina
response.write "<td><div align='center'>[img]modifica.gif[/img]</td>"
response.write "<td><div align='center'>[img]elimina.gif[/img]</td>"
response.write "</tr>"

rs.movenext

wend

rs.close
Set rs = Nothing

objcon.close
Set objcon = Nothing

'infine chiudo la tabella
response.write "</table>"

[mahimo]

non riesco a capire, mi sembra tutto giusto