Alguien sabe por que no me funciona
option Explicit
const logfile=".\texto.txt"
function creaArchivo
Dim FSO, flog ' filesystemobject para manejo de archivos, archivo de log del proceso
Set FSO = CreateObject("Scripting.FileSystemObject")
Set flog = FSO.OpenTextFile(logfile, ForAppend, True)
flog.WriteLine ("hola")
flog.Close
set flog = Nothing
End Function
Sun Main( )
On Error Resume Next
Call creaArchivo
End Sub
Gracias
