Ver Mensaje Individual
  #1 (permalink)  
Antiguo 28/06/2002, 07:39
sitex696
 
Fecha de Ingreso: noviembre-2001
Mensajes: 65
Antigüedad: 23 años, 5 meses
Puntos: 0
Ayuda con codigo para crear txt y escribir en el

pues veran , estoy utilizando la libreria FSO para trabajar con textos, pero me da un error en el siguiente codigo:

Cita:
Dim x As String
Dim fil As File
Dim Afile As TextStream
On Local Error Resume Next

Set Afile = m_fso.CreateTextFile("hola.txt")
Set fil = m_fso.GetFile("hola.txt")
With Afile
Afile.WriteLine "que pasa"
Afile.WriteLine "adios"
Afile.Close
End With

End Sub
lo e estado mirando pero no encuentro el error, haber si me pueden resolver la duda