0 Replies Latest reply on May 13, 2014 12:31 PM by Ben Molitor

    Removing Reference from Item

    Ben Molitor

      I am trying to remove a reference from an Item. My code works fine when I add a Reference to the Item through code.

      But when I add a reference to an Item manually through the Item Explorer, I am not able to Remove this Reference. Any Ideas?



          Private Function Item_RemoveFile(ByRef Item As IEdmItem, FileName As String, FileID As Integer) As String


                  Dim RemoveRef(0) As EdmItemRef

                  Dim refFlags As Integer = EdmRefFlags.EdmRef_File

                  Dim ExistingRefs() As EdmItemRef = Nothing


                  ' Get Existing References

                  Item.GetReferences(refFlags, ExistingRefs)


                  For Each ExistingRef As EdmItemRef In ExistingRefs


                      If ExistingRef.moNamePathOrID = FileID Then


                           ' Found Reference

                          RemoveRef(0) = ExistingRef


                          ' Remove Reference

                          Item.UpdateReferences(Nothing, RemoveRef)



                          ' This Function Checks the Item Back In

                           Update_ItemStatus(Item, True, "Removed File Reference")


                          Return ""


                      End If

                  Next ExistingRef