Titulo da Galeria

[Dias Sanches 0]

Boa tarde a todos!

 

Tenho este codigo da minha galeria de Fotos, ele funciona perfeitamente, porém eu estou tentando colocar um campo com o titulo da galeria, mas não estou tendo sucesso, pois toda vez que coloco ele se duplica juntamente com a galeria... Alguém pode me ajudar?

<% 
Dim objRs, x, strquantidade, data 
data = request.QueryString("data") 
Set objRS = Server.CreateObject("Adodb.recordset") 
call  Abreconexao 
strquantidade = request.querystring("quantia") 
session("quantia") = strquantidade 
if session("quantia") = "" then 
  objrs.pagesize = 40 
End if 
  objRs.open "Select * From galeria where data = '"&data&"' order by id" , Objconn, 3, 3  
 
 
  while  NOT objRs.EOF 
%> 
                                   
                                  <a href=<%=objrs("Foto")%> class="highslide" onclick="return hs.expand(this)"> <img src=<%=objrs("Minifoto")%> alt="AS" 
                title="Clique sobre a imagem para amplia-la" /></a>   
                                        <div class="highslide-caption"> <%=objrs("Evento")%> </div> 
        <span style="line-height:25%; margin-top:0; margin-bottom:0;"> 
        <% 
if x mod 3 = 0 then 
 
end if 
x = x + 1 
ObjRs.movenext 
wend 
%>

[Mário Monteiro 179]

como assim duplica?

 

explique melhor

[webmind 5]

entao basta dar ouput do nome da galeria antes do laço