sert, ":")
   sPathInsert = Mid(sPathInsert, iPos + 1)
   
   bOk = Not (InStr(sPathInsert, sPathDrag) = 1)
   validateDragLocation = bOk

End Function
</pre><p>
The final aspect is handled in the <span class="code">DragDropRequest</span>
event.  This performs an additional check for the validity of the drop location
which could have changed since the last <span class="code">OLEDragOver</span>
event.  If still ok, it asks for confirmation about the move, deletes the old
item and then adds a new one as a chi