nombre de un menu

¿Qué parte no funciona?

Julio Casal
.Net Solutions Developer
MCAD


"Miko_tnt" wrote:

tengo el siguiente problema, tengo una funcion que recibe un menu y una
hashtable y quiero recorrer todo el menu y al mismo tiempo la hash table y
preguntar que cuando el nombre del menu sea igual a la clave de la tabla haga
la propiedad text igual a la descripcion de la tabla

tengo este codigo pero no funciona, por favor agradezko kuakier ayuda

Public Function Generar_Menu(ByVal mm As menu, ByVal tabla As Hashtable) As
menu
Dim menui As MenuItem
Dim elemento As New DictionaryEntry()
For Each menui In mm.MenuItems
For Each elemento In tabla
If (tabla.ContainsKey(menui.nombredelmenu) Then
menui.Text = tabla.Item(menui.nombredelmenu)
End If
Next
Next
End Function

No comprendo para que recorres en un bucle los elementos del Hashtable. En
teoría solo necesitas comprobar que el elemento del menú existe en el
hashtable una sola vez, no por cada elemento (del hashtable).

Por el contrario, los elementos del menú si deberían ser recorridos con
bucles anidados, o recursividad, en cuanto tengan más de un nivel.

De todas formas, no comprendo bien para qué estás haciendo eso. ¿Para qué
utilizas el HashTable?

Juan Carlos Badiola Saiz
MVP - C#

ya cambie esa parte del codigo, pero lo que quiero es tener una propiedad
personalizada que me permita leer info de una base de datos y compararla con
el nombre de un menu para poder asignarle un testo.. asi lo tengo en este
momento:

Dim clave As String
Dim desc As String
Do While lector.Read
clave = "me." & Trim(lector.Item("MenuId")) & ".text"
desc = Trim(lector.Item("Descripcion"))
Loop

ya tengo hecha la conexion y definido el lector con su respectivo comando,
MenuId es una columna de la tabla(DB) y descripcion otra columna, la idea es
tener un menu ya definido dentro de una aplicacion y que los nombres de cada
submenu esten en la base de datos, para que cuando valla leyendo cada MenuId
si hay algun menu con ese nombre le ponga en la propiedad .Text lo que esta
en descripcionantes creo que se hacia :

&clave = descripcion, pero en esta version no funciona

Agredazco cualquier ayuda .. llevo mucho tiempo intentando resolver esto

"Julio Casal" escribió:

¿Qué parte no funciona?

Julio Casal
.Net Solutions Developer
MCAD


"Miko_tnt" wrote:

> tengo el siguiente problema, tengo una funcion que recibe un menu y una
> hashtable y quiero recorrer todo el menu y al mismo tiempo la hash table y
> preguntar que cuando el nombre del menu sea igual a la clave de la tabla haga
> la propiedad text igual a la descripcion de la tabla
>
> tengo este codigo pero no funciona, por favor agradezko kuakier ayuda
>
> Public Function Generar_Menu(ByVal mm As menu, ByVal tabla As Hashtable) As
> menu
> Dim menui As MenuItem
> Dim elemento As New DictionaryEntry()
> For Each menui In mm.MenuItems
> For Each elemento In tabla
> If (tabla.ContainsKey(menui.nombredelmenu) Then
> menui.Text = tabla.Item(menui.nombredelmenu)
> End If
> Next
> Next
> End Function
>

Amigo, la verdad, al igual que Tristan estoy confundido con lo que deseas
hacer. Confírmame algo, en resumen, lo que quieres hacer es armar tu menú a
partir de la info que tienes en una tabla de tu base de datos, verdad?

Saludos.

Julio Casal
.Net Solutions Developer
MCAD


"Miko_tnt" wrote:

ya cambie esa parte del codigo, pero lo que quiero es tener una propiedad
personalizada que me permita leer info de una base de datos y compararla con
el nombre de un menu para poder asignarle un testo.. asi lo tengo en este
momento:

Dim clave As String
Dim desc As String
Do While lector.Read
clave = "me." & Trim(lector.Item("MenuId")) & ".text"
desc = Trim(lector.Item("Descripcion"))
Loop

ya tengo hecha la conexion y definido el lector con su respectivo comando,
MenuId es una columna de la tabla(DB) y descripcion otra columna, la idea es
tener un menu ya definido dentro de una aplicacion y que los nombres de cada
submenu esten en la base de datos, para que cuando valla leyendo cada MenuId
si hay algun menu con ese nombre le ponga en la propiedad .Text lo que esta
en descripcionantes creo que se hacia :

&clave = descripcion, pero en esta version no funciona

Agredazco cualquier ayuda .. llevo mucho tiempo intentando resolver esto

"Julio Casal" escribió:

> ¿Qué parte no funciona?
>
> Julio Casal
> .Net Solutions Developer
> MCAD
>
>
> "Miko_tnt" wrote:
>
> > tengo el siguiente problema, tengo una funcion que recibe un menu y una
> > hashtable y quiero recorrer todo el menu y al mismo tiempo la hash table y
> > preguntar que cuando el nombre del menu sea igual a la clave de la tabla haga
> > la propiedad text igual a la descripcion de la tabla
> >
> > tengo este codigo pero no funciona, por favor agradezko kuakier ayuda
> >
> > Public Function Generar_Menu(ByVal mm As menu, ByVal tabla As Hashtable) As
> > menu
> > Dim menui As MenuItem
> > Dim elemento As New DictionaryEntry()
> > For Each menui In mm.MenuItems
> > For Each elemento In tabla
> > If (tabla.ContainsKey(menui.nombredelmenu) Then
> > menui.Text = tabla.Item(menui.nombredelmenu)
> > End If
> > Next
> > Next
> > End Function
> >

si ... esa es la idea,

la DB tiene 2 columnas MenuId y Descripcion, la primera contiene lo que
deberia ser el nombre del menu y la segunda lo que deberia aparecer en el
menu ejemplo:

MenuId: MNU0
Descripcion:Archivo

El menu principal ya esta creado con sus respectivos submenus pero cada uno
solo tiene el nombre (MNU0,MNU1,MNU00,)y la propiedad Text en blanco.
Tiene que ver en la DB si algun registro del MenuId es igual al nombre de
alguno de los menus y de ser asi ponerle de texto la descripcion de la tabla

"Julio Casal" escribió:

Amigo, la verdad, al igual que Tristan estoy confundido con lo que deseas
hacer. Confírmame algo, en resumen, lo que quieres hacer es armar tu menú a
partir de la info que tienes en una tabla de tu base de datos, verdad?

Saludos.

Julio Casal
.Net Solutions Developer
MCAD


"Miko_tnt" wrote:

> ya cambie esa parte del codigo, pero lo que quiero es tener una propiedad
> personalizada que me permita leer info de una base de datos y compararla con
> el nombre de un menu para poder asignarle un testo.. asi lo tengo en este
> momento:
>
> Dim clave As String
> Dim desc As String
> Do While lector.Read
> clave = "me." & Trim(lector.Item("MenuId")) & ".text"
> desc = Trim(lector.Item("Descripcion"))
> Loop
>
> ya tengo hecha la conexion y definido el lector con su respectivo comando,
> MenuId es una columna de la tabla(DB) y descripcion otra columna, la idea es
> tener un menu ya definido dentro de una aplicacion y que los nombres de cada
> submenu esten en la base de datos, para que cuando valla leyendo cada MenuId
> si hay algun menu con ese nombre le ponga en la propiedad .Text lo que esta
> en descripcionantes creo que se hacia :
>
> &clave = descripcion, pero en esta version no funciona
>
> Agredazco cualquier ayuda .. llevo mucho tiempo intentando resolver esto
>
> "Julio Casal" escribió:
>
> > ¿Qué parte no funciona?
> >
> > Julio Casal
> > .Net Solutions Developer
> > MCAD
> >
> >
> > "Miko_tnt" wrote:
> >
> > > tengo el siguiente problema, tengo una funcion que recibe un menu y una
> > > hashtable y quiero recorrer todo el menu y al mismo tiempo la hash table y
> > > preguntar que cuando el nombre del menu sea igual a la clave de la tabla haga
> > > la propiedad text igual a la descripcion de la tabla
> > >
> > > tengo este codigo pero no funciona, por favor agradezko kuakier ayuda
> > >
> > > Public Function Generar_Menu(ByVal mm As menu, ByVal tabla As Hashtable) As
> > > menu
> > > Dim menui As MenuItem
> > > Dim elemento As New DictionaryEntry()
> > > For Each menui In mm.MenuItems
> > > For Each elemento In tabla
> > > If (tabla.ContainsKey(menui.nombredelmenu) Then
> > > menui.Text = tabla.Item(menui.nombredelmenu)
> > > End If
> > > Next
> > > Next
> > > End Function
> > >