27/12/2004, 09:39
|
 | | | Fecha de Ingreso: enero-2002 Ubicación: USA
Mensajes: 768
Antigüedad: 22 años, 4 meses Puntos: 1 | |
| Lo cambie a esto:
date_now = datepart("d",date())&datepart("m",date())&datepart ("yyyy",date())
path = Server.Mappath("../")
Dim fso, MiArchivo
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set MiArchivo = fso.CreateTextFile(path & "\documentos\nomina" & date_now & ".txt", True)
MiArchivo.WriteLine("Esto es una prueba.")
MiArchivo.Close
Pero sigue sin funcionar
__________________
José Molina
La marginalidad no esta en la incapacidad de calmar el hambre de un estómago sino en la incapacidad de calmar el hambre de la mente. |