主题：关于文件监视

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

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

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

都说是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

我测试，创建文件是最正常的。

根据弹出的提示，你对应的修改自己的代码，比如如果是临时文件名，就忽略；正确的文件名，才执行自己的代码。

判断一下文件名不就好了？如果是不规则的文件名，就不处理。

比如 没有.xls或.xlsx 后缀名的，不处理；比如 有$等字符的也不处理。 规律自己可以总结出来。