Отправляет email-рассылки с помощью сервиса Sendsay

Статьи по Visual Basic.NET

  Все выпуски  

Статьи по Visual Basic.NET Элемент управления FileSystemWatcher


Информационный Канал Subscribe.Ru

В начало Ozon.ru
  Главная | Новости | Статьи | Каталог | Софт | Регистрация | Поиск

Новые статьи

1. Двойная буферизация
2. Переопределение событий
3. Создание многопоточного приложения в VB.NET
4. Вставка в графическое поле содержимого буфера
5. Работа с папками и файлами в VB.NET
6. Броузер базы на основе простого связывания на ADO.NET
7. Операция Drag and Drop для графического файла
8. Visual Basic.NET и XML

Свежие компьютерные новости

13.12.2005 Новый рекорд скорости передачи информации в интернете
13.12.2005 Компактный медиаплеер Sorell NF1 с GPS-навигатором
13.12.2005 В декабре Microsoft выпустит два новых патча
13.12.2005 Четырехъядерные процессоры появятся в 2007 году

Элемент управления FileSystemWatcher и отслеживание изменений файловой системы

Элемент управления FileSystemWatcher является экземпляром класса FileSystemWatcher пространства имён System.IO. Он применяется для отслеживания изменений в файловой системе. Свойство Path экземпляра класса FileSystemWatcher задаёт каталог, в котором отслеживаются изменения в файловой системе. Свойство NotifyFilter задаёт фильтр, отсеивающий типы наблюдаемых изменений. Свойства Changed, Created, Deleted и Renamed специфицируют тип изменения. Оператор AddHandler позволяет связать отслеживаемое изменение с соответствующим обработчиком события.

В качестве примера сконструируем простой демонстрационный проект, в котором в список выводятся изменения, происходящие в каталоге, указанном в поле ввода. Режим отслеживания изменений активизируется по нажатию кнопки Start и прекращается по нажатию кнопки Stop. Итак, создайте форму, в которой расположите поле ввода, список и две кнопки. С помощью окна Properties установите им значения свойств, как показано в таблице.

Поле ввода Name txtPath
Text ""
Список lstWatcher
Кнопка Name btnStart
Text Start
Кнопка Name btnStop
Text Stop

Для завершения проекта остаётся только в код, сгенерированный мастером проекта, добавить следующий код:

Public fsw As System.IO.FileSystemWatcher


Private Sub btnStart_Click(ByVal sender As System.Object, _
   ByVal e As System.EventArgs) Handles btnStart.Click
    fsw = New System.IO.FileSystemWatcher()
    fsw.Path = txtPath.Text
    fsw.NotifyFilter = IO.NotifyFilters.DirectoryName _
     Or IO.NotifyFilters.FileName _
     Or IO.NotifyFilters.Attributes
    fsw.EnableRaisingEvents = True
    btnStart.Enabled = False
    btnStop.Enabled = True
End Sub

Private Sub changeWatcher(ByVal source As Object, _
   ByVal e As System.IO.FileSystemEventArgs)
    Select Case e.ChangeType
        Case IO.WatcherChangeTypes.Changed
            lstWatcher.Items.Add("File " & e.FullPath & " has been modified")
        Case IO.WatcherChangeTypes.Created
            lstWatcher.Items.Add("File " & e.FullPath & " has been created")
        Case IO.WatcherChangeTypes.Deleted
            lstWatcher.Items.Add("File " & e.FullPath & " has been deleted")
    End Select
End Sub

Public Sub renameWatcher(ByVal source As Object, _
   ByVal e As System.IO.RenamedEventArgs)
    lstWatcher.Items.Add("File " & e.FullPath & " has been renamed to " & e.Name)
End Sub

Private Sub btnStop_Click(ByVal sender As System.Object, _
   ByVal e As System.EventArgs) Handles btnStop.Click
    fsw.EnableRaisingEvents = False
    btnStart.Enabled = True
    btnStop.Enabled = False
End Sub



Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора
Подписан адрес:
Код этой рассылки: comp.soft.prog.visualbnet
Архив рассылки
Отписаться
Вспомнить пароль

В избранное