Max34
-
Total de itens
7 -
Registro em
-
Última visita
Posts postados por Max34
-
-
Ex: Tenho o form_01 que chama o form_02, ao chamar o form_02 o form_01 continua aberto, queria saber qual comando devo escrever no formulário_02 para executar uma função existente no form_01
-
tenho uma página que abre um arquivo pdf gerado no servidor através do "location.href". Queria saber se tem como definir a porcentagem de visualização do arquivo pdf pois o mesmo já vem definido como %34,1. É possivel fazer isso? como devo proceder?
Antecipados agradecimentos.
-
-
Você está usando algum desse Request:
REMOTE_ADDR
REMOTE_HOST
REMOTE_USER
???
Não uso nenhum destes requests citados acima.
Abaixo segue o fonte da pagina de login, executaLogin e a página principal que deveria receber as sessões da página de executalogin:
Pagina de login:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <% if( session("IDIOMA") = "" )then session("IDIOMA") = "PT-BR" end if if( request("hidResolucao") <> "")then session("resolucao") = request("hidResolucao") end if if( request("verBrowser") <> "")then session("verBroser") = request("verBrowser") end if %> <% if(session("IDIOMA") = "PT-BR") then %> <!--#include file="idiomas/portugues.asp"--> <%else%> <!--#include file="idiomas/espanhol.asp" --> <!--#include file="idiomas/ingles.asp" --> <% end if %> <% Session("FILTRO_PCOL_DTINI") = "" Session("FILTRO_PCOL_DTFIM") = "" Session("FILTRO_PCOL_ACEIT") = "" Session("FILTRO_PCOL_RECUS") = "" Session("FILTRO_PCOL_NENVI") = "N" Session("FILTRO_PCOL_INICI") = "S" Session("ECOMMERCE_OPERADOR_LOGADO") = "" %> <html> <head> <title><%=str00001%></title> <link rel="stylesheet" href="css/estilos.css" > </head> <body class="fundo00 margem00 bInicio br1 bl1 bb1"><!--bgcFundo--> <form name="frmLogin" id="frmLogin" action="executaLogin.asp" method="post" onsubmit="confirmar( event );" > <%if( cInt( Session("resolucao") ) >= 1024 )then%> <br></br> <%end if%> <br><br> <table align="center" border=0 cellspacing="0" class="fundo00" width="100%" > <tr><%for i=0 to 19%><td width="5%"></td><%next%></tr> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <tr> <td colspan="06" class="txt08" > </td> <td colspan="08" class="txt08 cffffff negrito tac bLogin br1 bt1 bl1 fundo02" ><%=str00002%></td> <td colspan="06" class="txt08" ></td> </tr> <tr> <td colspan="06" class="txt08" > </td> <td colspan="08" class="txt08 bLogin bl1 br1" > </td> <td colspan="06" class="txt08" > </td> </tr> <tr> <td colspan="06" class="txt08" > </td> <td colspan="01" class="txt08 bLogin bl1" > </td> <td colspan="02" class="txt08" > <%=str00003%></td> <td colspan="04" class="txt08" ><input type="text" name="txt0000" id="txt0000" class="txt08" style="width:100%;" value="<%=request("param00")%>" onkeydown="verTeclaPressionada(event,this.id);" /></td> <td colspan="01" class="txt08 bLogin br1" > </td> </tr> <tr> <td colspan="06" class="txt08" > </td> <td colspan="01" class="txt08 bLogin bl1" > </td> <td colspan="02" class="txt08" > <%=str00004%> <span id='spnSenhaOperador'></span></td> <td colspan="04" class="txt08" ><input type="password" codigo="1adodsfo" name="txt0001" id="txt0001" class="txt08" style="width:100%;" onkeydown="verTeclaPressionada(event,this.id);" /></td> <td colspan="01" class="txt08 bLogin br1" > </td> </tr> <tr id='trOperador' style="display:<%If Request("txtOperador") = "" Then Response.Write("none") Else Response.write("block") End If%>"> <td colspan="06" class="txt08" > </td> <td colspan="01" class="txt08 bLogin bl1" > </td> <td colspan="02" class="txt08" > Operador</td> <td colspan="04" class="txt08" ><input type="text" name="txtOperador" id="txtOperador" value="<%=Request("txtOperador")%>" class="txt08" style="width:100%;" onkeydown="verTeclaPressionada(event,this.id);" maxlength="12" title='Entre com o código do Operador para acessar.'/></td> <td colspan="01" class="txt08 bLogin br1" > </td> </tr> <tr> <td colspan="06" class="txt08" > </td> <td colspan="08" class="txt08 bLogin bl1 br1" > </td> <td colspan="06" class="txt08" > </td> </tr> <tr> <td colspan="06" class="txt08" > </td> <td colspan="01" class="txt08 bLogin bl1" > </td> <td colspan="03" class="txt08" ><input type="submit" name="btn000" id="btn000" class="txt08 cffffff negrito fundo03" style="width:100%;" value="<%=str00006%>" /></td> <td colspan="03" class="txt08" ><input type="button" name="btn001" id="btn001" class="txt08 cffffff negrito fundo03" style="width:100%;" value="<%=str00005%>" onclick="opcoes(); " /></td> <td colspan="01" class="txt08 bLogin br1" > </td> </tr> <tr> <td colspan="06" class="txt08" > </td> <td colspan="08" class="txt08 bLogin bl1 br1 bb1" > </td> <td colspan="06" class="txt08" > </td> </tr> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <%if( cInt( Session("resolucao") ) >= 1024 )then%> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <%end if%> </table> <input type="hidden" name="hidResolucao" id="hidResolucao" value="<%=request("hidResolucao")%>" /> <input type="hidden" name="verBrowser" id="verBrowser" value="<%=session("verBrowser")%>" /> </form> <script language="JavaScript" type="text/javascript" src="js/funcoes.js" ></script> <script language="JavaScript" type="text/javascript" > var blnOperadorAcionado = false; function verTeclaPressionada( ev, obj ) { if( ev.ctrlKey && ev.shiftKey && keyCodeFF(ev) == 79 ) { if( !blnOperadorAcionado ) { document.getElementById("trOperador").style.display = "block"; document.getElementById("spnSenhaOperador").innerHTML = "(operador)"; try{document.getElementById(obj).focus();}catch(e){document.getElementById("txt0001").focus();} blnOperadorAcionado = true; } else { document.getElementById("trOperador").style.display = "none"; document.getElementById("spnSenhaOperador").innerHTML = ""; try{document.getElementById(obj).focus();}catch(e){document.getElementById("txt0001").focus();} document.getElementById("txtOperador").value = ""; blnOperadorAcionado = false; } } } </script> <%if( session("ECOMMERCE_LOGIN") = "SITE_ECOMMERCE_LOGADO" )then %> <script language="JavaScript" type="text/javascript" > top.frames("frmHome").location.href = "paginaPrincipal.asp?hidResolucao="+screen.width+"verBrowser="+getBrowser(); </script> <%else%> <script language="JavaScript" type="text/javascript" > var verBrowser = getBrowser(); var janelaOpcoes = null; var janelaTrocaSenha = null; var str00008 = "<%=str00008%>"; var str00017 = "<%=str00017%>"; var str00018 = "<%=str00018%>"; var param00 = "<%=request("param00")%>"; <%if( session("paginaInicial_senhaExpirou") = "true" )then%> var senhaExpirou = true; <%else%> var senhaExpirou = false; <%end if%> </script> <script language="JavaScript" type="text/javascript" src="js/paginaInicial.js" ></script> <%end if%> </body> </html>-------------------------------------------------------fim da página de login----------------------------------------- Página ExecutaLogin:<%@Language="VBScript" CodePage="1252"%> <!--#include file="idiomas/portugues.asp"--> <!--#include file="idiomas/espanhol.asp" --> <!--#include file="idiomas/ingles.asp" --> <!--#include virtual="asp/funcoes.asp"--> <!-- Tela executaLogin.asp --> <html> <head> <title><%=str00001%></title> <link rel="stylesheet" href="Css/estilos.css"> </head> <body class = "fundo00 margem00 bInicio br1 bl1 bb1"> <% Dim senha, login, mensagem, tempo, descricao, cdOperador login = Request("txt0000") senha = Request("txt0001") cdOperador = Request.Form("txtOperador") If Request("hidResolucao" ) <> "" Then Session("resolucao") = Request("hidResolucao" ) End If Set oleObj = Server.CreateObject("Sup03600.rdmCtrlPedColetaHtml") 'Verifica se é para validar senha do operador ou usuário If Not FblnVazio(cdOperador) Then resultado = oleObj.getLoginOpe( login , senha, zerosEsquerda(cdOperador,12) ) Else resultado = oleObj.getLogin( login , senha ) End If Set xmlDoc = Server.CreateObject("Microsoft.XMLDOM") Set params = Server.CreateObject("Microsoft.XMLDOM") Set linha = Server.CreateObject("Microsoft.XMLDOM") Set colunas = Server.CreateObject("Microsoft.XMLDOM") xmlDoc.async = False xmlDoc.loadXML( resultado ) If xmlDoc.parseError.errorCode <> 0 Then %> <script language="JavaScript" type="text/javascript" > alert("Ocorreu um erro no servidor, favor tentar novamente mais tarde:\n\n<%=Replace(Replace(Replace(xmlDoc.parseError.reason,chr(13),"\n"),"'","\'"),chr(10),"")%>"); history.back(); </script> <% Else Set params = xmlDoc.getElementsByTagName("PARAM") mensagem = params.item(0).getAttribute("Value") If mensagem = "SENHA_INVALIDA" Then %> <script language="JavaScript" type="text/javascript" > top.frames("frmHome").location.href = "paginaInicial.asp?param00=<%=login%>&txtOperador=<%=cdOperador%>&hidResolucao="+screen.width; alert("<%=str00019%>"); </script> <% ElseIf mensagem = "ACESSO_OPERADOR_INVALIDO" Then %> <script language="JavaScript" type="text/javascript" > top.frames("frmHome").location.href = "paginaInicial.asp?param00=<%=login%>&txtOperador=<%=cdOperador%>&hidResolucao="+screen.width; alert("Operador não cadastrado ou sem permissão."); </script> <% ElseIf mensagem = "DATA_EXPIROU" Then Session("paginaInicial_senhaExpirou") = "true" %> <script language="JavaScript" type="text/javascript" > top.frames("frmHome").location.href = "paginaInicial.asp?param00=<%=login%>&txtOperador=<%=cdOperador%>&hidResolucao="+screen.width; alert("<%=str00020%>"); </script> <% ElseIf mensagem = "DATA_EXPIRANDO" Then tempo = params.item(1).getAttribute("Value") If tempo <> "0" Then tempo = Replace( str00021, "[@param00@]", tempo ) Else tempo = str00035 End If Set colunas = xmlDoc.getElementsByTagName("FIELD") Set linha = xmlDoc.getElementsByTagName("ROW") Set params = xmlDoc.getElementsByTagName("PARAM") For i=0 To colunas.length-1 campo = colunas.item(i).getAttribute("attrname") Session( campo ) = linha.item(0).getAttribute( campo ) Session( campo + "_DESCRICAO" ) = params.item( i+1 ).getAttribute( "Value" ) Next Session("ECOMMERCE_LOGIN") = "SITE_ECOMMERCE_LOGADO" Session("paginaPrincipal_tempoParaExpirar") = tempo %> <script language="JavaScript" type="text/javascript" > top.frames("frmHome").location.href = "paginaPrincipal.asp?hidResolucao="+screen.width; </script> <% ElseIf mensagem = "LOGIN_NAO_CADASTRADO" Then %> <script language="JavaScript" type="text/javascript" > top.frames("frmHome").location.href = "paginaInicial.asp?param00=<%=login%>&txtOperador=<%=cdOperador%>&hidResolucao="+screen.width; alert("<%=str00022%>"); //" Login não cadastrado"; </script> <% ElseIf mensagem = "ERRO_SERVIDOR" Then %> <script language="JavaScript" type="text/javascript" > top.frames("frmHome").location.href = "paginaInicial.asp?param00=<%=login%>&txtOperador=<%=cdOperador%>&hidResolucao="+screen.width; alert("<%=str00023%>"); //" Problemas no servidor"; </script> <% ElseIf mensagem = "LOGIN_CORRETO" Then Set colunas = xmlDoc.getElementsByTagName("FIELD") Set linha = xmlDoc.getElementsByTagName("ROW") Set params = xmlDoc.getElementsByTagName("PARAM") For i=0 To colunas.length-1 campo = colunas.item(i).getAttribute("attrname") Session( campo ) = linha.item(0).getAttribute( campo ) Session( campo + "_DESCRICAO" ) = getElementByName( campo, params ) Next Session("ECOMMERCE_LOGIN") = "SITE_ECOMMERCE_LOGADO" If Not FblnVazio(cdOperador) Then Session("ECOMMERCE_OPERADOR_LOGADO") = zerosEsquerda(cdOperador,12) End If %> <script language="JavaScript" type="text/javascript" > top.frames("frmHome").location.href = "paginaPrincipal.asp?hidResolucao="+screen.width; </script> <% End If End If Function getElementByName( ByVal name, ByRef colecao ) Dim retorno : retorno = "" Dim j : j = 0 For j=0 To colecao.length-1 If name = colecao.item(j).getAttribute("Name") Then retorno = colecao.item(j).getAttribute("Value") Exit For End If Next getElementByName = retorno End Function %> </body> </html>-----------------------------------------------------Fim da página exectuaLogin------------------------------ Página principal:<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <!--#include file="idiomas/portugues.asp"--> <!--#include file="idiomas/espanhol.asp" --> <!--#include file="idiomas/ingles.asp" --> <!-- Tela paginaPrincipal.asp --> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <title><%=str00001%></title> <link rel="stylesheet" type="text/css" href="css/estilos.css" /> </head> <body class = "margem00 fundo00 bInicio br1 bl1 bb1"> <%if( (session("ECOMMERCE_LOGIN") = "SITE_ECOMMERCE_LOGADO") and Session("IDIOMA") <> "" )then %> <table align="center" border="0" cellspacing="0" class="fundo00" width="100%"> <!-- borda01--> <tr><%for i=0 to 19%><td width="5%"></td><%next%></tr> <tr> <td colspan="15" class="txt08 tal negrito cffffff fundo01" > <%=str00001%> - <%=Application("nomeEmpresaContratante")%></td> <td colspan="03" class="txt08 tac fundo01 bl1 bTopo" ><a href="" class="lk001 negrito" onclick="alterarSenha( event );" ><%=str00024%></a> </td> <td colspan="02" class="txt08 tac fundo01 bl1 bTopo" ><a href="" class="lk001 negrito" onclick="sair( event );" ><%=str00025%></a> </td> </tr> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_sup_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" background="imagens/cont_sup.gif" style="background-repeat:repeat;" ></td> <td colspan="01" background="imagens/cont_sup_direito.gif" style="background-repeat:no-repeat;" ></td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" > </td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" > </td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" class="txt08 tac c828200" ><%=str00031%>: <%=session("NMRAZSOCFORN")%></td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" class="tac txt12" ><a href="alterarDados.asp" class="lk000" onclick=""><%=str00026%></a></td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" > </td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" > </td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" class="txt08 tac c828200" ><%=str00032%>: <%=session("NRINSJURFORN")%></td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" class="tac txt12" ><a href="pedCotacao_Antes.asp" class="lk000" onclick=""><%=str00027%></a></td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" > </td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" > </td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" class="txt08 tac c828200" ><%=str00033%>: <%=session("NRINSESTFORN")%></td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" class="tac txt12" ><a href="histCotacao_Geral_Antes.asp" class="lk000" onclick=""><%=str00028%></a></td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" > </td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" > </td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" class="txt08 tac c828200" ><%=str00034%>: <%=session("DTCADAFORN")%></td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" class="tac txt12" ><a href="leilaoReverso_Antes.asp" class="lk000" onclick=""><%=str00029%></a></td> </tr> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" > </td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" > </td> </tr> <% 'Lendo arquivo de configuração principal Dim fs, arquivo, controle Dim blnContasAReceber : blnContasAReceber = 0 Set fs = CreateObject("Scripting.FileSystemObject") Set arquivo = fs.OpenTextFile( Server.MapPath("emailConf.ini") ) While Not arquivo.AtEndOfStream Select Case controle Case "[CONTASARECEBER]" : blnContasAReceber = arquivo.readLine controle = "" End Select If Not arquivo.AtEndOfStream Then controle = arquivo.readline End If Wend arquivo.close If blnContasAReceber = 1 Then %> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_lateral_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" > </td> <td colspan="01" background="imagens/cont_lateral_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" class="tac txt12" ><a href="../contasAReceber/contasAReceber.asp" class="lk000" onclick="">Contas a receber</a></td> </tr> <%End If%> <tr> <td colspan="01" > </td> <td colspan="01" background="imagens/cont_inf_esquerdo.gif" style="background-repeat:no-repeat;" ></td> <td colspan="07" background="imagens/cont_inf.gif" style="background-repeat:repeat;" ></td> <td colspan="01" background="imagens/cont_inf_direito.gif" style="background-repeat:no-repeat;" ></td> <td colspan="10" > </td> </tr> <%if( cInt( Session("resolucao") ) >= 1024 )then%> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <tr><td colspan="20" > </td></tr> <%end if%> </table> <script language="JavaScript" type="text/javascript" src="js/funcoes.js" ></script> <script language="JavaScript" type="text/javascript" > var verBrowser = getBrowser(); var str00008 = "<%=str00008%>"; var janelaAlterarSenha = null; var janelaPerguntaTrocaSenha = null; <%if( session("paginaPrincipal_tempoParaExpirar") <> "" )then%> var senhaExpirando = true; var mensagemSenhaExpirando = "<%=session("paginaPrincipal_tempoParaExpirar")%>"; <%session("paginaPrincipal_tempoParaExpirar") = "" %> <%else%> var senhaExpirando = false; var mensagemSenhaExpirando = ""; <%end if%> function sair( objEvento ){ if( verBrowser == "MSIE"){ objEvento.returnValue = false; }else if( verBrowser == "FIREFOX"){ objEvento.preventDefault(); } location.href = "logout.asp"; } function alterarSenha( objEvento ){ if( verBrowser == "MSIE" ) objEvento.returnValue = false; else if( verBrowser == "FIREFOX" ) objEvento.preventDefault(); try{ janelaAlterarSenha = window.open("alteraSenha.asp" ,"trocaSenha","center=1,width=300,height=150,statusbar=no,menubar=no,toolbar=no,left="+((screen.width-230)/2)+",top="+((screen.height-190)/2) ); janelaAlterarSenha.focus(); } catch(e){ alert( str00008 ); } } window.onload = function(){ if( senhaExpirando ){ try{ janelaPerguntaTrocaSenha = window.open("perguntaTrocaSenha.asp?mensagemSenhaExpirando=" + mensagemSenhaExpirando ,"perguntaTrocaSenha","center=1,width=350,height=50,statusbar=no,menubar=no,toolbar=no,left="+((screen.width-230)/2)+",top="+((screen.height-190)/2) ); } catch(e){ alert( str00008 ); } } } window.onunload = function(){ try{janelaAlterarSenha.close(); }catch(e){} try{janelaPerguntaTrocaSenha.close();}catch(e){} } </script> <%else%> <script language="JavaScript" type="text/javascript" > alert("<%=application("sessaoExpirou")%>") location.href = "logout.asp"; </script> <%end if%> </body> </html>------------------------------------------------Fim da página Principal-----------------------------------------------------
-
-
Desenvolvi um site em asp que está hospedado numa máquina que tem windows 2008, ao acessá-lo pelo ip eu consigo logar e executar todas as funções do site, mas quanto tento entra pelo dns, ex: "www.meusite.com", eu digito usuário e senha e confirmo da erro pois as variáveis estão vazias, ou seja, ele não esta armazenando nenhuma variável de sessão, fiz um teste e vi que ele carrega as variáveis mas na transição da página que verifica o login para a pagina prinicpal as variáveis de sessão chegam vazias, Gostaria de saber se existe alguma solução para este problema.
Função JavaScript
em Ajax, JavaScript, XML, DOM
Postado
Ex: Tenho o form_01 que chama o form_02, ao chamar o form_02 o form_01 continua aberto, queria saber qual comando devo escrever no formulário_02 para executar uma função existente no form_01