Get list of reports under a path and populate a dropdown list.

list_reports.vb

' sample reporting server url http://MyServer/ReportServer/ReportService.asmx

Private Sub LoadSampleReports()
    Dim rs As New ReportingService
    rs.Credentials = System.Net.CredentialCache.DefaultCredentials

    Dim item As CatalogItem
    For Each item In rs.ListChildren("/SampleReports", False)
        If item.Type = ItemTypeEnum.Report Then
            DropDownList1.Items.Add(New ListItem(item.Name, item.Path))
        End If
    Next
End Sub