Como Percorrer todos os controles de uma página ASP com vb.net

20/05/2014

0

Estou começando a desenvolver em ASP com VB.NET. Preciso percorrer todos dos controles Button e ImageButton da minha página WFPermissoes que possui uma máster page.
Estou utilizando o código abaixo. Porém retorna nothing.



Dim AplFrm As String = "Teste.Web.WFPermissoes

If System.Type.GetType(AplFrm) IsNot Nothing Then
' Cria uma nova instância do Web Form
Dim FORMULARIO As Page = Activator.CreateInstance(System.Type.GetType(AplFrm))

For Each controles As Control In FORMULARIO.Controls

For Each c As Control In controles.Controls
If c.GetType.ToString = "System.Web.UI.WebControls.ImageButton" Or c.GetType.ToString = "System.Web.UI.WebControls.Button" Then

Dim BTNODE = New TreeNode(c.SkinID)
BTNODE.Target = c.ID
Subnode.ChildNodes.Add(BTNODE)

For m = 1 To ContaMenu
NomeMN = RetornaConteudoXML(Xml_Menu, "Nome", "Menu ID = " & m)

For cmd = 1 To ContaCMD
CMDTela = RetornaConteudoXML(Xml_CMD, "Tela", "Comando ID = " & cmd)
' CMDTela = Trim(TabMenu.Rows(i).Item(5))
If Subnode.Value = NomeMN And BTNODE.Target = CMDTela Then
BTNODE.Checked = True
End If

Next

Next

End If

Next

Next
Carlos Alberto

Carlos Alberto

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar