Ir para conteúdo

Arquivado

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

raphanasc

menu sanfona dinamico

Por , em Java

Recommended Posts

raphanasc    0

raphanasc
Postado

Ola,

Estou com um probleminha... meu site é em asp, mas estou usando essas funções em java pra ler um menu de acordo com o banco de dados, mas sempre que eu carrego a pagina os menus ja iniciam aberto... alguem sabe como faço pra iniciar fechado...

<!--#include file="../net/conn.net"--><!--#include file="../net/utilitarios.net"--><!--#include file="../net/util_per.net"--><script type="text/javascript">var persistmenu = "sim";var persisttype = "site";if(document.getElementById) {	document.write('<style type="text/css">\n')	document.write('.submenu{display: none;}\n')	document.write('</style>\n')}function abrir_menu(obj) {	if(document.getElementById) {		var el = document.getElementById(obj);		var ar = document.getElementById("menu").getElementsByTagName("span");		if(el.style.display != "block") {			for(var i=0; i<ar.length; i++) {				if(ar[i].className=="submenu") {					ar[i].style.display = "none";				}			}			el.style.display = "block";		}		else {			el.style.display = "none";		}	}}function abrir_menu2(obj) {	if(document.getElementById) {		var el = document.getElementById(obj);		var ar = document.getElementById("menu2").getElementsByTagName("span2");		if(el.style.display != "block") {			for(var i=0; i<ar.length; i++) {				if(ar[i].className=="submenu2") {					ar[i].style.display = "none";				}			}			el.style.display = "block";		}		else {			el.style.display = "none";		}	}}function abrir_menu3(obj) {	if(document.getElementById) {		var el = document.getElementById(obj);		var ar = document.getElementById("menu3").getElementsByTagName("span3");		if(el.style.display != "block") {			for(var i=0; i<ar.length; i++) {				if(ar[i].className=="submenu3") {					ar[i].style.display = "none";				}			}			el.style.display = "block";		}		else {			el.style.display = "none";		}	}}function get_cookie(Name) {	var search = Name + "="	var returnvalue = "";	if(document.cookie.length > 0) {		offset = document.cookie.indexOf(search)		if(offset != -1) {			offset += search.length			end = document.cookie.indexOf(";", offset);			if(end == -1) end = document.cookie.length;			returnvalue = unescape(document.cookie.substring(offset, end))		}	}	return returnvalue;}function onloadfunction() {	if(persistmenu=="sim") {		var cookiename = (persisttype=="site")? "abrir_menu" : window.location.pathname		var cookievalue = get_cookie(cookiename)		if(cookievalue!="") {			document.getElementById(cookievalue).style.display="block"		}	}}function savemenustate() {	var inc=1, blockid=""	while(document.getElementById("submenu"+inc)) {		if(document.getElementById("submenu"+inc).style.display=="block") {			blockid="submenu"+inc			break		}	inc++	}	var cookiename = (persisttype=="site")? "abrir_menu" : window.location.pathname	var cookievalue = (persisttype=="site")? blockid+";path=/" : blockid	document.cookie = cookiename+"="+cookievalue}if(window.addEventListener) {	window.addEventListener("load", onloadfunction, false)}else if(window.attachEvent) {	window.attachEvent("onload", onloadfunction)}else if(document.getElementById) {	window.onload = onloadfunction}if(persistmenu=="sim" && document.getElementById) {	window.onunload = savemenustate}</script><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml" xml:lang="pt" lang="pt"><head><title>ERP (menu sanfona)</title></head><body><a href="cad_alt_class_prod.asp?opcao=1">inserir novo grupo</a> <%Call ConexaoSistema()	cSql = "SELECT gr_int_id, gr_var_nome FROM t_grupo_produto" 	response.Flush()	Set rs = cConexao.Execute( cSql )	do while not rs.eof%><div id="menu"><div onDblClick="self.location.href='cad_alt_class_prod.asp?opcao=2&gr_id=<%=rs("gr_int_id")%>'" onClick="abrir_menu('<%=rs("gr_int_id")%><%=rs("gr_var_nome")%>')">  <% ctsql = "select subcat_int_id from t_subcategoria_produto as subcat inner join t_categoria_produto as cat on (subcat.cat_int_id = cat.cat_int_id) inner join t_subgrupo_produto as subgr on (cat.subgr_int_id = subgr.subgr_int_id) inner join t_grupo_produto as gr on (subgr.gr_int_id = gr.gr_int_id) where gr.gr_int_id='"&rs("gr_int_id")&"'"	set rsct = cconexao.execute(ctsql)  %>  <img src="../img_sistema/icon/icon_mais.gif"/><b> <%=rs("gr_var_nome")%> (<%=rsct.RecordCount%>)</b>  </div><span id="<%=rs("gr_int_id")%><%=rs("gr_var_nome")%>" class="TextoCampoFormulario"><%SQL2 = "SELECT subgr_int_id, subgr_var_nome FROM t_subgrupo_produto WHERE gr_int_id='"&rs("gr_int_id")&"'"	response.Flush()	%>	<a href="cad_alt_class_prod.asp?opcao=1&gr_id=<%=rs("gr_int_id")%>">inserir novo subgrupo em <%=rs("gr_var_nome")%></a>	<%	Set rs2 = cConexao.Execute( SQL2 )			do while not rs2.eof%>			<div id="menu2"><div onDblClick="self.location.href='cad_alt_class_prod.asp?opcao=2&gr_id=<%=rs("gr_int_id")%>&subgr_id=<%=rs2("subgr_int_id")%>'" onClick="abrir_menu2('<%=rs2("subgr_int_id")%><%=rs2("subgr_var_nome")%>')">  <% ctsql2 = "select subcat_int_id from t_subcategoria_produto as subcat inner join t_categoria_produto as cat on (subcat.cat_int_id = cat.cat_int_id) inner join t_subgrupo_produto as subgr on (cat.subgr_int_id = subgr.subgr_int_id) where subgr.subgr_int_id='"&rs2("subgr_int_id")&"'"	set rsct2 = cconexao.execute(ctsql2)  %><img src="../img_sistema/icon/icon_mais.gif"/><img src="../img_sistema/icon/icon_mais.gif"/><b> <%=rs2("subgr_var_nome")%> (<%=rsct2.RecordCount%>)</b></div><span id="<%=rs2("subgr_int_id")%><%=rs2("subgr_var_nome")%>" class="TextoCampoFormulario">										<%SQL3 = "SELECT cat_int_id, cat_var_nome FROM t_categoria_produto WHERE subgr_int_id='"&rs2("subgr_int_id")&"'"					response.Flush()					%>					<a href="cad_alt_class_prod.asp?opcao=1&gr_id=<%=rs("gr_int_id")%>&subgr_id=<%=rs2("subgr_int_id")%>">inserir nova categoria em <%=rs2("subgr_var_nome")%></a>					<%					Set rs3 = cConexao.Execute( SQL3 )					do while not rs3.eof%>					<div id="menu3"><div onDblClick="self.location.href='cad_alt_class_prod.asp?opcao=2&gr_id=<%=rs("gr_int_id")%>&subgr_id=<%=rs2("subgr_int_id")%>&cat_id=<%=rs3("cat_int_id")%>'" onClick="abrir_menu3('<%=rs3("cat_int_id")%><%=rs3("cat_var_nome")%>')"><% ctsql3 = "select subcat_int_id from t_subcategoria_produto as subcat inner join t_categoria_produto as cat on (subcat.cat_int_id = cat.cat_int_id) where cat.cat_int_id='"&rs3("cat_int_id")&"'"	set rsct3 = cconexao.execute(ctsql3)  %><img src="../img_sistema/icon/icon_mais.gif"/><img src="../img_sistema/icon/icon_mais.gif"/><img src="../img_sistema/icon/icon_mais.gif"/><b> <%=rs3("cat_var_nome")%>(<%=rsct3.RecordCount%>)</b></div><span id="<%=rs3("cat_int_id")%><%=rs3("cat_var_nome")%>" class="TextoCampoFormulario">					 	<%SQL4 = "SELECT subcat_int_id, subcat_var_nome FROM t_subcategoria_produto WHERE cat_int_id='"&rs3("cat_int_id")&"'"						response.Flush()						%>						<a href="cad_alt_class_prod.asp?opcao=1&gr_id=<%=rs("gr_int_id")%>&subgr_id=<%=rs2("subgr_int_id")%>&cat_id=<%=rs3("cat_int_id")%>">inserir nova subcategoria em <%=rs3("cat_var_nome")%></a><br/>						<%						Set rs4 = cConexao.Execute( SQL4 )						do while not rs4.eof%>						<div onDblClick="self.location.href='cad_alt_class_prod.asp?opcao=2&gr_id=<%=rs("gr_int_id")%>&subgr_id=<%=rs2("subgr_int_id")%>&cat_id=<%=rs3("cat_int_id")%>&subcat_id=<%=rs4("subcat_int_id")%>'">                   ◊ <%=rs4("subcat_var_nome")%></div>						<%						rs4.movenext						loop%>					</span>					</div>					<%					rs3.movenext					loop%>					</span>					</div>			<%			rs2.movenext			loop%></span></div>	<%	 	rs.movenext	loopcall fechaconexaosistema()%></body></html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

sublyer    0

sublyer
Postado

Da um post na área de JAVASCRIPT que a galera pode lhe ajudar melhor.Flwww

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos Java
×

Informação importante

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

  Aceito