"JDP@Work" <JPGMTNoSpam@sbcglobal.net> wrote in message
news:eUBCRPTwEHA.536@TK2MSFTNGP11.phx.gbl...
> Any clues?
>
> 404 Access Denied
>
> ... omitted code....
> m_credentials = New System.Net.NetworkCredential(Common.SRSUserName,
> Common.SRSPassword, Common.SRSDomain)
> _rs.Credentials = m_credentials
>
> end sub
>
> ... omitted code....
> Dim items() As CatalogItem
>
> _rs.Url = Common.SRSServerName
> items = _rs.ListChildren("/", True)
>
>
> Line 208:"ildren",
>
RequestNamespace:="
http://schemas.microsoft.com/sqlserver/2003/12/reporting/repo > rtingservices",
>
ResponseNamespace:="
http://schemas.microsoft.com/sqlserver/2003/12/reporting/rep > ortingservices", Use:=System.Web.Services.Description.SoapBindingUse.Literal,
> ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
> Line 209: Public Function ListChildren(ByVal Item As String, ByVal
> Recursive As Boolean) As
> <System.Xml.Serialization.XmlArrayAttribute("CatalogItems")> CatalogItem()
> Line 210: Dim results() As Object = Me.Invoke("ListChildren", New
> Object() {Item, Recursive})
> Line 211: Return CType(results(0),CatalogItem())
> Line 212: End Function
>
>