Jump to content


Photo

Sistema De Comentário


  • Faça o login para participar
5 replies to this topic

#1 Julio_WebDesign

Julio_WebDesign

    Turista

  • Usuários
  • 26 posts
  • Sexo:Não informado
  • Localidade:Mirassol D´OESTE
  • Interesses:CRIAÇÃO DE HOMEPAGE E TUDO NA AREA DE INFORMÁTICA

Posted 01/09/2003, 17:23

Presciso de uma ajuda... como criar um sistema de comentário igual ao do site baixaqui... clique aqui pra vêr.... quando vc entra no site lá em baixo mostra...comentários... alguém sabe fazer ? ? ?ou pode me ajudar......
porfavor......
<_<

#2 cybermix

cybermix

    andrewsmedina.com.br

  • Ex-Admins
  • 3586 posts
  • Sexo:Não informado
  • Localidade:Não sou desse planeta não!!!!
  • Interesses:python, fireworks, linux, php, flash...

Posted 01/09/2003, 17:41

ai vai um exemplinho

form.asp
<form name=form1 action=valida.asp method=post>
<tr> <td><b class=verd10>Nome:</b><input class=verd10 size=30 name=nome>
</td></tr><tr><td><p><b class=verd10>e-mail:</b>        <input class=verd10 size=30 name=email>
    </p>
    </td></tr>
<tr><td> <table cellspacing=0 cellpadding=0 width=200 border=0>
<tbody><tr><td colspan=2><b class=verd10>Avaliação:</b></td>
</tr><tr><td> 
<input class=verd10 type=radio CHECKED value=1 name=avaliacao>
<img height=15 src="/imagens/apr_bom.gif" width=15 align=absMiddle> <span class=verd10>boa </span></td>
<td> <input class=verd10 type=radio value=0 name=avaliacao>
<img height=15 src="/imagens/apr_ruim.gif" width=15 align=absMiddle> <span 
class=verd10>ruim</span></td>
</tr></tbody> 
</table></td></tr><tr><td> <b class=verd10>Estado:</b>
<select name=estado>
<option value="" selected>&nbsp;</option>
<option value=Acre>Acre</option>
<option 
value=Alagoas>Alagoas</option>
<option 
value=Amapá>Amapá</option>
<option 
value=Amazonas>Amazonas</option>
<option 
value=Bahia>Bahia</option>
<option 
value=Ceará>Ceará</option>
<option 
value="Distrito Federal">Distrito Federal</option>
<option 
value="Espírito Santo">Espírito Santo</option>
<option value=Goiás>Goiás</option>
<option 
value=Maranhão>Maranhão</option>
<option 
value="Mato Grosso">Mato Grosso</option>
<option 
value="Mato Grosso do Sul">Mato Grosso do Sul</option>
<option value="Minas Gerais">Minas Gerais</option>
<option value=Pará>Pará</option>
<option value=Paraíba>Paraíba</option>
<option 
value=Paraná>Paraná</option>
<option 
value=Pernambuco>Pernambuco</option>
<option 
value=Piauí>Piauí</option>
<option 
value="Rio de Janeiro">Rio de Janeiro</option>
<option value="Rio Grande do Norte">Rio Grande do Norte</option>
<option 
value="Rio Grande do Sul">Rio Grande do Sul</option>
<option 
value=Rondônia>Rondônia</option>
<option 
value=Roraima>Roraima</option>
<option 
value="Santa Catarina">Santa Catarina</option>
<option value="São Paulo">São Paulo</option>
<option value=Sergipe>Sergipe</option>
<option 
value=Tocantins>Tocantins</option></select></td></tr>
<tr> 
  <td><p><b class=verd10>Comentário:</b> <br>
        <textarea class=verd10 name=comentario rows=4 wrap=VIRTUAL cols=30></textarea>
  </p>
  </td></tr><tr><td class=verd10><input class=verd10 type=submit value=Enviar name=Enviar>
      <input type=hidden value="5617" name=cod>
  </td>
</tr><tr align=right><td align="center">&nbsp;</td>
</tr></form>

valida.asp
<%
'conecao com o banco de dados
Set db = Server.CreateObject("ADODB.Connection")
conexao = "DBQ=" & Server.MapPath("db.mdb")
DB.Open "DRIVER={Microsoft Access Driver (*.mdb)};" & conexao

sql = "insert into comentarios (nome, email, avaliacao, estado, comentario) values ('"&(request.form("nome"))&"', '"&(request.form("email"))&"', '"&(request.form("avaliacao"))&"', '"&(request.form("estado"))&"', '"&(request.form("comentario"))&"'"
db.execute(sql)	

%>

vizualiza.asp
<%
Set db = Server.CreateObject("ADODB.Connection")
conexao = "DBQ=" & Server.MapPath("db.mdb")
DB.Open "DRIVER={Microsoft Access Driver (*.mdb)};" & conexao

sql = "select * from comentarios"
set rs= db.execute(sql)

rs.movefirst
while not rs.eof
%>
<span class=verd10>
<% if rs("email")=1 then%>
<img src=/imagens/1.gif width=15 height=15 hspace=4 vspace=2 align=absmiddle>
<%else%>
<img src=/imagens/0.gif width=15 height=15 hspace=4 vspace=2 align=absmiddle>
<%end if%>
<a href=mailto:<%=rs("email")%>><font color=#000099><b><%=rs("nome")%></b></font></a> - <%=rs("estado")%><br>
<font color=#333333><b><%=rs("comentario")%><br>
<img src=/img/bb1.gif width=400 height=5 vspace=3></span>
<%
rs.movenext
wend
%>

www.andrewsmedina.com.br

#3 Asper-man-

Asper-man-
  • Visitantes

Posted 01/09/2003, 17:45

cybermix, funcionaria tipow um sistema de Guestbook?

#4 cybermix

cybermix

    andrewsmedina.com.br

  • Ex-Admins
  • 3586 posts
  • Sexo:Não informado
  • Localidade:Não sou desse planeta não!!!!
  • Interesses:python, fireworks, linux, php, flash...

Posted 01/09/2003, 17:50

cybermix, funcionaria tipow um sistema de Guestbook?

sim é qse igual
www.andrewsmedina.com.br

#5 Julio_WebDesign

Julio_WebDesign

    Turista

  • Usuários
  • 26 posts
  • Sexo:Não informado
  • Localidade:Mirassol D´OESTE
  • Interesses:CRIAÇÃO DE HOMEPAGE E TUDO NA AREA DE INFORMÁTICA

Posted 01/09/2003, 18:34

Amigo cybermix ele funciona tipo um livro de visita...más é na hora...do ladinho tem o formulário por exemplo:
Nome:
Sujestão:
ai no outro lado aparace o que vc colocou...
intendei

icq: 178978388
msn messenger: juliojr00@hotmail.com

#6 cybermix

cybermix

    andrewsmedina.com.br

  • Ex-Admins
  • 3586 posts
  • Sexo:Não informado
  • Localidade:Não sou desse planeta não!!!!
  • Interesses:python, fireworks, linux, php, flash...

Posted 02/09/2003, 09:34

coloca tudo na mesma pagina. mas nao é pra jogar o codigo tudo junto nao. coloca o from e o vizualiza na mesma pagina e deixa o valida em outra . se nao conseguir fala que eu faco o codigo pra voce
www.andrewsmedina.com.br




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq