GetFiles Method

Description

This method returns a file listing for the specified location.

Syntax

Visual Basic
Public Function GetFiles( _ ByVal ParentUrl As String, _ ByRef numberOfFilesFound As Long, _ ByRef ListOfFilesFound As Variant, _ Optional ByVal FileFilter As Variant _ ) As Long

Parameters

ParentUrl: Specifies the URL path of the parent location on the SharePoint server.
numberOfFilesFound: Specifies the number of files found.
ListOfFilesFound: Specifies the files found.
FileFilter: Specifies the filter criterion, such as “par, asm, dft”, for the files to be searched.

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 ParentUrl As String
        Dim NumberOfFilesFound As Long
        Dim aListOfFilesFound As Object = Nothing
        Dim FileFilter As Object

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

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

            ParentUrl = "http://solidvm/Engineering/PreReleased/PreReleasedDocLib"
            'FileFilter = ".asm,.par,.psm,.cfg,.dft"
            FileFilter = ".par"

            objInsight.GetFiles(ParentUrl, NumberOfFilesFound, aListOfFilesFound, FileFilter)

        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