[Resolvido] 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
%>

[hargon 64]

Tópico movido.

 

Origem: Artigos, Tutoriais e Matérias (ASP) http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Destino: ASP

[Dias Sanches 0]

Obrigado pela ajuda...

 

Encontrei onde eu estava errando

 

Obrigado

[hargon 64]

Aonde estava o erro?

 

Pq ou eu não entendi a pergunta ou não consegui ver o erro. Vi que tinha um While apenas para ler o nome do evento, a idéia seria tirar ele do While para não repetir, nesse caso o While perderia sentido.

[xanburzum 169]

tb, só vi o <%=objrs("Evento")%>

mas bom k resolveu...