.NET Tutorials, Forums, Interview Questions And Answers
Welcome :Guest
 
Sign In
Register
 
Win Surprise Gifts!!!
Congratulations!!!


Top 5 Contributors of the Month
david stephan

Post New Resource Bookmark and Share   

Click the linkbutton of Datalist then corresponding values will be displayed in Repeater

Posted By:satyapriyanayak       Posted Date: May 02, 2013    Points: 40    Category:    URL: http://www.dotnetspark.com  

Here we will see how to display corresponding values displayed in Repeater control When we click the link of Datalist control.
 

Default.aspx code
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title>Untitled Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    
    </div>
    <asp:DataList ID="DataList1" runat="server" DataKeyField="prodid"
        BackColor="#FFFFCC">
    <HeaderTemplate>
    Product Name
    </HeaderTemplate>
        <HeaderStyle BackColor="#80FFFF" />
<ItemTemplate>
<asp:LinkButton ID="l1" text='<%#Eval("prodname")%>' Runat="server">
</asp:LinkButton>
</ItemTemplate>

    </asp:DataList><hr />
    <asp:Repeater ID="Repeater1" runat="server">
    <HeaderTemplate>
    <h1>Show the Customer who own the product</h1><br />
    </HeaderTemplate>
    <ItemTemplate>
<b>Customer ID:</b>
<b>
<%#Eval("custid")%>
</b>
<br>
<b>Customer Name:</b>
<b>
<%#Eval("custname")%>
</b>
<br>
<b>Customer Address:</b>
<b>
<%#Eval("custaddress")%>
</b>
</ItemTemplate>
    </asp:Repeater>
    </form>
</body>
</html>


Default.aspx.vb code

Imports System.Data
Imports System.Data.SqlClient
Partial Class _Default
    Inherits System.Web.UI.Page
    Dim strConnString As String = System.Configuration.ConfigurationManager.ConnectionStrings.Item("ConnectionString").ToString()
    Dim con As New SqlConnection(strConnString)
    Dim str As String
    Dim com As SqlCommand
    Dim sqlda As SqlDataAdapter
    Dim ds As DataSet
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            bindlist()
        End If

    End Sub
    Sub bindlist()

        Try
            con.Open()
            Str = "select * from product"
            com = New SqlCommand(Str, con)
            Dim reader As SqlDataReader = com.ExecuteReader
            DataList1.DataSource = reader
            DataList1.DataBind()
            con.Close()

        Catch ex As Exception

            Response.Write(ex.Message)

        End Try

    End Sub

    Protected Sub DataList1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataListCommandEventArgs) Handles DataList1.ItemCommand
        Dim x As String

        DataList1.SelectedIndex = e.Item.ItemIndex
        bindlist()
        x = DataList1.DataKeys(e.Item.ItemIndex)
        bindrepeater(x)

    End Sub
    Sub bindrepeater(ByVal s As String)

        Try
            con.Open()
            Str = "select * from customer where prodid='" & s & "'"
            com = New SqlCommand(Str, con)
            Dim reader As SqlDataReader = com.ExecuteReader
            Repeater1.DataSource = reader
            Repeater1.DataMember = "customer"
            Repeater1.DataBind()
            con.Close()

        Catch ex As Exception

            Response.Write(ex.Message)

        End Try

    End Sub

End Class



     

Further Readings:

Responses

No response found. Be the first to respond this post

Post Comment

You must Sign In To post reply
Here

Hall of Fame    Twitter   Terms of Service    Privacy Policy    Contact Us    Archives   Tell A Friend