偶有这方面的例子,这里说不清楚,留下email或发email到[email protected]

解决方案 »

  1.   

    通过两个未公开函数来实现
    SHChangeNotifyRegister和SHChangeNotifyDeregister
    声明
    Declare Function  SHChangeNotifyRegister Lib "shell32" Alias "#2"(byval hWnd as long,byval uFlags as SHCN_ItemFlags,byval dwEventIDas SHCNN_EventIDs,byval uMsg as long,byval cItems as long,lpps as PIDLSTRUCT)as long
    Declare Function  SHChangeNotifyDeregister Lib "shell32" Alias "#4"(byval hNotify as long)as long