TreeView Nodes Appearing in Wrong Spot

[LacrosseB0ss]

Hey all!

I have just started using the TreeView object in asp. There are some other applications I have seen use it and I have copied some of the code from them at work. What happens is on a form, an item is selected from a dropdown box and based on what the user selects, there are items linked to that group in a different field. I would like these items to show up as tree view nodes split aplhabetically.

This works fine. The grandparent node (selected by user) appears on top. Then the first letter of the following items are parents slightly indented. However, here is where the problem occurs. Children under these Alpha headings appear under the correct headings but indented so they are directly under the root node. I would like them indented again under the alpha headings.

Any help that can be offered is greatly appreciated. I have included some of my code below.

Dim grandparent As String = ""
		Dim alpha As String = ""
		Dim parent As String = "'"
		Dim child As String = ""
		Dim counter As Integer = 0
		Dim cNode As TreeNode = Nothing
		Dim ccNode As TreeNode = Nothing
		Dim cccNode As TreeNode = Nothing

		tree.DataSource = Nothing
		tree.DataBind()

		Try
			tree.Nodes.Clear()
			With objDataReader
				While .Read
					Dim current As String = .Item("Group").ToString & ""
					'add grandparent (1st) node
					'this will be the Group (chosen from ddlGroup)
					If grandparent <> current Then
						grandparent = current
						parent = ""	' reset the parent string
						cNode = New TreeNode(grandparent.ToString)
						'tvw_View.Nodes.Add(cNode)
						tree.Nodes.Add(cNode)
					End If

					current = .Item("ItemAndCourse").ToString & ""
					alpha = Left(current, 1)

					'add Course name under Alphabetic headings
					'if next item is different letter, add it
					If UCase(parent) <> UCase(alpha) Then
						If cNode Is Nothing Then
							cNode = New TreeNode(grandparent.ToString)
							tree.Nodes.Add(cNode)
						End If

						parent = alpha
						ccNode = New TreeNode(parent.ToString)
						cNode.ChildNodes.Add(ccNode)
					End If

					'add Course name under appropriate letter heading
					If child <> current Then
						If cNode Is Nothing Then
							cNode = New TreeNode(child.ToString)
							tree.Nodes.Add(cNode)
						End If
						child = current
						cccNode = New TreeNode(child.ToString)
						ccNode.ChildNodes.Add(cccNode)
					End If

					'add number to counter - show # of entries found
					counter += 1
				End While
			End With