Guest User

Untitled

a guest
Apr 17th, 2018
108
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ASP 0.79 KB | None | 0 0
  1. <!--#include file="js/conexao.asp"-->
  2. <script src="js/open.js"></script>
  3. <%
  4. set rs = db.Execute("SELECT * FROM sergio_edicao ORDER BY edicao asc")
  5.  
  6. response.Write("<h1>Edi&ccedil;&otilde;es Anteriores</h1>")
  7. response.Write("<hr noshade='noshade' color='#FFF' style='border: 1px #666 dotted;'/>")
  8.  
  9. if rs.eof or rs.bof then
  10.     response.Write("A PÁGINA NÃO EXISTE")
  11. end if
  12.  
  13. Do while not rs.eof
  14.         response.write "<a href='edicao_sumario.asp?ed="&cInt(rs("edicao"))&"&pAtual=1' class='link3'><h2>Edi&ccedil;&atilde;o "&cInt(rs("edicao"))&"</h2>"
  15.         response.write "<h3>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"&rs("resumo")&"</h3></a><br/>"
  16.         response.Write("<hr noshade='noshade' color='#FFF' style='border: 1px #ddd dotted;'/>")
  17.     rs.moveNext
  18. Loop
  19. db.close
  20. %>
  21. <script src="js/close.js"></script>
Add Comment
Please, Sign In to add comment