HTMLEncode

[mkboy 1]

Na hora do usuário postar um comentário, eu faço assim:c_comentario2 = replace(c_comentario2,chr(13),"<br>")Desta forma troco os espaços dados pelo enter por tags brE na hora de exibir na tela, quero fazer assim:<%=Server.HTMLEncode(RS2("b_Comentario"))%>Só que ele ta mostrando minhas tags <br> na tela!Entao, com a ajuda de um amigo, fiz assim:<% Comentario = Replace(RS2("b_Comentario"), "<BR>", Chr(13))Comentario = Server.HTMLEncode(RS2("b_Comentario")Comentario = Replace(Comentario, Chr(13), "<B>")%><%=comentario%>E assim:<% Comentario = Replace(RS2("b_Comentario"), Chr(13) , "<BR>")Comentario = Server.HTMLEncode(Comentario)Comentario = Replace(Comentario, "<BR>", Chr(13))%>Mas continuar exibindo os <br> na tela!

[DackAle 0]

ASP [/tr][tr]<%

texto = server.HTMLEncode(rs("texto") )

texto = replace(texto,chr(13),"<br>"

%>

<%=texto%>

[/tr]

 

 

assim funciona =)

[mkboy 1]

Num foi ainda....

 

 

Fiz assim:

 

ASP [/tr][tr]<%

texto = server.HTMLEncode(rs2("b_Comentario"))

texto = replace(texto,chr(13),"<br>")

%>

<%=texto%>

[/tr]

 

E continua assim:

 

teste<br> <br> teste<br> <br> <br> teste

 

Esse br foi adicionado por enter.

 

:(

[Salgado 4]

Tente usar em minusculas (não creio que seja isso, masssss)

<%

Comentario = Replace(RS2("b_Comentario"), "<br>", Chr(13))

Comentario = Server.HTMLEncode(RS2("Comentario") 'Aqui tembém tinha um errinho.

Comentario = Replace(Comentario, Chr(13), "<br>")

%>

<%=comentario%>

[/tr]

[mkboy 1]

Fiz assim:

 

ASP [/tr][tr]<%

Comentario = Replace(RS2("b_Comentario"), "<br>", Chr(13))

Comentario = Server.HTMLEncode(RS2("b_comentario")

Comentario = Replace(Comentario, Chr(13), "<br>")

%>

<%=comentario%>

[/tr]

 

Deu isso:

 

Tipo de erro:

Erro de compilação do Microsoft VBScript (0x800A03EE)

')' esperado

/galery/Profissional/Pescaki/new/detalhes.asp, line 660, column 50

Comentario = Server.HTMLEncode(RS2("b_comentario")

Ae eu fiz isso:

 

ASP [/tr][tr]<%

Comentario = Replace(RS2("b_Comentario"), "<br>", Chr(13))

Comentario = Server.HTMLEncode(RS2("b_comentario"))

Comentario = Replace(Comentario, Chr(13), "<br>")

%>

<%=comentario%>

[/tr]

 

Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A000D)

Tipos incompatíveis: 'HTMLEncode'

/galery/Profissional/Pescaki/new/detalhes.asp, line 660

A linha 660 é:

 

Comentario = Server.HTMLEncode(RS2("b_comentario"))

Ué!

 

:huh:

[FabricioGomes 0]

nao utilize o htmlencode, somente substitua o chr(13) por <BR> senao ele sempre vai mostrar o <BR>...a nao ser que voce tenha um codigo-fonte para mostrar, é isso?

[Salgado 4]

Ele está usando o HTMLEncode para exibir as comentários deixados por usuários do site, se você deixar o html "ativado" nesses casos pode não ser muito interessante.

<%

Comentario = Replace(RS2("b_Comentario"), "<br>", Chr(13))

Comentario = Server.HTMLEncode(Comentario)

Comentario = Replace(Comentario, Chr(13), "<br>")

%>

<%=comentario%>

[/tr]

[Mário Monteiro 179]

realmente se ele não fizer isto podem colocar ate comandos javascript...

[FabricioGomes 0]

entao ele usa o htmlencode antes, depois muda o chr(13) para <BR>Como o DackAle escreveu:<%texto = server.HTMLEncode(rs("texto")) texto = replace(texto,chr(13),"<br>")%> :)

[Mário Monteiro 179]

entao ele usa o htmlencode antes, depois muda o chr(13) para <BR>Como o DackAle escreveu:<%texto = server.HTMLEncode(rs("texto")) texto = replace(texto,chr(13),"<br>")%> :)

assim que deve ser feito...

[Salgado 4]

O que acontece é que ele fez o replace antes, na inserção no DB. É só acompanhar o 1º post. Por isso eu indiquei que na exibição ele desfizesse a troca, aplicasse o HTMLEncode e trocasse novamente.

[Mário Monteiro 179]

O que acontece é que ele fez o replace antes, na inserção no DB. É só acompanhar o 1º post. Por isso eu indiquei que na exibição ele desfizesse a troca, aplicasse o HTMLEncode e trocasse novamente.

agora que vi isso, mas não foi uma boa ele trocar logo na inserção...mas já que está assim ele só deve mudar pra br depois deste replace do salgado mesmo...

[mkboy 1]

Funcionou!

 

Sou mais uma vez muito grato pela atenção e pelo acompanhamento até a solução!

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

Valeu mesmo!

[Mário Monteiro 179]

pode ficar tranquilo cara...