Ver Mensaje Individual
  #3 (permalink)  
Antiguo 28/11/2004, 19:34
daniken
 
Fecha de Ingreso: septiembre-2004
Mensajes: 4
Antigüedad: 20 años, 8 meses
Puntos: 0
Esto te permite llevar los datos del formulario a un archivo de salida con la coma como separador de campo.....

fnombre = Request.form("nombre")
femail = Request.form("email")
ftelefono = Request.form("telefono")
fcomentario = Request.form("comentario")

Dim objTextStream, objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
DirToFile = Server.MapPath("archivo.txt")
Set objTextStream = objFSO.OpenTextFile (DirToFile, 2, True)
objTextStream.WriteLine fnombre&","&femail&","&ftelefono&","&fcomentario
objTextStream.Close
Set objTextStream = Nothing
Set objFSO = Nothing


Última edición por daniken; 28/11/2004 a las 19:37