Quantcast
Channel: Visual COBOL - Forum - Recent Threads
Viewing all articles
Browse latest Browse all 4356

RE: OnItemDataBound in asp:Repeater

$
0
0

The following is an example that shows the repeater control on an ASP.NET form and the code behind to implement it. The Repeater control is wired up to the OnItemDataBound event to modify the content of each entry to add a hyperlink using the ID of a customer row in the Northwind Customer database.

This example assumes that you have a SQL Server connection defined in your web.config file.

And the code behind...

      $set ilusing"System.Data.SqlClient"
      $set ilusing"System.Configuration"
      $set ilusing"System.Data"
 
       class-id testrepeater._Default is partial     
               inherits type System.Web.UI.Page public.
       working-storage section.
           
       method-id Page_Load protected.
       local-storage section.
       procedure division using by value sender as object by value e as type EventArgs.
           invoke GetCustomers
           goback.           
       end method.
       method-id GetCustomers private.
       procedure division.
           *>Connection String From Web.Config File
           declare con as type SqlConnection = new SqlConnection(type ConfigurationManager::ConnectionStrings["mycon"]::ConnectionString)
           declare dt as type DataTable = new DataTable
           *>give commadText and connection to it 
           declare adp as type SqlDataAdapter = new SqlDataAdapter("SELECT * FROM Customers", con)
           invoke adp::Fill(dt)
           set Repeater1::DataSource to dt
           invoke Repeater1::DataBind
           goback.
       end method.       
       method-id Repeater1_ItemDataBound protected.
       procedure division using by value sender as object e as type System.Web.UI.WebControls.RepeaterItemEventArgs.
           declare myID as string = type DataBinder::Eval(e::Item::DataItem, "CustomerID")::ToString
           declare hp as type HyperLink = e::Item::FindControl("link") as type HyperLink
           set hp::NavigateUrl = "~/default.apx?page=" & myID

       end method.

       end class.

Viewing all articles
Browse latest Browse all 4356

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>