GetCachePath Method

Description

This method returns the cache paths for the specified files.

Syntax

Visual Basic
Public Function GetCachePath( _ ByVal numberOfFilesToGetPathFor As Long, _ ByVal ListOfFilePaths As Variant, _ ByRef numberOfFilesReturned As Long, _ ByRef ListOfFilesContainingCachePaths As Variant _ ) As Long

Visual Basic

Public Function GetCachePath( _
   ByVal numberOfFilesToGetPathFor As Long, _
   ByVal ListOfFilePaths As Variant, _
   ByRef numberOfFilesReturned As Long, _
   ByRef ListOfFilesContainingCachePaths As Variant _
) As Long

Parameters

numberOfFilesToGetPathFor: Specifies the number of files for which to obtain cache paths.
ListOfFilePaths: Specifies the URL locations on a SharePoint server of the files for which to obtain cache paths.
numberOfFilesReturned: Specifies the number of files for which cache paths were obtained.
ListOfFilesContainingCachePaths: Specifies the local user's cache paths for the specified files.

Example

Example (VB.NET)

Imports RevisionManager
Imports System.Runtime.InteropServices

Module Example

    Sub Main()
        Dim objApplication As RevisionManager.Application = Nothing
        Dim objInsight As RevisionManager.Insight = Nothing
        Dim aListOfFilePaths(1) As Object
        Dim NumberOfFilesReturned As Long
        Dim aListOfFilesContainingCachePaths As Object = Nothing

        Try
            ' Start Revision Manager.
            objApplication = New RevisionManager.Application

            ' Get reference to Insight object.
            objInsight = objApplication.Insight

            aListOfFilePaths(0) = "http://solidvm/Engineering/PreReleased/PreReleasedDocLib/Summit.par"
            aListOfFilePaths(1) = "http://solidvm/Engineering/PreReleased/PreReleasedDocLib/CDPlayer/CDPlayer.asm"

            objInsight.GetCachePath(aListOfFilePaths.Length, aListOfFilePaths, NumberOfFilesReturned, aListOfFilesContainingCachePaths)
        Catch ex As Exception
            ' Write any errors to console.
            Console.WriteLine(ex.Message)
        Finally
            ' Release COM Objects.
            If Not (objInsight Is Nothing) Then
                Marshal.ReleaseComObject(objInsight)
                objInsight = Nothing
            End If

            If Not (objApplication Is Nothing) Then
                objApplication.Quit()
                Marshal.ReleaseComObject(objApplication)
                objApplication = Nothing
            End If
        End Try
    End Sub

End Module