Guest User

Untitled

a guest
Apr 17th, 2018
82
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ASP 0.67 KB | None | 0 0
  1. carta_leitor.asp
  2.  
  3. <!--#include file="js/conexao.asp"-->
  4. <script src="js/open.js"></script>
  5. <% 
  6.     ed = Cint(Request.QueryString("ed"))
  7.    
  8. if (ed = "") or (isnull(ed)) or (ed <= 0) then
  9.     ed = Cint(db.Execute("SELECT COUNT(edicao) FROM sergio_edicao").Fields(0).Value)
  10. end if
  11.    
  12.     set rs = db.execute("SELECT * FROM sergio_carta_leitor where edicao = '"&ed&"'")
  13.    
  14.     if rs.eof or rs.bof then
  15.         response.Write "<h1>Carta ao leitor</h1>"
  16.         response.Write "<h3>Essa p&aacute;gina n&atilde;o existe.</h3>"
  17.     else
  18.         response.Write "<h1>Carta ao leitor</h1>"
  19.         response.Write "<h3>"&rs("cabecario")&"</h3>"
  20.         response.Write rs("texto")
  21.     end if
  22. %>
  23. <script src="js/close.js"></script>
Add Comment
Please, Sign In to add comment