- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 关于文件监视 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=105641)
-- 发布时间：2017/8/23 14:16:00
-- 关于文件监视
文件监视器怎么用啊？可以监视某个文件下所有文件的变化吗？
-- 发布时间：2017/8/23 14:43:00
--
文件监视器怎么用啊？可以监视某个文件下所有文件的变化吗？
可以监视任何文件夹下的文件变化。http://www.foxtable.com/webhelp/scr/1963.htm
-- 发布时间：2017/8/23 17:50:00
--
我想问下文件监视器怎么知道哪个文件发生了变化呢？
-- 发布时间：2017/8/23 18:23:00
--
我想问下文件监视器怎么知道哪个文件发生了变化呢？
这个是windows的机制，可以监测的。自己绑定事件也行
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77315&skin=0
-- 发布时间：2017/8/24 20:07:00
--
可是真的名称是临时文件名啊，获取到的
-- 发布时间：2017/8/24 20:34:00
--
这个是bug，要自己绑定事件，参考
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77315&skin=0
-- 发布时间：2017/8/25 7:33:00
--
我按照链接加上事件，结果是这样的，我创建的是名字是555的文件
此主题相关图片如下：1.png
此主题相关图片如下：qq截图20170825073845.png
-- 发布时间：2017/8/25 8:51:00
--
都说是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
-- 发布时间：2017/8/25 14:08:00
--
我按照你这个的打印结果如下
-- 发布时间：2017/8/25 14:09:00
--
没办法，又出不来附件，只能再加一条记录
此主题相关图片如下：1.png
此主题相关图片如下：2.png