This explanation assumes knowledge of ASP.NET and provides a basic RedBack example. This page gets passed the Employee Id which it uses to read the First Name. Typically of course we would display many more Employee details, but you get the idea.
Dim EmpId As String Dim FirstName As String Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Dim obj As New REDPAGESLib.RedObject Dim prop As REDPAGESLib.RedProperty try ' get id passed in query string from link on report EmpId = Request("id") ' open SLRBO obj.Open2("rbexamples", "EXMOD:EmpReader", "", "", "") 'now do a read using id passed in from report prop = obj.Property("EmpId") prop.Value = EmpId obj.callMethod("DoRead") ' get data prop = obj.Property("FirstName") FirstName = prop.Value Catch ex As Exception 'Set Message label with error message throw ex end try end sub See the rbexamplesnetvb directory to review the page's entire source code. |