Escribir en un fichero .txt existente

[igualitoajbs]

Hola, a ver yo tengo este código:

<textarea name="reglamento" rows="36" cols="215" readonly="readonly">
<!--#include file='reglamento.txt'-->
</textarea>

Queria saber si hay alguna forma de que yo cuando modifico en el textarea el el documento 'reglamento.txt', al principio, por el medio por el final donde sea, si se puede abrir con alguna funcion el archivo.txt y modificar el 'reglamento.txt', con los cambios que halla hecho.

Saludos y gracias.

[Myakire]

Sería más fácil se borras el txt y lo vuelves a crear con el contenido del textarea, no crees?

[igualitoajbs]

jeje...pues la verdad que si, no habia caido, y como sabes como se haria exactamente?, como le asigno el contenido del textarea?. Saludos y gracias.

[Myakire]

Ando un poco apurado, pero al rato vemos tu avance y te ayudo con el código si aún lo necesitas, mientras revisa esta liga, estoy seguro que con su contenido tendrás para hacer lo que necesitas.

Saludos

[angel_dope]

Busca en el foro FSO (file system object) con eso se crean, leen, rellenan archivos.

[Shiryu_Libra]

tambien puedes entrar al POST de la mini competencia, ahi esta la aplicacion que hizo Al_Zuwaga donde puedes mirar el codigo y ver como se escribe un archivo

suerte

[igualitoajbs]

Hola, gracias por vuestras respuestas, esto es lo que he hecho:

' Declaracion variables.
Dim objFSO,originalFichero,nuevoFichero

originalFichero = server.mappath("C:\Documents and Settings\jantonio.bernal\Mis documentos\reglamento.txt")
nuevoFichero = server.mappath("C:\Documents and Settings\jantonio.bernal\Mis documentos\nuevoReglamento.txt")

' Crear un obejo FileSystemObject.
Set objFSO = CreateObject("Scripting.FileSystemObject")
' Crear el fichero.
Set nuevoFichero = objFSO.CreateTextFile(nuevoFichero, True)

' Escribir en el fichero.
nuevoFichero.Write (request("reglamento"))

' Cerrar el fichero.
nuevoFichero.Close

' Borrar fichero original.
objFSO.DeleteFile (originalFichero)

' Renombrar el nuevo fichero.
objFSO.MoveFile nuevoFichero, originalFichero

Pero me dice que la direccion para server.mappath debe ser una virtual y no una direccion fisica...??????????, que tengo mal?.

Saludos y gracias, seguire mirando mientras alguien me pueda echar una mano.

[angel_dope]

Sip, a server mappath hay que pasarle una ruta relativa. Por ejemplo, si tu asp está en la carpeta "Programa" y el txt lo vas a guardar en una subcarpeta llamada docs, la ruta seria "Server.mappath("./docs/nombre.txt"). si por el contrario, está en una carpeta superior, tienes que ir subiendo niveles en el arbol de directorio. Para ello se usa "..", si quieres subir dos niveles y entrar después en una carpeta llamada documentos, tendrías que poner "server.mappath("../../documentos/nombre.txt")"

[igualitoajbs]

Hola, gracias pues bien, el error ha cambiado;

La pagina que ejecuto es reglamento.asp y el reglamento.txt esta en el mismo directorio por lo tanto supongo que solo tengo que poner:

originalFichero = server.mappath("/reglamento.txt")
nuevoFichero = server.mappath("/nuevoReglamento.txt")

O incluso sin la "/" creo que estaria bien no, es correcto?. Ahora por lo demas el codigo que puse esta bien tambien correcto?..pues bien el error que me da ahora es "Permiso denegado" en la linea de codigo "Set nuevoFichero = objFSO.CreateTextFile(nuevoFichero, True)"....

Por lo que el codigo esta correcto todo no?, el problema seria que me dieran permisos de escritura, lectura sobre ese directorio u otra cosa?

Saludos y gracias.

[Myakire]

Debes darle permisos de escritura a ese directorio al usuario IUSR_NombreDelPC que es usuario que accede de manera anónima al web.

Saludos

[igualitoajbs]

Hola, ok gracias a todos.