e Const CDN_FOLDERCHANGE = (CDN_FIRST - &amp;H2)
Private Const CDN_SHAREVIOLATION = (CDN_FIRST - &amp;H3)
Private Const CDN_HELP = (CDN_FIRST - &amp;H4)
Private Const CDN_FILEOK = (CDN_FIRST - &amp;H5)
Private Const CDN_TYPECHANGE = (CDN_FIRST - &amp;H6)
Private Const CDN_INCLUDEITEM = (CDN_FIRST - &amp;H7)

Private Const CDM_FIRST = (WM_USER + 100)
Private Const CDM_LAST = (WM_USER + 200)

Private Const DWL_MSGRESULT = 0
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA"
 (ByVal hwn