Insert record in ASP.Net Nested Repeater on Button Click using C# and VB.Net

Hi RichardSa,

Refer below sample.

HTML

<asp:Label ID="Adminlbl" runat="server" Text="Richard" />
<asp:Label ID="electlbl" runat="server" Text="2021 Youth Elections" />
<asp:DataList runat="server" ID="dlquestion" CssClass="row" CellPadding="4" OnItemDataBound="dlquestion_ItemDataBound" Width="100%">
    <ItemTemplate>
        <div class="card p-3 mb5 bg-white rounded" style="border: 1px solid #d1d5d4; margin: 0 auto; padding: 10px; width: 100%; border-radius: 10px;">
            <asp:Label ID="lblQuestion" Text='<%# Eval("BallotQuestion") %>' runat="server" Font-Bold="true" Font-Names="Varela Round" Font-Size="16pt" />
            <asp:Repeater ID="rptOptions" runat="server">
                <ItemTemplate>
                    <div runat="server" id="innerTable">
                        <div class="" id="middleTable">
                            <img alt="lock" src="images/home/lock.png" height="80" />
                            <br />
                            <div>
                                <asp:HiddenField ID="hfElectionID" runat="server" Value='<%# Eval("Id") %>' />
                                <asp:Label ID="Label1" runat="server" Text="NAME: " Font-Bold="true" Font-Size="13pt"></asp:Label>
                                <asp:Label ID="candlbl" runat="server" Text='<%# Eval("CandidateName") %>' />
                            </div>
                            <br />
                            <div>
                                <asp:Label ID="Label2" runat="server" Text="BIO: " Font-Bold="true" Font-Size="13pt"></asp:Label>
                                <asp:Label ID="biolabel" Text='<%# Eval("Shortbio") %>' runat="server" />
                            </div>
                            <br />
                            <br />
                        </div>
                        <%--<div>
                            <br />
                            <asp:Button ID="Button2" runat="server" Text="Edit" CssClass="btn btn-info" Font-Size="10pt" OnClick="OnEdit" />
                            <asp:Button ID="Button3" runat="server" Text="Delete" CssClass="btn btn-danger" Font-Size="10pt" />
                        </div>
                        <hr />--%>
                    </div>
                </ItemTemplate>
            </asp:Repeater>
            <asp:Button ID="btnAddOption" runat="server" Text="Add Option" CssClass="btn btn-primary" OnClick="OnAddOption" />
        </div>
    </ItemTemplate>
</asp:DataList>
<div id="dialog" style="display: none">
    <asp:HiddenField ID="hfBallotQuestion" runat="server" />
    Candidate Name:
    <asp:TextBox runat="server" ID="txtCandidateName" />
    Shortbio:
    <asp:TextBox runat="server" ID="txtShortbio" />
    <asp:Button Text="Add" runat="server" OnClick="OnAdd"  />
</div>
<script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jquery/1.8.3/jquery.min.js"></script>
<link rel="stylesheet" href="https://ajax.googleapis.com/ajax/libs/jqueryui/1.8.24/themes/smoothness/jquery-ui.css" />
<script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jqueryui/1.8.24/jquery-ui.min.js"></script>
<script type="text/javascript">
    function ShowPopup() {
        $("#dialog").dialog({
            title: "Update record",
            buttons: {
                Close: function () {
                    $(this).dialog('close');
                }
            },
            modal: true,
            width: "480"
        });

        $("#dialog").parent().appendTo($("form:first"));
    }
</script>

Namespaces

C#

using System.Data;
using System.Data.SqlClient;

VB.Net

Imports System.Data
Imports System.Data.SqlClient

Code

C#

protected void Page_Load(object sender, EventArgs e)
{
    if (!IsPostBack)
    {
        string query = "SELECT DISTINCT BallotQuestion FROM Election WHERE AdminName = '" + Adminlbl.Text + "' AND ElectionName = '" + electlbl.Text + "'";
        DataTable dt = GetData(query);
        dlquestion.RepeatColumns = dt.Rows.Count;
        dlquestion.DataSource = dt;
        dlquestion.DataBind();
        dlquestion.RepeatColumns = 1;
        dlquestion.RepeatDirection = RepeatDirection.Vertical;
    }
}

protected void dlquestion_ItemDataBound(object sender, DataListItemEventArgs e)
{
    if (e.Item.ItemType == ListItemType.Item || e.Item.ItemType == ListItemType.AlternatingItem)
    {
        string BallotQuestion = (e.Item.FindControl("lblQuestion") as Label).Text;
        Repeater rptOptions = e.Item.FindControl("rptOptions") as Repeater;
        string query = "SELECT Id,CandidateName, Shortbio FROM Election WHERE BallotQuestion = '" + BallotQuestion + "' AND AdminName = '" + Adminlbl.Text + "' AND ElectionName = '" + electlbl.Text + "'";
        rptOptions.DataSource = GetData(query);
        rptOptions.DataBind();
    }
}

private DataTable GetData(string query)
{
    SqlCommand cmd = new SqlCommand(query);
    using (SqlConnection con = new SqlConnection("Server=.;DataBase=Test;UID=sa;PWD=pass@123;"))
    {
        using (SqlDataAdapter sda = new SqlDataAdapter())
        {
            cmd.Connection = con;
            sda.SelectCommand = cmd;
            using (DataTable dt = new DataTable())
            {
                sda.Fill(dt);
                return dt;
            }
        }
    }
}

protected void OnAddOption(object sender, EventArgs e)
{
    DataListItem item = (sender as Button).NamingContainer as DataListItem;
    Label ballotQuestion = item.FindControl("lblQuestion") as Label;
    hfBallotQuestion.Value = ballotQuestion.Text;
    ClientScript.RegisterStartupScript(this.GetType(), "Popup", "ShowPopup();", true);
}

protected void OnAdd(object sender, EventArgs e)
{
    string adminName = Adminlbl.Text;
    string electtionName = electlbl.Text;
    string ballotQuestion = hfBallotQuestion.Value;
    string name = txtCandidateName.Text;
    string shortbio = txtCandidateName.Text;
    using (SqlConnection con = new SqlConnection("Server=.;DataBase=Test;UID=sa;PWD=pass@123;"))
    {
        string query = "INSERT INTO Election (AdminName,ElectionName,BallotQuestion,CandidateName,Shortbio) VALUES (@AdminName,@ElectionName,@BallotQuestion,@CandidateName,@Shortbio)";
        SqlCommand cmd = new SqlCommand(query);
        cmd.Parameters.AddWithValue("@AdminName", adminName);
        cmd.Parameters.AddWithValue("@ElectionName", electtionName);
        cmd.Parameters.AddWithValue("@BallotQuestion", ballotQuestion);
        cmd.Parameters.AddWithValue("@CandidateName", name);
        cmd.Parameters.AddWithValue("@Shortbio", shortbio);
        cmd.Connection = con;
        con.Open();
        cmd.ExecuteNonQuery();
        con.Close();
    }

    Response.Redirect(Request.Url.AbsoluteUri);
}

VB.Net

Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
    If Not IsPostBack Then
        Dim query As String = "SELECT DISTINCT BallotQuestion FROM Election WHERE AdminName = '" &
                            Adminlbl.Text & "' AND ElectionName = '" & electlbl.Text & "'"
        Dim dt As DataTable = GetData(query)
        dlquestion.RepeatColumns = dt.Rows.Count
        dlquestion.DataSource = dt
        dlquestion.DataBind()
        dlquestion.RepeatColumns = 1
        dlquestion.RepeatDirection = RepeatDirection.Vertical
    End If
End Sub

Protected Sub dlquestion_ItemDataBound(ByVal sender As Object, ByVal e As DataListItemEventArgs)
    If e.Item.ItemType = ListItemType.Item OrElse e.Item.ItemType = ListItemType.AlternatingItem Then
        Dim BallotQuestion As String = TryCast(e.Item.FindControl("lblQuestion"), Label).Text
        Dim rptOptions As Repeater = TryCast(e.Item.FindControl("rptOptions"), Repeater)
        Dim query As String = "SELECT Id,CandidateName, Shortbio FROM Election WHERE BallotQuestion = '" &
                            BallotQuestion & "' AND AdminName = '" & Adminlbl.Text & "' AND ElectionName = '" & electlbl.Text & "'"
        rptOptions.DataSource = GetData(query)
        rptOptions.DataBind()
    End If
End Sub

Private Function GetData(ByVal query As String) As DataTable
    Dim cmd As SqlCommand = New SqlCommand(query)
    Using con As SqlConnection = New SqlConnection("Server=.;DataBase=Test;UID=sa;PWD=pass@123;")
        Using sda As SqlDataAdapter = New SqlDataAdapter()
            cmd.Connection = con
            sda.SelectCommand = cmd
            Using dt As DataTable = New DataTable()
                sda.Fill(dt)
                Return dt
            End Using
        End Using
    End Using
End Function

Protected Sub OnAddOption(ByVal sender As Object, ByVal e As EventArgs)
    Dim item As DataListItem = TryCast(TryCast(sender, Button).NamingContainer, DataListItem)
    Dim ballotQuestion As Label = TryCast(item.FindControl("lblQuestion"), Label)
    hfBallotQuestion.Value = ballotQuestion.Text
    ClientScript.RegisterStartupScript(Me.GetType(), "Popup", "ShowPopup();", True)
End Sub

Protected Sub OnAdd(ByVal sender As Object, ByVal e As EventArgs)
    Dim adminName As String = Adminlbl.Text
    Dim electtionName As String = electlbl.Text
    Dim ballotQuestion As String = hfBallotQuestion.Value
    Dim name As String = txtCandidateName.Text
    Dim shortbio As String = txtCandidateName.Text

    Using con As SqlConnection = New SqlConnection("Server=.;DataBase=Test;UID=sa;PWD=pass@123;")
        Dim query As String = "INSERT INTO Election (AdminName,ElectionName,BallotQuestion,CandidateName,Shortbio) VALUES (@AdminName,@ElectionName,@BallotQuestion,@CandidateName,@Shortbio)"
        Dim cmd As SqlCommand = New SqlCommand(query)
        cmd.Parameters.AddWithValue("@AdminName", adminName)
        cmd.Parameters.AddWithValue("@ElectionName", electtionName)
        cmd.Parameters.AddWithValue("@BallotQuestion", ballotQuestion)
        cmd.Parameters.AddWithValue("@CandidateName", name)
        cmd.Parameters.AddWithValue("@Shortbio", shortbio)
        cmd.Connection = con
        con.Open()
        cmd.ExecuteNonQuery()
        con.Close()
    End Using

    Response.Redirect(Request.Url.AbsoluteUri)
End Sub