Asp Control ASP.Net


            <%@ Page Language="vb" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SqlClient" %>

    Sub Page_Load(sender as Object, e as EventArgs)
      If Not Page.IsPostBack then
        BindData()
      End If
    End Sub
    
    
    Sub BindData()
      Const strConnString as String = "server=localhost;uid=sa;pwd=;database=pubs"
      Dim objConn as New SqlConnection(strConnString)
    
      Const strSQL as String = "SELECT * FROM titles"
      Dim objCmd as New SqlCommand(strSQL, objConn)
    
      objConn.Open()   'Open the connection
    
      rptTitles.DataSource = objCmd.ExecuteReader(CommandBehavior.CloseConnection)
      rptTitles.DataBind()
    
      objConn.Close()   'Close the connection
    End Sub
    
    
    Sub rptTitles_ItemCommand(sender As Object, e As RepeaterCommandEventArgs)
      If e.CommandName = "Details" then
        Dim lc as Label = e.Item.FindControl("lblTitleID")
        Dim strTitleID as String = lc.Text
      End If
    End Sub


          OnItemCommand="rptTitles_ItemCommand">
    
      Title: <%# DataBinder.Eval(Container.DataItem, "title") %>
      
      [           Text="View Book Details" CommandName="Details" />]
           
                 Text='<%# DataBinder.Eval(Container.DataItem, "title_id") %>' />