Fylla en dropdownlist rekursivt

Du lagrar ju info om TFT så att man vet att det är en underkategori till Skärmar. Då kan du använda dig av if-sats och kolla om en det är en underkategori som ska skrivas ut i dropdownlistan. I så fall lägger du till en post till dropdownlistan. Här är lite pseudokod:

Sub show_()

        'plocka ut info ur tabellen
        Dim SQL As string = "SELECT * FROM tbl_kategorier"

        'felhantering med Try .. Catch
        Try

        'anslut till databasen & skapa ett OleDbDataReader-objekt
        Dim Cn As OleDbConnection = new OleDbConnection(CnStr)
        Dim Cm As OleDbCommand = new OleDbCommand(SQL,Cn)
            Cn.Open()
        Dim objDataReader As OleDbDataReader = Cm.ExecuteReader()

        'skapa en ny samling av listposter (option-val i dropdownlistan i default.aspx)
        Dim ddlBox As new ListItemCollection

        'lägg till text
        ddlBox.Add(new ListItem("Välj"))
        ddlBox.Add(new ListItem())

        'lägg till val i dropdownlistan
        while(objDataReader.Read())

[b]if objDataReader("p_id")>0 then
ddlBox.Add(new ListItem(">> " & objDataReader("Namn"))
else
            ddlBox.Add(new ListItem(objDataReader("Namn")))
end if[/b]

        end while

        'bind data till dropdownlistan
        ddl_list.DataSource = ddlBox
        ddl_list.DataBind()

        'stäng objekt
        objDataReader.Close()
        Cn.Close()

        'fånga felmeddelande
        Catch ex As exception
            lbl_error.Text = "Ett fel uppstod när visning av kategorier från databasen skulle ske..<br />Error: " & ex.Message
        End Try

    End Sub

Jag skrev om det till ngt sådant.

		private void Page_Load(object sender, System.EventArgs e)
		{
			CatList.Items.Add(new ListItem("Ingen", "0"));
			fillRec(0);
		}

		private void fillRec(int parent_id)
		{
			string SQL = "SELECT * FROM tbl_kategorier WHERE pappa_id="+parent_id;
			string ConString =  "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=****.mdb;User Id=admin;Password=;";
			OleDbConnection olCon = new OleDbConnection(ConString);
			OleDbCommand olCommand = new OleDbCommand(SQL, olCon);
			olCon.Open();
			OleDbDataReader dr = olCommand.ExecuteReader();
			
			while(dr.Read())
			{
				CatList.Items.Add(new ListItem(dr["kat_namn"].ToString(),dr["id"].ToString()));
				fillRec(Convert.ToInt32(dr["id"]));		
			}
			
			dr.Close();
			olCon.Close();
		}

Och nu sorterar den rätt .. men jag kan inte komma på hur jag ska räkna hur djupt i trädet den är så att jag kan skriva ut rätt antal ">>"..

Tacksam

/r dinohjärnan var framme.. ;)

men jag kan inte komma på hur jag ska räkna hur djupt i trädet den är så att jag kan skriva ut rätt antal ">>"..

Det är väldigt enkelt, du skickar med en extra parameter till din fillRec() funktion som berättar djupet. Alltså i Page_Load skickar du med 0 och har sedan en paramter deep som du tar emot i din fillRec och i din while loop så skickar du med deep + 1 till nästa anrop typ så här:

void page_load(){
...
fillRec(0,0);
...
}

void fillRec(int parentId, int deep){
...
while(dr.Read())
{
CatList.Items.Add(new ListItem(dr["kat_namn"].ToString(),dr["id"].ToString()));
fillRec(Convert.ToInt32(dr["id"]), deep + 1);		
}
...
}

- M

Att det var så lätt .. tack så mycket!