Problemilla con FSO!

[pepelucho]

Holas, estoy haciendo un form donde uno ingresa su correo y al darle click en un boton enviar crea un archivo .txt donde se guardara todas los correos y pero al ingresar otro correo borra el dato anterior q estaba como podria hhacer para q se guarde uno debajo de otro.


Espero q me puedan ayudar.

SaLuDoS dE:
PePeLuChO dEl PeRú PaRa El MuNdO ;)

[urjose]

Puedes colocar el codigo donde escribes en el archivo?

Saludos

<center><img src="http://www.pcmasmas.com.ar/foro/images/avatars/043.gif"><br>
Urjose</center>

[AlZuwaga]

Yo lo haría así:

Código:

<%
Email = Request.Form("email")

Dim FSO, Archivo, strContenido

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Archivo = FSO.OpenTextFile(server.mappath("email.txt"),1)
strContenido = Archivo.ReadAll

strContenido = strContenido & vbcrlf & Email

Dim Guardar
Set Guardar = FSO.CreateTextFile(Server.MapPath("email.txt"), TRUE)
Guardar.Write strContenido

Set Guardar = nothing
Set FSO = nothing
Set Archivo = nothing
%>

[pepelucho]

Gracias por todo me funciono perfecto son unos capos :P

SaLuDoS dE:
PePeLuChO dEl PeRú PaRa El MuNdO ;)

[urjose]

yo no dije nada productivo, jeje

<center><img src="http://www.pcmasmas.com.ar/foro/images/avatars/043.gif"><br>
Urjose</center>

[zangano]

haber urjose, nomas estas aumentado tus mensajes¡¡¡¡¡


a mi me vale, solo es un mero comentario


salu2


ni tengo aclarar que mi post tampoco es nada productivo vea