El uso de árboles en bases de datos
Los mapas de árbol se utilizan en bases de datos de la siguiente manera:
Los mapas de árbol se utilizan para mostrar datos organizados en una estructura de árbol y son ampliamente utilizados, como sistemas de archivos en computadoras (administrador de recursos de Windows), la estructura de una empresa o empresa, etc. Sabemos que en Windows, VB, PB, Delphi y otras herramientas proporcionan un potente control de árbol TreeView, que se puede utilizar para desarrollar fácilmente diagramas de árbol. Sin embargo, implementar un diagrama de árbol en una página web no es tan fácil. Ahora, utilizando los WebControls de ASP.NET Internet Explorer proporcionados por Microsoft, desarrollar imágenes de árboles en páginas web es igual de conveniente, potente e incluso más flexible en Windows.
Presenta el método de desarrollo de diagramas de árbol utilizando los controles de Internet Explorer. Debido a la compleja estructura del diagrama de árbol, a menudo es difícil saber por dónde empezar al utilizarlo. Basado en el ejemplo específico del administrador de aplicaciones escrito recientemente para la empresa en ASP.NET, el autor explica en detalle cómo utilizar los WebControls de Internet Explorer y el enlace de la base de datos en ASP.NET para realizar cualquier visualización de datos de múltiples capas, lo que facilita para agregar, modificar y eliminar, mover y otras operaciones. El autor espera que a través de la elaboración de este ejemplo se pueda lograr el efecto de atraer nuevas ideas, comunicarse con colegas y progresar juntos.
Los WebControls de Internet Explorer no están incluidos en los controles de servidor estándar de VS.NET, por lo que deben descargarse desde el sitio web de Microsoft en la siguiente dirección:
es un número entero, I es un número entero
tmpNds dim as TreeNodeCollection
Dim idxs() as string
idxs = Split(idx, " ")
cnt = UBound(idxs)
Si cnt = 0, entonces
tmpNds = TreeView1. Nodo
Otro
tmpNds = TreeView1. nodo(CInt(idxs(0))). Nodo
Para i = 1 a cnt - 1
tmpNds = tmpNds(CInt(idxs(i))). Nodo
Entonces
Terminará si...
Volver a tmpNds
Finalizar función
Tercero , modificar y mover nodos del árbol
Debido a que el control del servidor no admite eventos de arrastre del mouse, los nodos no se pueden mover arrastrándolos como los programas de Windows. Aquí selecciona el nodo principal. El movimiento se logra eliminando en la ubicación original y agregando en la nueva ubicación. Al eliminar, asegúrese de guardar primero la información del nodo.
Sub vista de árbol privada 1 _ SelectedIndexChange (el remitente de ByVal es un objeto, ByVal e es Microsoft. web . ui . web controles . treeviewselecteventargs) maneja TreeView1. SelectedIndexChange
Atenuar dv a nuevo DataView()
dv. tabla = ds. table("tree")
dim tmpNd As TreeNode = TreeNdSel(e. nodo antiguo), tmpNds As TreeNodeCollection
dv. RowFilter = " NODEID = " & amptmpNd. Prueba de identidad
dv(0)("NODE_DESCRIPT") = Yo. Cuadro de texto 1. texto
dv(0)("dirección") = i. textbox2.text
dv(0)("objetivo")=i.
Cuadro de texto 3. Texto
dv(0)("ICON")=i. Cuadro de texto 4. Texto
if dv(0)("PARENTID"). ToString<>i. Lista desplegable1. Seleccione Editar proyecto. Luego seleccione el valor
? Mover nodo
dv(0)("PARENT_NAME")=i. Lista desplegable1. Seleccione Editar valor del proyecto
Si yo. Lista desplegable1. Seleccione Editar proyecto. Valor = "RAÍZ "Entonces
tmpNds = TreeView1. Nodo
Otro
tmpNds = FromIdToNode(Me. DropDownList1. SelectedItem. Value, TreeView1. Node). ¿nodo? La colección de nodos del nuevo nodo padre
Termina si...
GetNdCol(e.OldNode). Eliminar(tmpNd)
tmpNds. Agregar(tmpNd)
Termina si...
tmpNd. Texto = yo. Cuadro de texto 1. texto
tmpNd. URL de la imagen = i. Cuadro de texto 4. Texto
tmpNd = TreeView1GetNodeFromIndex(treeview 1. SelectedNodeIndex)
dv. RowFilter = " NODEID = " & amptmpNd. Prueba de Identidad
I. Cuadro de texto 1. Texto = dv(0)("nombre de nodo"). ToString
i. TextBox2.Text = dv(0)("Dirección"). ToString
i. TextBox3.Text = dv(0)("destino"). ToString
i. cuadro de texto 4 . Texto = dv(0)("ICONO"). ToString
Conector final
¿Como función privada FromIdToNode de TreeNode (ByVal ID en forma de cadena, ByVal Nds en forma de TreeNodeCollection)
? Buscar nodos por palabra clave
Anotar I como un número entero
Atenuar tmpNd como TreeNode, tmpNd1 como TreeNode
Para cada tmpNd en Nds
Si tmpNd. ID = ID entonces
Regresar tmpNd
Salir de la función
Terminará si...
tmpNd1 = FromIdToNode(ID, tmpNd. Node )
Si no (tmpNd1 no es nada), entonces
Volver a tmpNd1
Salir de la función
Terminará si. ..
p>Luego
No devuelve nada
Finalizar función