T
tim
I'm trying to get my repeater access my ListChildren
method. Unfortunately i'm unable to insert into control.
here is my code.
aspx.vb
-------------
Private Sub Page_Load(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles MyBase.Load
''Put user code to initialize the page here
Dim rs As New hcdco_appdev.ReportingService
rs.Credentials =
System.Net.CredentialCache.DefaultCredentials
' Return a list of catalog items in the report server db
Dim items As CatalogItem() = rs.ListChildren("/", True)
' For each report, display the path of the report
Dim ci As hcdco_appdev.CatalogItem
Dim reportValues As ArrayList = New ArrayList
For Each ci In items
If ci.Type = hcdco_appdev.ItemTypeEnum.Report Then
reportValues.Add(ci.Path)
reportValues.Add(New reportNames(ci.Path))
reportList.DataSource = reportValues
reportList.DataBind()
End If
Next ci
End Sub
business.Obj.vb
-------------------
Public Class reportNames
Private mReportName As String
ReadOnly Property ReportName() As String
Get
Return mReportName
End Get
End Property
Public Sub New(ByVal ReportName As String)
MyBase.New()
mReportName = ReportName
End Sub
End Class
method. Unfortunately i'm unable to insert into control.
here is my code.
aspx.vb
-------------
Private Sub Page_Load(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles MyBase.Load
''Put user code to initialize the page here
Dim rs As New hcdco_appdev.ReportingService
rs.Credentials =
System.Net.CredentialCache.DefaultCredentials
' Return a list of catalog items in the report server db
Dim items As CatalogItem() = rs.ListChildren("/", True)
' For each report, display the path of the report
Dim ci As hcdco_appdev.CatalogItem
Dim reportValues As ArrayList = New ArrayList
For Each ci In items
If ci.Type = hcdco_appdev.ItemTypeEnum.Report Then
reportValues.Add(ci.Path)
reportValues.Add(New reportNames(ci.Path))
reportList.DataSource = reportValues
reportList.DataBind()
End If
Next ci
End Sub
business.Obj.vb
-------------------
Public Class reportNames
Private mReportName As String
ReadOnly Property ReportName() As String
Get
Return mReportName
End Get
End Property
Public Sub New(ByVal ReportName As String)
MyBase.New()
mReportName = ReportName
End Sub
End Class