• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 307
  • Last Modified:

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
0
bsarahim
Asked:
bsarahim
  • 7
  • 7
1 Solution
 
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

0
 
bsarahimAuthor Commented:
any vb.net code?
0
 
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

0
The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

 
bsarahimAuthor Commented:
im sorry im using Ado.net, asp.net 3.5 not the linq.. thanks
0
 
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

0
 
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?
0
 
Meir RivkinFull stack Software EngineerCommented:
The dt is the datatable i used it as an example
0
 
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
0
 
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

0
 
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..
0
 
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
0
 
bsarahimAuthor Commented:
0
 
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?
0
 
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:
0

Featured Post

Take Control of Web Hosting For Your Clients

As a web developer or IT admin, successfully managing multiple client accounts can be challenging. In this webinar we will look at the tools provided by Media Temple and Plesk to make managing your clients’ hosting easier.

  • 7
  • 7
Tackle projects and never again get stuck behind a technical roadblock.
Join Now