The version control Changeset object has an ArtifactUri property that returns the artifact uri for that changeset.  While you could manually build the artifact uri, as shown in the sample code, it's best to avoid it and treat the uri as being opaque.  Similarly, the Item object has an ArtifactUri property, which is what you'd want to use to get the artifact uri for a file or folder in version control (there are two types of artifact uri for an item: latest and a particular version).  To get an Item object, use the GetItem() or QueryItems() methods on the VersionControlServer object.

Buck

I installed an example Collectibles in TFS 2005 and then in TFS 2008 with a success but has emerged a problem when trying to retrieve a WorkItem that is "Holds" an item Collectibles.

The code is as follows:

  Sub Main()

     Dim servidor As String

     servidor = "TFS2008"

     Console.WriteLine()

     Console.WriteLine("Obtiene los padres de la tarea 790")

     ObtenerLosItemsPadresDelRequerimiento(servidor, 790)

     Console.WriteLine()

     Console.WriteLine("Presione ENTER para finalizar")

     Console.ReadLine()

  End Sub

  Public Sub ObtenerLosItemsPadresDelRequerimiento(ByVal nombreServidorTFS As String, _

                                                   ByVal idRequerimiento As Integer)

     ObtenerLosItemsPadres(nombreServidorTFS, _

                           "WorkItemTracking", _

                           "WorkItem", _

                           idRequerimiento)

     Console.WriteLine()

  End Sub

  Public Sub ObtenerLosItemsPadres(ByVal nombreServidorTFS As String, _

                                   ByVal herramienta As String, _

                                   ByVal artefacto As String, _

                                   ByVal id As Integer)

     'Conecto al TFS

     Dim tfs As TeamFoundationServer = ConectarTFS(nombreServidorTFS)

     Dim almacen As WorkItemStore

     Dim linkeo As ILinking

     Dim idArtefacto As ArtifactId

     Dim uriArtefacto As String

     'Obtengo el almacen de WI

     almacen = DirectCast(tfs.GetService(GetType(WorkItemStore)), WorkItemStore)

     'Obtengo el servicio de linkeo

     linkeo = DirectCast(tfs.GetService(GetType(ILinking)), ILinking)

     'Obtengo el URI para el requerimiento

     idArtefacto = New ArtifactId

     idArtefacto.Tool = herramienta

     idArtefacto.ArtifactType = artefacto

     idArtefacto.ToolSpecificId = id.ToString

     uriArtefacto = LinkingUtilities.EncodeUri(idArtefacto)

     'Obtengo los requerimientos a los que referencia (outbound link)

     Dim reqOut As Artifact()

     Dim uriList(0) As String

     uriList(0) = uriArtefacto

     '!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

     '    This the statement with error   !!!!!

     '!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

     reqOut = linkeo.GetReferencingArtifacts(uriList)

     For Each it As Artifact In reqOut

        Console.WriteLine(it.ArtifactTitle)

     Next

  End Sub

When running the sentence "linkeo.GetReferencingArtifacts (uriList)" with remote debug, I note that the TFS invokes:

  ''' <summary>

  ''' Gets the Artifacts referring to the uris

  ''' </summary>

  ''' <param name="artifactUriList">the array of artifact URIs</param>

  ''' <returns>the array of Collector Artifacts that refer to one or more URIs in uriList null if there are no such Collector Artifacts</returns>

  <WebMethod()> _

  Public Function GetReferencingArtifacts(ByVal artifactUriList() As String) As Microsoft.TeamFoundation.Artifact() Implements Microsoft.TeamFoundation.ILinkingConsumer.GetReferencingArtifacts

But it turns out that artifactUriList () is Nothing!

Gives the impression that the TFS is not carrying your product registered of the list of Uris as it was required in the original appeal, so the method GetReferencingArtifacts the Collector return nothing.

The content of the tables is as follows:

CollectorStore table

=============

Id  Title                      ProjectUri

1    Coleccionista 1      vstfs:///Classification/TeamProject/2c879976-3089-45c6-a098-261c0f4f7628

2    Coleccionista 2      vstfs:///Classification/TeamProject/2c879976-3089-45c6-a098-261c0f4f7628

OutboundLinks table

==============

CollectorId    Uri                                                                LinkType

1                   vstfs:///WorkItemTracking/Workitem/789     Points To

1                   vstfs:///WorkItemTracking/Workitem/790     Holds

2                   vstfs:///Collectibles/Collector/1                      Holds

Any idea?

Carlos Stizza

carlos.stizza@ksoft.com.ar