% response.Redirect("http://www.disklicit.com.br/n") response.End() response.Expires = 0 'session("personal") = "255320,255393" 'response.Write(session("personal")) %> <% Dim page,action action = request.QueryString("action") if action = "logoff" then session("logadoSist") = "" end if page = request.QueryString("page") select case page case "1" session("frame") = "institucional.asp" session("height") = "650" session("public") = "1" case "2" session("frame") = "estrutura.asp" session("height") = "700" session("public") = "1" case "3" session("frame") = "localizacao.asp" session("height") = "615" session("public") = "1" case "4" session("frame") = "comoparticipar.asp" session("height") = "690" session("public") = "3" case "5" session("frame") = "limitesdelicitacoes.asp" session("height") = "600" session("public") = "3" case "6" session("frame") = "boletim.asp" session("height") = "1500" session("public") = "2" case "7" session("frame") = "areasinteresse.asp" session("height") = "1540" case "8" session("frame") = "contrato.asp" session("height") = "1550" session("public") = "3" case "9" session("frame") = "certidoes.asp" session("height") = "1250" session("public") = "3" case "10" session("frame") = "Sicaf.asp" session("height") = "700" session("public") = "3" case "11" session("frame") = "telebusca.asp" session("height") = "600" session("public") = "3" case "12" session("frame") = "juslicit.asp" session("height") = "1400" session("public") = "2" case "13" session("frame") = "Diarios.asp" session("height") = "800" session("public") = "3" case "14" session("frame") = "Cursos.asp" session("height") = "600" session("public") = "5" case "15" session("frame") = "Suporte.asp" session("height") = "500" session("public") = "6" case "16" session("frame") = "sac.asp" session("height") = "600" session("public") = "6" case "17" session("frame") = "acesso.asp" session("height") = "1050" session("public") = "6" case "18" session("frame") = "http://www.disklicit.com.br/confemailhtm.asp" session("height") = "600" session("public") = "6" case "19" session("frame") = "legislacao.asp" session("height") = "600" session("public") = "3" case "20" session("frame") = "manuais.asp" session("height") = "600" session("public") = "3" case "21" session("frame") = "artigos.asp" session("height") = "600" session("public") = "3" case "22" session("frame") = "informativos.asp" session("height") = "1200" session("public") = "3" case "23" session("frame") = "apresentacoes.asp" session("height") = "600" session("public") = "3" case "24" session("frame") = "consultaenderecos.asp" session("height") = "700" session("public") = "4" case "25" session("frame") = "consultaeditais.asp" session("height") = "600" session("public") = "4" case "26" session("frame") = "consultacadastramento.asp" session("height") = "600" session("public") = "4" case "27" session("frame") = "consultaatas.asp" session("height") = "600" session("public") = "4" case "28" session("frame") = "tecnica.asp" session("height") = "600" session("public") = "3" case "29" session("frame") = "indica.asp" session("height") = "600" session("public") = "3" case "30" session("frame") = "down.asp" session("height") = "600" session("public") = "3" case "31" session("frame") = "DiskCertidoes.htm" session("height") = "2650" case "32" session("frame") = "/graficos/ampie5.html" session("height") = "600" session("public") = "3" case else session("frame") = "frameprinc.asp" session("height") = "1200" session("public") = "6" end select select case session("public") case "1" session("menu1") = "block" session("menu2") = "none" session("menu3") = "none" session("menu4") = "none" session("menu5") = "none" session("menu6") = "none" case "2" session("menu1") = "none" session("menu2") = "block" session("menu3") = "none" session("menu4") = "none" session("menu5") = "none" session("menu6") = "none" case "3" session("menu1") = "none" session("menu2") = "none" session("menu3") = "block" session("menu4") = "none" session("menu5") = "none" session("menu6") = "none" case "4" session("menu1") = "none" session("menu2") = "none" session("menu3") = "none" session("menu4") = "block" session("menu5") = "none" session("menu6") = "none" case "5" session("menu1") = "none" session("menu2") = "none" session("menu3") = "none" session("menu4") = "none" session("menu5") = "block" session("menu6") = "none" case "6" session("menu1") = "none" session("menu2") = "none" session("menu3") = "none" session("menu4") = "none" session("menu5") = "none" session("menu6") = "block" end select %>
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||