Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

cintiadel

[Resolvido] TreeView não funciona no firefox

Recommended Posts

Bom dia

Tenho uma aplicaçao administrativa que possui um treeview dentro de um frame, ela roda normal no IE, mas no Firefox e no Google Chrome não aparece os nós filhos qdo clico no nó pai, ou seja, nao expande as opções.

Preciso que a estrutura que está feita seja mantida, mas que funcione em todos os navegadores.

Segue o código abaixo:

 

AdmDefault.aspx

<frameset border="0" frameSpacing="0" rows="60,89%" frameBorder="0">
<%-- Página AdmHeader.aspx contém o cabeçalho da página --%>
 <frame name="top" marginWidth="0" marginHeight="0" src="ADMHeader.aspx" frameBorder="0" noResize scrolling="no">
 <frameset border="0" frameSpacing="0" cols="170,*" frameBorder="0">
 <%-- Página ADMMenu.aspx contém o treeview que é o menu --%>
  <frame name="menu" marginWidth="0" marginHeight="0" src="ADMMenu.aspx" frameBorder="0" noResize scrolling="auto">
 <%-- Página ADMBranco.aspx área onde o conteudo vai ser apresentado--%>
  <frame name="main" marginWidth="0" marginHeight="0" src="ADMbranco.aspx" frameBorder="0" noResize scrolling="auto">
 </frameset>
</frameset>

 

AdmMenu.aspx

 <iewc:treeview id="treeMenu" width="100%" runat="server" ShowLines="False" 
 ShowToolTip="False" ShowPlus="False" BorderWidth="0px" 
 BorderColor="Transparent" BackColor="Transparent" 
 CssClass="menutree" EnableViewState="False">
</iewc:treeview>

 

AdmMenu.aspx.vb

Imports System.Data.SqlClient
Imports Microsoft.Web.UI.WebControls
Imports Sinasa.Db
Imports Sinasa.Util

Partial Class ADMMenu
Inherits System.Web.UI.Page
Protected WithEvents datMenu As System.Web.UI.WebControls.Repeater
Protected WithEvents datSubmenu As System.Web.UI.WebControls.Repeater

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

 If Not Page.IsPostBack() Then
       	BindMenu()
   	End If
End Sub

Private Sub BindMenu()
   	Dim nodeMenu As TreeNode
   	Dim nodeSub As TreeNode
   	Dim sdr As SqlClient.SqlDataReader
   	Dim stAuxLink As String

   	Try
     	'Verifica a qual menu o usuario tem acesso

       	sdr = Users.ListAppMenu(Page.User.Identity.Name, "ADMIN", True)

       	'Populate the TreeView from the DataSet.
       	Dim stGroupId As String = ""

       	While sdr.Read

           	If IsDBNull(sdr("stParentAppMenuId")) Then
               	nodeMenu = New TreeNode
               	nodeMenu.Text = sdr("stCaption")
               	nodeMenu.Expandable = ExpandableValue.Always

               	If Not IsDBNull(sdr("stWebLink").Value) Then
                   	stAuxLink = sdr("stWebLink")

                   	If InStr(stAuxLink, "default.aspx") > 0 Then
                       	stAuxLink += "&stUserID=" & Page.User.Identity.Name.ToString
                   	End If

                   	nodeMenu.NavigateUrl = "javascript:Call('" & stAuxLink & "');"
               	End If

               	nodeMenu.DefaultStyle.CssText = "FONT-SIZE: 10px; FONT-WEIGHT: BOLD; PADDING: 2px; FONT-FAMILY: VERDANA,ARIAL; COLOR:# #043c75; TEXT-DECORATION : none; WIDTH: 150px"
               	nodeMenu.HoverStyle.CssText = "WIDTH: 150px"
               	treeMenu.Nodes.Add(nodeMenu)
               	stGroupId = CSDb.CString(sdr("stAppMenuId"))

           	Else

               	nodeSub = New TreeNode
               	nodeSub.Text = sdr("stCaption")
               	nodeSub.ImageUrl = CSDb.CString(sdr("stImage"))
               	'nodeSub.HoverStyle.CssText = "FONT-SIZE: 10px;COLOR: #043c75;TEXT(-DECORATION) : underline()"
               	nodeSub.DefaultStyle.CssText = "FONT-SIZE: 10px; FONT-FAMILY: VERDANA,ARIAL; COLOR: #043c75;TEXT-DECORATION : none; WIDTH: 118px "
               	'nodeSub.SelectedStyle.CssText = ""

               	If Not IsDBNull(sdr("stWebLink")) Then
                   	stAuxLink = sdr("stWebLink")

                   	If InStr(stAuxLink, "default.aspx") > 0 Then
                       	stAuxLink += "&stUserID=" & Page.User.Identity.Name.ToString
                   	End If

                   	nodeSub.NavigateUrl = "javascript:Call('" & stAuxLink & "');"

               	End If

               	nodeMenu.Nodes.Add(nodeSub)

           	End If

       	End While

   	Catch ex As Exception
       	Throw ex

   	Finally
       	CSDb.CloseRead(sdr)
   	End Try

End Sub
End Class

Compartilhar este post


Link para o post
Compartilhar em outros sites

Cara você esta usando um componente de terceiros, iewc, fica dificil ajudar, eu recomendo a usar o nativo do VS ou utilizar algum em jquery.

 

Abraços...

o componente é da microsoft

 

<%@ Register TagPrefix="iewc" Namespace="Microsoft.Web.UI.WebControls" Assembly="Microsoft.Web.UI.WebControls" %>

 

acabei substituindo pelo componente que ja vem no visual studio e consegui fazer funcionar, so falta acertar o css agora.

 

Grata

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.