Nuevo error al cargar XML

   Tras guardar respuesta recibida de web server en archivo xml con la solución que me aportó Mihura :
' Guardar respuesta
        With CreateObject("Scripting.FileSystemObject")
            With .OpenTextFile(Archivo, 8, True, 0)           '8=ForAppending, True=crea si no existe, 0=ASCII
                .Write Contenido
                .Close
            End With
        End With

Todo funciona de maravilla hasta que al cargar el xml para leer se encuentra con alguna respuesta que contiene un acento, en ese caso no puedo leer el archivo. Intuyo será por la codificación, el archivo comienza <?xml version="1.0" encoding="UTF-8"?> ¿cómo puedo solucionarlo?

Autor	Mensaje Tema Buscar Opciones del Tema Responder Crear un nuevo tema Versión imprimible Traducir Tema
EMB Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Añadir a la lista de amigos Nuevo Unido: 24/Septiembre/2025 Localización: Zaragoza Estado: Sin conexión Puntos: 6	Tema: Nuevo error al cargar XML Enviado: 26/Septiembre/2025 a las 10:37
	Tras guardar respuesta recibida de web server en archivo xml con la solución que me aportó Mihura : ' Guardar respuesta With CreateObject("Scripting.FileSystemObject") With .OpenTextFile(Archivo, 8, True, 0) '8=ForAppending, True=crea si no existe, 0=ASCII .Write Contenido .Close End With End With Todo funciona de maravilla hasta que al cargar el xml para leer se encuentra con alguna respuesta que contiene un acento, en ese caso no puedo leer el archivo. Intuyo será por la codificación, el archivo comienza <?xml version="1.0" encoding="UTF-8"?> ¿cómo puedo solucionarlo?

EMB Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Añadir a la lista de amigos Nuevo Unido: 24/Septiembre/2025 Localización: Zaragoza Estado: Sin conexión Puntos: 6	Enviado: 29/Septiembre/2025 a las 15:25
	Finalmente lo he solucionado sustituyendo la codificación UTF-8 por ISO8859-1. Resulta algo chapuzero pero funciona. Gracias y podéis cerrar el hilo.