categories and subcategories display in the dropdown/gridview

Hi i want to show in the drop drown control all the categories and the sub categeories
based on the table design


SELECT  [Id],      ,[Name],       parentcategoryid    
  FROM [Category]

Id      Name      parentcategoryid
1      Books              0
2      Computers      0
3      Desktops       2
4      Notebooks      2
5      Accessories      3
6      Software        2
7      Games              2
8      Electronics      0
9      Camera, photo      8

pls see the image, wht i looking
any help will be appreciated..
dropdown.png
gridview-categories.png
bsarahimAsked:
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Meir RivkinFull stack Software EngineerCommented:
this code builds the list of your table item links.


dt -> the datatable that contains the data from DB
list -> contains the following list:
Books
Computers
Computers->Desktops
Computers->Notebooks
Computers->Desktops->Accessories
Computers->Software
Computers->Games
Electronics
Electronics->Camera, photo


all you gotta do is bind the list to your dropdown list control.

cheers


int parentId = 0;
            List<string> list = new List<string>();
            var rows = dt.Rows.Cast<DataRow>();
            foreach (var item in rows)
            {
                parentId = (int)item["parentcategoryid"];
                string name = item["Name"].ToString();

                while (parentId > 0)
                {
                    var row = rows.Where(n => (int)n["Id"] == parentId).FirstOrDefault();
                    if (row != null)
                    {
                        parentId = (int)row["parentcategoryid"];
                        name = string.Format("{0}->{1}", row["Name"], name);
                    }
                } 
                list.Add(name);
            }

Open in new window

bsarahimAuthor Commented:
any vb.net code?
Meir RivkinFull stack Software EngineerCommented:
here:

Dim parentId As Integer = 0
Dim list As New List(Of String)()
Dim rows = dt.Rows.Cast(Of DataRow)()
For Each item As var In rows
	parentId = CInt(item("parentcategoryid"))
	Dim name As String = item("Name").ToString()

	While parentId > 0
		Dim row = rows.Where(Function(n) CInt(n("Id")) = parentId).FirstOrDefault()
		If row IsNot Nothing Then
			parentId = CInt(row("parentcategoryid"))
			name = String.Format("{0}->{1}", row("Name"), name)
		End If
	End While
	list.Add(name)
Next

Open in new window

Active Protection takes the fight to cryptojacking

While there were several headline-grabbing ransomware attacks during in 2017, another big threat started appearing at the same time that didn’t get the same coverage – illicit cryptomining.

bsarahimAuthor Commented:
im sorry im using Ado.net, asp.net 3.5 not the linq.. thanks
Meir RivkinFull stack Software EngineerCommented:
use DataRow.Select method to find the datarow with the right ID:
Dim result As DataRow() = dt.[Select]("Id = " & parentId)
if result.Length>0 Then
Dim row = result[0]
		If row IsNot Nothing Then
			parentId = CInt(row("parentcategoryid"))
			name = String.Format("{0}->{1}", row("Name"), name)
		End If		
End If

Open in new window

bsarahimAuthor Commented:
thanks..

before that, should I read the data in the dataadapater and put back in the table? or wht is the dt here?
Meir RivkinFull stack Software EngineerCommented:
The dt is the datatable i used it as an example
bsarahimAuthor Commented:
super.. the earlier is code working.. but i have challenges..



 For Each item In rows

            parentId = CInt(item("parentcategoryid"))
            Dim name As String = item("Name").ToString()

            While parentId > 0
                Dim row = rows.Where(Function(n) CInt(n("Id")) = parentId).FirstOrDefault()

                If row IsNot Nothing Then
                    parentId = CInt(row("parentcategoryid"))
                    name = String.Format("{0}->{1}", row("Name"), name)
                End If
            End While
            List.Items.Add(name)

        Next

I have added the listbox control in the loop

When I change the selectedindexchange..I want to get the parent category Id.
 before i insert the value s in to the table... kindly request you to help.. before i award the points
Meir RivkinFull stack Software EngineerCommented:
to get the parent category id u need to parse the selected item
for instance, if user selected "1->3->8", the parent category id is 3
if user selected "1->2", the parent category id is 1
u need to add the logic where there's no parent category id, when user chooses root category id.

Private Sub listBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles listBox1.SelectedIndexChanged

   Dim curItem As String = listBox1.SelectedItem.ToString()

Dim list As New List(Of Integer)()
Dim tokens =curItem.Split(New String() {"->"}, StringSplitOptions.RemoveEmptyEntries)
For Each item As var In tokens
	list.Add(Integer.Parse(item))
Next

if list.Count > 1 then
Dim parentCatId As Integer = list(list.Count - 2)
else
End Sub

Open in new window

bsarahimAuthor Commented:
Thanks..

I have last doubt related to this topic..

1. i want to dispaly the data in the gridview based on the Id, is being fetched on the data row..event

Dim adapter As SqlDataAdapter = New SqlDataAdapter("SELECT [Id] ,[Name] ,[ParentCategoryId]  FROM [nopCommerce].[dbo].[Category] where id=" & e.Row.Cells(0).Text, sqlConn)

'im fetching the data of id  e.Row.Cells(0).Text



 Dim dataSet As DataSet = New DataSet()
            adapter.Fill(dataSet, "Ordersvariant")


            Dim dt As DataTable = dataSet.Tables(0)

            Dim parentId As Integer = 0
            ' Dim list As New List(Of String)()
            Dim rows = dt.Rows.Cast(Of DataRow)()
            Dim item As DataRow

            For Each item In rows

                parentId = CInt(item("parentcategoryid"))
                Dim name As String = item("Name").ToString()
                '                where(ID = " & e.Row.Cells(0).Text")
                While parentId > 0
                    Dim row = rows.Where(Function(n) CInt(n("id")) = parentId).FirstOrDefault()

                    '  Dim row = rows.Where(Function(n) CInt(e.Row.Cells(0).Text) = parentId).FirstOrDefault()

                    If row IsNot Nothing Then
                        parentId = CInt(row("parentcategoryid"))
                        name = String.Format("{0}->{1}", row("Name"), name)
                    End If
                End While

                Dim LblShoppingitems As Label
                LblShoppingitems = CType(e.Row.FindControl("Category"), Label)
                LblShoppingitems.Text = name

                'List.Items.Add(name)


                'List.Items(parentId).Text = name
            Next



But this goes in to unended loop and this is not working


2. totally differnt query: I want to display categroy, subcategories,.. in the treeview..
your help is appreciated..
Meir RivkinFull stack Software EngineerCommented:
I think for the sake of fairness you should open a new question and I'll be more than happy to assist you.
open new question and post here the url for it so i'll find it easily.
cheers

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
bsarahimAuthor Commented:
Meir RivkinFull stack Software EngineerCommented:
>>But this goes in to unended loop and this is not working

do u mean the For Each loop is infinite?
bsarahimAuthor Commented:
1. it goes in to unended loop and the webpage goes on requesting ... but never display anything.

2..for your earlier drop down solution im getting the following error..

Private Sub list_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles listBox1.SelectedIndexChanged



        Dim curItem As String = Listbox1.SelectedItem.Value





        Dim list As New List(Of Integer)()
        Dim tokens = curItem.Split(New String() {"->"}, StringSplitOptions.RemoveEmptyEntries)

        ' Response.Write(tokens.ToString)

        'Response.End()

        For Each item In tokens
            list.Add(Integer.Parse(item))
        Next

        If list.Count > 1 Then
            Dim parentCatId As Integer = list(list.Count - 2)
            Response.Write(parentCatId)
        Else

        End If



    End Sub



Error details:

Input string was not in a correct format.
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception Details: System.FormatException: Input string was not in a correct format.

Source Error:


Line 161:
Line 162:        For Each item In tokens
Line 163:            list.Add(Integer.Parse(item))
Line 164:        Next
Line 165:
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
ASP.NET

From novice to tech pro — start learning today.