Programación General > Visual Basic 6.0 e inferiores

 Re: FileSystemObject

(1/1)

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

J.M.Movilla:
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...

Navegación

[0] Índice de Mensajes