Dim filenumber As Integer
filenumber=Freefile()
Open "XXX.txt" For output As filenumber
--- si lo que quieres es pasarle un texto literal
write #filenumber,"esto es un texto de prueba"
--- si le pasas al fichero una variable
write #filenumber,nombre_de_la_variable_de_tipo_string
Close filenumber
NOTA: El metodo de obertura del fichero es output, es decir,
que te machaca el contenido del fichero con la nueva informacion.
En el caso de que te interese añadir sin machacar, cambia la fila del
"Open "XXX.txt" For output As filenumber"
por esta otra:
"Open "XXX.txt" For append As filenumber"
Recuerda que XXX.txt es el nombre del fichero que quieres crear.
Con estos metodos, LotusScript busca el fichero que quieres abrir y si no lo encuentra, lo crea.
Si necesitas mas ayuda, puedes mandarme un correo a:
[email protected] Espero que mi codigo te sea util. Un saludo
