Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

matheusmelo

ASP grava html no xml

Por , em ASP Clássico

Recommended Posts

matheusmelo    0

matheusmelo
Postado

Olá pessoal !

 

Estou precisando com urgência de um fonte, ajudar, pedaço de código qualquer coisa que me ensine como fazer para inserir código html no xml.

Estou usando o seguinte código:

<%@Language=VBScript%>
<html><body>
<%
function ntag(str)
	'ntag = replace(str, "<", "<")
	'ntag = replace(ntag, ">", ">")
	ntag = Server.HTMLDecode(str)
end function

Private Function HTMLDecode(byVal encodedstring)
	Dim tmp, i
	tmp = encodedstring
	tmp = Replace( tmp, "%20", " " )
	tmp = Replace( tmp, "%22",""""  )
	tmp = Replace( tmp, """, chr(34) )
	tmp = Replace( tmp, "<"  , chr(60) )
	tmp = Replace( tmp, ">"  , chr(62) )
	tmp = Replace( tmp, "&" , chr(38) )
	tmp = Replace( tmp, " ", chr(32) )
	For i = 1 to 255
		 tmp = Replace( tmp, "" & i & ";", chr( i ) )
	Next
	HTMLDecode = tmp
End Function


data=request.form("dtNoticia1")
resumo=request.form("resumoNoticia1")

set doc=server.createobject("microsoft.xmldom")
doc.load(server.mappath("teste.xml"))
set raiz=doc.documentElement
set registro=doc.createelement("noticia")
raiz.appendchild(registro)
set campo=doc.createelement("data")
campo.text=data
registro.appendchild(campo)
set campo=doc.createelement("resumo")
campo.text=resumo
registro.appendchild(campo)
doc.save(server.mappath("teste.xml"))
response.write "&status=" & data & "&"
%><br>
</body></html>

estes dados estão vindo de um flash, porém quando gravo no xml ele fica dessa forma:

 

<?xml version="1.0" encoding="ISO-8859-1"?>
<noticias>
	<noticia>
	<data><p align="left"><font face="Tahoma" size="11" color="#333333" letterSpacing="0.000000" kerning="0"><b>23/10/2007</b></font></p></data>
	<resumo><p align="justify"></p></resumo>
	</noticia>
</noticias>
quando é gravado no xml ele troca os simbolos < por &lt e > por &gt

As funcões que estão no código são alguns testes que fiz, porém descobri que é quando é gravado no xml q ele troca os síbolos < e >

O que estou fazendo é testando como gravar no xml, mas meu objetivo final é criar uma ferramenta de inclusão, alteração e exclusão de conteúdo que está inserido no xml, se alguém tiver um fonte ou algo que possa me ajudar, agradeço muito !

Meu email é matheusmelo@yahoo.com.br

Agradeço desde já a atenção de todos !

Compartilhar este post

Link para o post
Compartilhar em outros sites

jrcardozo    4

jrcardozo
Postado

já tentou trocar os caracteres <> pelo código asc?

 

response.write(asc("<"))

response.write(asc(">"))

 

para gravar vocÊ usa chr(numero que rotornar de cada response.write)

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito