主题：关于文件监视

文件监视器怎么用啊？可以监视某个文件下所有文件的变化吗？

 

可以监视任何文件夹下的文件变化。http://www.foxtable.com/webhelp/scr/1963.htm

 

我想问下文件监视器怎么知道哪个文件发生了变化呢？

 

这个是windows的机制，可以监测的。自己绑定事件也行

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77315&skin=0

 

可是真的名称是临时文件名啊，获取到的

这个是bug，要自己绑定事件，参考

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77315&skin=0

我按照链接加上事件，结果是这样的，我创建的是名字是555的文件
此主题相关图片如下：1.png

都说是bug咯，你要自己绑定事件啊。

 

全局代码

 

Public Sub OnDeleted(ByVal source As Object, ByVal e As System.IO.FileSystemEventArgs)
msgbox(e.FullPath)
End Sub

Public Sub OnCreated(ByVal source As Object, ByVal e As System.IO.FileSystemEventArgs)
msgbox(e.FullPath)
End Sub

Public Sub OnRenamed(ByVal source As Object, ByVal e As System.IO.RenamedEventArgs)
msgbox(e.FullPath)
End Sub

Public Sub OnChanged(ByVal source As Object, ByVal e As System.IO.FileSystemEventArgs)
msgbox("OnChanged" & e.FullPath & "e.ChangeType:" & e.ChangeType.ToString())
End Sub

 

调用代码

 

Dim watcher As new System.IO.FileSystemWatcher()
watcher.Path = "D:\test\"
watcher.Filter = "*.*"
watcher.IncludeSubdirectories = True
addhandler watcher.Changed, addressof OnChanged
addhandler watcher.Renamed, addressof OnRenamed
addhandler watcher.Deleted, addressof OnDeleted
addhandler watcher.Created, addressof OnCreated
watcher.EnableRaisingEvents = True

我按照你这个的打印结果如下

没办法，又出不来附件，只能再加一条记录
此主题相关图片如下：1.png

此主题相关图片如下：2.png