API函数急需，谢谢

Question

要求这个API函数能够监测一个目录下，当目录下有新文件产生的时候，产生一个响应，触发其它事件。 急需，谢谢

Answer 1

【声明】
Public Declare Function FindFirstChangeNotification Lib "kernel32" Alias "FindFirstChangeNotificationA" (ByVal lpPathName As String, ByVal bWatchSubtree As Long, ByVal dwNotifyFilter As Long) As Long
【说明】
创建一个文件通知对象。该对象用于监视文件系统发生的变化
【返回值】
Long，如成功，返回一个改变通知对象的句柄；INVALID_HANDLE_VALUE表示失败。会设置GetLastError
【参数表】
  lpPathName -----  String，要监视的目录  bWatchSubtree --  Long，如果为TRUE，表示监视lpPathName的所有子目录  dwNotifyFilter -  Long，带有前缀FILE_NOTIFY_CHANGE_???前缀的一个或多个常数，它们指定了对象发出信号的条件
【其它】
用FindCloseChangeNotification函数关闭句柄，不要用CloseHandle函数