problema al escribir en un txt

[ToKaTa]

hola amigos,

estoy intentando escribir en un archivo pero no se por que misterio el tio se empeña en que para cada linea que meto, me vacia el txt y me mete la nueva linea, y claro, lo que necesito es que se escriba al final.

Mi codigo es:

cadena = "Esta es la cadena"

set FSO = Server.CreateObject("Scripting.FileSystemObject")

ruta = Server.MapPath("/adminweb/logs/accesos.log")

set archivoLog = FSO.CreateTextFile(ruta,8,true)

archivoLog.writeline cadena
archivoLog.close

set archivoLog = nothing
set FSO = nothing



este codigo siempre me habia funcionado, y me funciona en otros ejemplos que tengo hecho, por eso no entiendo lo que pasa. Se supone que el 8 indica que añada al final del archivo el nuevo registro, pero naaa, no hay forma. Alguno sabe que puede pasar?



Gracias!


ToKaTa.

bueno, ejem.....si es que uno se empeña en mirar y no ver...


si hubiera cambiado:

CreateTextFile

por

OpenTextFile



todo iria mejor


Gracias a todos



ToKaTa.

[maestro]

<%
'Añadir lineas a un fichero
set FSO = Server.CreateObject("Scripting.FileSystemObject")
set oFich = FSO.OpenTextFile(Server.MapPath("prueba.txt"), 8)
'8=ForAppending Abre un archivo y escribe al final del mismo.
oFich.WriteLine ("Esta es la nueva línea que hemos añadido.")
oFich.Close
set oFich = nothing
%>

Toma, leete esto, mas cosillas sobre el FSO, cosecha propia.
http://faqsdelweb.com/index.php?num=3&f_id=2&s_id=30