Dim s As System.IO.Stream = createAndRegisterStream( _
                "Test", "txt",     System.Text.Encoding.UTF8, "text", True, _
                Microsoft.ReportingServices.Interfaces.StreamOper.CreateAndRegister)

            Dim sw As New System.IO.StreamWriter(s)

            sw.Write("Testing")
            ''For i As Integer = 0 To report.Body.ReportItemCollection.Count - 1
            ''sw.WriteLine(RenderReportItem(report.Body.ReportItemCollection(i)))
            'sw.Write("Test")
            'sw.Write("</body></html>")
            ''Next
            sw.Close()
            's.Close()
            Return True

quote:

---

Originally posted by AskSQLTeam

Dan writes "I created a custom rendering extension that just returns a test message to the rendering stream.

Dim s As System.IO.Stream = createAndRegisterStream( _
                "Test", "txt",     System.Text.Encoding.UTF8, "text", True, _
                Microsoft.ReportingServices.Interfaces.StreamOper.CreateAndRegister)

            Dim sw As New System.IO.StreamWriter(s)

            sw.Write("Testing")
            ''For i As Integer = 0 To report.Body.ReportItemCollection.Count - 1
            ''sw.WriteLine(RenderReportItem(report.Body.ReportItemCollection(i)))
            'sw.Write("Test")
            'sw.Write("</body></html>")
            ''Next
            sw.Close()
            's.Close()
            Return True

If i don't close the stremwriter it creates the file but does not write to it. If I close the streamwriter I get an error "Cannot access a closed Stream"

Any ideas?

Thanks,

Dan"

---