SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Ronstone en Miércoles 26 de Febrero de 2003, 00:36

Título: Re: FileSystemObject
Publicado por: Ronstone en Miércoles 26 de Febrero de 2003, 00:36

He tratado de usar el FileSystemObject pero no funciona cuando corro el programa aparece error, como hago para usar el FSO

Título: FileSystemObject
Publicado por: J.M.Movilla en Miércoles 26 de Febrero de 2003, 23:44

Hola:
Yo lo empleo frecuentemente.  Por ejemplo, para borrar un fichero, con DeleteAFile( Filename) :

Sub DeleteAFile(EspecArch)
    Dim fso
   
    On Error Resume Next
    Set fso = CreateObject("Scripting.FileSystemObject")
    fso.deletefile (EspecArch)
End Sub

"On Error Resume Next" lo pongo para evitarme en condicionar si existe el fichero; en el caso de que no exista, no lo borra, claro está, pero no da error...