Aruivo texto não grava acento

[lfelipefr 0]

Amigos, boa tarde! Criei uma rotina em ASP que cria um arquivo com extensão XML e transfere todos os dados de uma tabela para este arquivo. O problema é que, quando finaliza e dou uma olhada no arquivo gerado, as letras que possuem acento (e que ficam no campo descricao_categoria) estão sendo substituídas por um "quadrado", como se a rotina não conseguisse gravar palavras acentuadas neste arquivo. Aqui vai o que eu escrevi:

 

-------------------------------------------------------------------

 

arquivo= "arq.xml"

 

set confile = createObject("scripting.filesystemobject")

 

set fich = confile.CreateTextFile(arquivo, True)

fich.write("<?xml version=""1.0"" encoding=""utf-8"" standalone=""yes""?>" & chr(13) & chr(10))

fich.write("<images>" & chr(13) & chr(10))

 

'abre o banco de dados

Call abre_conexao(conexao)

 

' Le informacoes das RS_Categorias

Set RS_Categorias = Server.CreateObject("ADODB.Recordset")

 

RS_Categorias.Open "SELECT codigo_categoria, nome_categoria, descricao_categoria, tipo, disponivel FROM Categorias WHERE disponivel='1' ORDER BY codigo_categoria", Conexao

Do While Not RS_Categorias.EOF

fich.write(" <thumb displayNum=""10"" separation=""5"">" & chr(13) & chr(10))

fich.write(" <image>images/foto" & RS_Categorias("codigo_categoria") & ".jpg</image>" & chr(13) & chr(10))

fich.write(" <description>" & RS_Categorias("nome_categoria") & "</description>" & chr(13) & chr(10))

fich.write(" </thumb>" & chr(13) & chr(10))

RS_Categorias.MoveNext

Loop

RS_Categorias.Close

 

Set RS_Categorias = Nothing

 

fich.write("</images>")

fich.close()

set confile = Nothing

 

-------------------------------------------------------------------

 

Não consigo fazer com que este arquivo XML reconheça acento. Alguém pode me ajudar?!

 

Obrigado!!

[hargon 64]

Troca encoding="utf-8" por encoding="ISO-8859-1".

[lfelipefr 0]

Já havia tentando isso, broder, mas não tive êxito!

 

Continuo em busca da solução!

 

De qq forma, muito obrigado!! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif