<script language="javascript"> <!-- function mostra_foto(codigo) { window.open (codigo,'Fotos','scrollbars=no,width=750,height=610,top=0,left=0') } //--> </script> <% Const NumPerPage1 = 5 Dim CurPage1 If Request.QueryString("CurPage") = "" then CurPage1 = 1 Else CurPage1 = Request.QueryString("CurPage") End If Dim conn1 Set conn1 = Server.CreateObject("ADODB.Connection") conn1.Open "DBQ=" & Server.MapPath("bd/festas.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}" Dim rs1 Set rs1 = Server.CreateObject("ADODB.Recordset") rs1.CursorLocation = 3 rs1.CacheSize = NumPerPage1 Dim strSQL1 strSQL1 = "SELECT * FROM Baladas ORDER BY Data DESC" rs1.Open strSQL1, Conn1 rs1.MoveFirst rs1.PageSize = NumPerPage1 Dim TotalPages1 TotalPages1 = rs1.PageCount rs1.AbsolutePage = CurPage1%> <link href="../agitoesconf.css" rel="stylesheet" type="text/css" /> <table width="97%" border="0" cellspacing="2" cellpadding="0"> <% Count1 = 0 Do While Not rs1.EOF And Count1 < rs1.PageSize %> <tr> <td height="80"> <table width="100%" border="0" cellspacing="1" cellpadding="0"> <tr> <td width="8%"><a href="java script:mostra_foto('fotos/Foto_Frameset.asp?BalId=<%=rs1("Id")%>')"><img src="fotos/capas/<%=rs1("Id")%>.jpg" width="80" height="60" border="0" align="middle"></a></td> <td width="92%" class="textos_menu"><span class="linkazul"><strong><a href="java script:mostra_foto('fotos/Foto_Frameset.asp?BalId=<%=rs1("Id")%>')"><%=rs1("Nome")%></a></strong></span><br> Local: <span class="textocinza"><%=rs1("Local")%> - <%=rs1("Cidade")%><br> </span> Data: <span class="textocinza"><%=rs1("Data")%><br></span> Cliks: <span class="textocinza"><%=rs1("Clicks")%></span></td> </tr> </table> </td> </tr> <% Count1 = Count1 + 1 rs1.MoveNext Loop %> </table>
Ajuda No Codigo De Fotos
Started By animaltide, 04/08/2006, 10:43
1 reply to this topic
#1
Posted 04/08/2006, 10:43
ola eu estou com um problema , nao sei se vcs podem me ajudar .. eu estou com um sistema de fotos , so que a capa esta uma em baixo da outra .. euq queria coloar duas fileiras mais uma do lado da outra sera que tem como alguem me ajudar esse e o meu site MuvucaBh mais eu queria fazer o esquema igual desse site Norock mais eu queria colocar os texto em baixo da foto e 4 em cada fileira , tem uma imagem tb .. se alguem pode me ajudar eu ficarei grato
#2
Posted 07/08/2006, 09:13
Seu problema não é com asp camarada. É html básico.
pense na estrutura primeiro, depois trabalhe com seu loop.
Há várias outras formas de fazer. Use a sua imaginação...
pense na estrutura primeiro, depois trabalhe com seu loop.
<% WHILE NOT rs.EOF imagem1 = rs("arquivo") titulo1 = rs("titulo") rs.movenext IF NOT rs.EOF THEN imagem2 = rs("arquivo") titulo2 = rs("titulo") rs.movenext END IF %> <table> <tr> <td> <img src="<%=imagem1%>"> </td> <td> <img src="<%=imagem2%>"> </td> </tr> <tr> <td> <%=titulo1%> </td> <td> <%=titulo2%> </td> </tr> </table> <% WEND rs.CLOSE SET rs = nothing %>
Há várias outras formas de fazer. Use a sua imaginação...
Edição feita por: NOVAZOO, 07/08/2006, 09:14.
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)