| ID | Asunto | Fecha | Nick | |
| 40607 | Crear fichero con Open xx For output As #1 | 21/04/08 11:02 | jesus_yo | |  |
Hola. Tengo el siguiente codigo para crear ficheros xml. Los utilizo para poner unas pocas lineas y siempre se refiere cada fichero a un unico registro. Me gustaria seguir manteniendo esta estructura.
Open "c:\Fichero_001.xml" For Output As #1
Print #1, "<?xml version='1.0' encoding='UTF-8'?>"
Print #1, "<datos>"
Print #1, " <registro>"
Print #1, " <Nombre>" & "48013H01" & "</Nombre>"
Print #1, "</datos>"
Print #1, " </registro>"
Close #1
¿Como puedo hacer para que al guardar el fichero pueda poner que la Codificacion es UTF-8? Igual hay otra forma de crear un xml, pero esta es la que mas facil he encontrado Muchas gracias |
|
| ID | Asunto | Fecha | Nick | |
| 41152 | Re: Crear fichero con Open xx For output As #1 (Resp: 40607) | 08/05/08 17:30 | Pol Florez | | |
Hay Otra Forma como casi siempre pero para cambiar la codificacion no se como se hace, asi se guarda en ASCII que tambien lo puedes hacer asi:
Open "c:\Fichero_001.xml" For binary As #1
Cadena = "" & vbCrLf & _ ' vbCrLf Es Linia Siguiente
"" & vbCrLf & " " & vbCrLf & " " & _
"48013H01" & ""
Put #1, 1, Cadena
Close #1
No se si asi te ira, porque lo que quieres es cambiar la codificacion y eso se ara de otra forma.
Espero que te sea de ayuda.
Pol Florez
[Editado: Pol Florez, 08/05/2008 17:31:06]
[Pol Florez, 08/05/2008 17:33:21]
Si esta respuesta resuelve tu duda, por favor pulsa en la  de este mensaje. Gracias. |
