Ejemplos usando el Api de windows para Visual basic

250 - Monitorear cambios en carpetas y archivos

<Volver> - Anterior - Siguiente



 

 

Módulo de clase para poder notificar y capturar cuando se producen cambios en un directorio o archivo usando algunas funciones del Api

 

En este ejemplo se usan las funciones FindFirstChangeNotification, FindCloseChangeNotification y FindNextChangeNotification

 

 

Para usar el módulo se debe indicar:

 

 

Por ejemplo

    ' nueva instancia de class1
    Set Obj1 = New Class1
    
    With Obj1
        .Intervalo = 100 ' tiempo en milisegundos
        ' flags
        .FLAGS = FILE_NOTIFY_CHANGE_FILE_NAME Or _
                 FILE_NOTIFY_CHANGE_DIR_NAME Or _
                 FILE_NOTIFY_CHANGE_LAST_WRITE Or _
                 FILE_NOTIFY_CHANGE_ATTRIBUTES
    
        .IncluirSubdir = True ' incluye subcarpetas
        .Path = "c:\windows" ' ruta
    End With

 

Los Flags determinan que cambios se deberán notificar, por ejemplo: cambios en archivos, en solo directorios, en ambos, cambio en el tamaño, cambio en todos los atributos , cuando se crea y otros . (Estos se pueden combinar con el operador Or )

Por ejemplo para notificar todos los posibles cambios :

        .FLAGS = FILE_NOTIFY_CHANGE_FILE_NAME Or _
                 FILE_NOTIFY_CHANGE_ATTRIBUTES Or _
                 FILE_NOTIFY_CHANGE_DIR_NAME Or _
                 FILE_NOTIFY_CHANGE_CREATION Or _
                 FILE_NOTIFY_CHANGE_LAST_ACCESS Or _
                 FILE_NOTIFY_CHANGE_LAST_WRITE Or _
                 FILE_NOTIFY_CHANGE_SIZE  

 

Luego para comenzar a monitorear, ejecutar el método Comenzar

Obj1.Comenzar

Para terminar

Obj1.Detener

 

Cuando se produce un cambio en el directorio o carpeta , se dispara el evento Change

 

Formulario de Ejemplo

 

Agregar dos Comamndbutton

Código fuente en el formulario

 

 

Código fuente en un módulo de clase llamado Class1

 


Recursos visual basic 6.0

Recursos visual basic.net



Buscar en Recursos vb