Ir para conteúdo
Fórum Script Brasil
  • 0

Problemas com QueryString


<% LEMES %>

Pergunta

Estou com um problema para recuperar duas variaveis por Querystring... Estou conseguindo somente recuperar uma....

Recupero a primeira variavel do form (login) e faço a consulta no Banco de dados para listar somente os dados referente ao login. Na primeira tela ele funciona beleza, porém quando clico no link da páginação ele puxa todos os outros dados....

Conulta no BD

SQL = "SELECT * FROM mensagemouvidoria WHERE b_usuariomensagem='"&request.QueryString("login")&"' ORDER By b_codmensagem DESC"

Resultado na barra de endereço: .../consulta_mens.asp?PaginaAtual=2login=teste

Segue abaixo o código

<%if session("logado") = false then
response.Redirect("errologin.asp")
else
iduser=request.QueryString("iduser")
%>

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Universidade do Vale do Para&iacute;ba - UNIVAP</title>

<script LANGUAGE = "JavaScript">
    <!--

      /* VALIDAÇÃO DE FORMULÁRIO */

      function Verifica() {


  var USUARIO  = document.FormAdd.fusuario.value;
  
  var SENHA  = document.FormAdd.fsenha.value;
  
  erro = "";
    //Campos vazios
    if (USUARIO == "")
        erro = "* Digitar um nome de usuário \n";
    if (SENHA == "")
        erro = erro +"* Digitar uma senha \n";
    
    if (erro != "")
    {
        alert("É necessário: \n" + erro);
        return false;
    }

  }
    //-->
    
    </SCRIPT>


<style type="text/css">

A:link {
    COLOR: #46708E; TEXT-DECORATION: none
}
A:visited {
    COLOR: #46708E; TEXT-DECORATION: none
}
A:active {
    COLOR: #46708E; TEXT-DECORATION: none
}
A:hover {
    COLOR: #000033; TEXT-DECORATION: none
}
<!--

.T_baixaa {
    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: 12px;
    border-top-width: 0px;
    border-right-width: 0px;
    border-bottom-width: 1px;
    border-left-width: 0px;
    border-top-style: none;
    border-right-style: none;
    border-bottom-style: solid;
    border-left-style: none;
    border-bottom-color: #46708E;
}

#Layer1 {
    position:absolute;
    left:457px;
    top:192px;
    width:537px;
    height:404px;
    z-index:1;
    overflow: auto;
}
-->
body {
    margin-left: 0px;
    margin-top: 0px;
    margin-right: 0px;
    margin-bottom: 0px;
    background-color: #FFFFFF;
}
.linhatopo {
    border-top-width: 1px;
    border-right-width: 0px;
    border-bottom-width: 0px;
    border-left-width: 0px;
    border-top-style: solid;
    border-right-style: none;
    border-bottom-style: none;
    border-left-style: none;
    border-top-color: #0249A1;
}
.linhas {
    border-top-width: 0px;
    border-right-width: 1px;
    border-bottom-width: 1px;
    border-left-width: 1px;
    border-top-style: none;
    border-right-style: solid;
    border-bottom-style: solid;
    border-left-style: solid;
    border-right-color: #205C9A;
    border-bottom-color: #205C9A;
    border-left-color: #205C9A;
}
.linhas3 {
    border-top-width: 0px;
    border-right-width: 1px;
    border-bottom-width: 0px;
    border-left-width: 1px;
    border-top-style: none;
    border-right-style: solid;
    border-bottom-style: none;
    border-left-style: solid;
    border-right-color: #225F98;
    border-left-color: #225F98;
}
.style1 {
    font-weight: bold;
    font-family: Arial, Helvetica, sans-serif;
    font-size: 14px;
    color: #46708E;
}
.T_baixa {    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: 10px;
    border-top-width: 0px;
    border-right-width: 0px;
    border-bottom-width: 1px;
    border-left-width: 0px;
    border-top-style: none;
    border-right-style: none;
    border-bottom-style: solid;
    border-left-style: none;
    border-bottom-color: #FFFFFF;
}
.style7 {color: #46708E}
.style8 {font-size: 10px}
.style9 {color: #46708E; font-size: 10px; }
.quadrado2 {
    border-top-width: 1px;
    border-right-width: 0px;
    border-bottom-width: 1px;
    border-left-width: 0px;
    border-top-style: solid;
    border-right-style: none;
    border-bottom-style: none;
    border-left-style: none;
    border-top-color: #4D88B4;
    }
    .quadradobaixo2 {
    border-top-width: 1px;
    border-right-width: 0px;
    border-bottom-width: 1px;
    border-left-width: 0px;
    border-top-style: solid;
    border-right-style: none;
    border-bottom-style: solid;
    border-left-style: none;
    border-top-color: #4D88B4;
    border-bottom-color: #4D88B4;
    }
    .quadrado4 {
    border-top-width: 1px;
    border-right-width: 1px;
    border-bottom-width: 1px;
    border-left-width: 1px;
    border-top-style: solid;
    border-right-style: solid;
    border-bottom-style: solid;
    border-left-style: solid;
    border-top-color: #4D88B4;
    border-bottom-color: #4D88B4;
    border-left-color: #4D88B4;
    border-right-color: #4D88B4;
    }
    .quadrado3 {
    border-top-width: 0px;
    border-right-width: 1px;
    border-bottom-width: 1px;
    border-left-width: 1px;
    border-top-style: none;
    border-right-style: solid;
    border-bottom-style: solid;
    border-left-style: solid;
    border-bottom-color: #4D88B4;
    border-left-color: #4D88B4;
    border-right-color: #4D88B4;
    }
.style12 {font-size: 9px; font-family: Arial, Helvetica, sans-serif; color: #FFFFFF; }
.texto1 {
    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: 1px;
}
.style14 {
    font-size: 10px;
    font-family: Verdana, Arial, Helvetica, sans-serif;
    color: #E1E0A8;
    font-weight: bold;
}
.style15 {color: #005BAC}
.style16 {
    color: #005BAC;
    font-size: 10px;
    font-family: Verdana, Arial, Helvetica, sans-serif;
}
-->
</style>
</head>

<body>

<Center>
  <table width="1024" height="160" border="0" cellpadding="0" cellspacing="0" background="img/topo_fund.jpg">
    <tr>
      <td width="235" height="160"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="235" height="160">
        <param name="movie" value="flash/Universidade do Vale do Para&iacute;ba - UNIVAP.swf" />
        <param name="quality" value="high" />
        <embed src="flash/Universidade do Vale do Paraíba - UNIVAP.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="235" height="160"></embed>
      </object></td>
      <td width="971" align="right"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="535" height="160">
        <param name="movie" value="flash/Universidade do Vale do Para&iacute;ba - UNIVAP2.swf" />
        <param name="quality" value="high" />
        <embed src="flash/Universidade do Vale do Paraíba - UNIVAP2.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="535" height="160"></embed>
      </object></td>
    </tr>
  </table>
  <table width="1024" height="812" border="0" cellpadding="0" cellspacing="0">
    <tr>
      <td width="10" height="812" bgcolor="#00284F">&nbsp;</td>
      <td width="1010" align="center" valign="top" bgcolor="#FFFFFF"><table width="100" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td>&nbsp;</td>
          <td>&nbsp;</td>
        </tr>
      </table>
        <table width="960" border="0" cellpadding="0" cellspacing="0" background="img/campi_espande.jpg">
        <tr>
          <td width="325" height="100"><img src="img/topo_ouvidoria_esq.jpg" width="325" height="100" /></td>
          <td width="635" align="right"><img src="img/topo_ouvidoria_dir.jpg" width="325" height="100" /></td>
        </tr>
      </table>
        <table width="960" height="452" border="0" cellpadding="0" cellspacing="0" bgcolor="#F5F5F5" class="linhas3">
          <tr>
            <td width="193" height="452" align="center" valign="top"><table width="170" height="364" border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td width="170" valign="top"><table width="100" height="29" border="0" cellpadding="0" cellspacing="0">
                  <tr>
                    <td height="29">&nbsp;</td>
                  </tr>
                </table>
                  <table width="170" height="34" border="0" cellpadding="0" cellspacing="0" class="quadrado2">
                    <tr>
                      <td width="10" height="34"><div align="center" class="style7">-</div></td>
                      <td width="160" valign="middle"><DIV align=center class="style11">
                          <div align="left"> <font face="Verdana, Arial, Helvetica, sans-serif"><a href="index.asp" class="style7 style8">Ouvidoria</a></font> </div></td>
                    </tr>
                  </table>
                  <table width="170" height="34" border="0" cellpadding="0" cellspacing="0" class="quadrado2">
                  <tr>
                    <td width="10" height="34"><div align="center" class="style7">-</div></td>
                    <td width="160" valign="middle"><DIV align=center class="style11">
                        <div align="left"> <font face="Verdana, Arial, Helvetica, sans-serif"><a href="sobreouvidoria.asp" class="style7 style8">Sobre Ouvidoria</a></font> </div></td>
                  </tr>
                </table>
                  <table width="170" height="34" border="0" cellpadding="0" cellspacing="0" class="quadrado2">
                    <tr>
                      <td width="10" height="22"><div align="center" class="style7">-</div></td>
                      <td width="145" valign="middle"><DIV align=center class="style11">
                          <div align="left"> <font face="Verdana, Arial, Helvetica, sans-serif"><a href="baselegal.asp" class="style9">Base Legal</a></font> </div></td>
                    </tr>
                  </table>
                  <table width="170" height="34" border="0" cellpadding="0" cellspacing="0" class="quadradobaixo2">
                    <tr>
                      <td width="10" height="22"><div align="center" class="style7">-</div></td>
                      <td width="145" valign="middle"><DIV align=center class="style11">
                          <div align="left"> <span class="style8"><font face="Verdana, Arial, Helvetica, sans-serif"><a href="status.asp" class="style7">Status da Solicitação</a></font></span> </div></td>
                    </tr>
                  </table>                  </td>
              </tr>
            </table>
            </td>
            <td width="765" align="center" valign="top"><table width="100" border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td>&nbsp;</td>
              </tr>
            </table>
              <table width="740" height="42" border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td><table width="740" border="1" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
                    <tr>
                      <td width="736" height="26" bgcolor="#D0E2F0"><div align="left"><span class="style1"> &nbsp;&Aacute;rea Restrira  &gt;</span></div></td>
                    </tr>
                  </table></td>
                </tr>
              </table>
              <table width="739" height="655" border="1" cellpadding="0" cellspacing="0" bordercolor="#EAEEF4">
                <tr>
                  <td width="735" height="602" align="center" valign="top" bgcolor="#FFFFFF"><table width="200" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td>&nbsp;</td>
                      <td>&nbsp;</td>
                      <td>&nbsp;</td>
                      <td>&nbsp;</td>
                    </tr>
                  </table>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="texto1">
                      <tr>
                        <td width="408" height="24" valign="baseline"><span class="style8">Ol&aacute;
                              <%response.Write(""&iduser&"")%>
                          ! </span></td>
                        <td width="52">&nbsp;</td>
                        <td width="150" align="right"><a href="areausuario_cad.asp?iduser=<%=iduser%>"><img src="img/auto_bot_cadastrar_07.gif" width="85" height="24" border="0"></a></td>
                        <td width="72" align="right"><a href="consulta_mens.asp?iduser=<%=iduser%>"><img src="img/auto_bot_consulta_08.gif" width="72" height="24" border="0"></a></td>
                      </tr>
                    </table>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" background="img/auto_linha_cinza_10.gif" class="texto1">
                      <tr>
                        <td height="2">&nbsp;</td>
                        <td>&nbsp;</td>
                        <td>&nbsp;</td>
                        <td>&nbsp;</td>
                      </tr>
                    </table>
                    <table width="85" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td width="85">&nbsp;</td>
                      </tr>
                    </table>
                    
                    
                    
                    
                    <%
'AQUI VOCE VAI CONFIGURAR O NUMERO DE GRAVACOES DO BANCO QUE SERA EXIBIDO POR CADA PAGINA
Const GravacoesPorPagina = 5 'MUDE AQUI SE QUISER 

If Request.QueryString("PaginaAtual") = "" Then
    PosicaoDaPagina = 1

Else
    PosicaoDaPagina = CInt(Request.QueryString("PaginaAtual"))
End If    

Set con = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
'Abre conexao com o banco de dados
livro = "DRIVER={Microsoft Access Driver (*.mdb)};"
livro = livro & "DBQ=" & Server.MapPath("dados.mdb")
SQL = "SELECT * FROM mensagemouvidoria WHERE b_usuariomensagem='"&request.QueryString("iduser")&"' ORDER By b_codmensagem DESC"
rs.Open SQL, livro, 3

TotalDEGravacoes = rs.RecordCount
TotalDePaginas = int(TotalDEGravacoes/GravacoesPorPagina)
If TotalDEPaginas MOD GravacoesPorPagina <> 0 Then
TotalDEPaginas = TotalDePaginas + 1
end if

%>
<table width="680" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td align="right" class="style16">p&aacute;gina <%=PosicaoDaPagina%> de
      <%If TotalDePaginas = "0" then response.write "1" else response.write TotalDePaginas end if%></td>
  </tr>
</table>



                    
                    
                    
                    
                    
                    
                    
                    <table width="680" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td>&nbsp;</td>
                      </tr>
                    </table>
                    <%
   rs.PageSize = GravacoesPorPagina
   If NOT rs.EOF Then rs.AbsolutePage = PosicaoDaPagina
   For RepeteGravacoes = 1 to GravacoesPorPagina
    If rs.EOF Then Exit For
%>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" bgcolor="#4A85A7">
                      <tr>
                        <td height="19" align="center"><span class="style14">&nbsp;&nbsp;STATUS PENDENTE</span></td>
                      </tr>
                    </table>
                    
                    
                    <table width="682" border="0" cellpadding="0" cellspacing="0" class="quadrado3">
                      <tr>
                        <td width="133" height="19"><span class="style14">&nbsp;&nbsp;<span class="style15">Data/Hora Abertura: </span></span></td>
                        <td width="199" class="style16"><%=rs("b_data")%>&nbsp;&nbsp;<%=rs("b_hora")%></td>
                        <td width="140"><span class="style14">&nbsp;&nbsp;<span class="style15">Data/Hora Conclus&atilde;o:</span></span></td>
                        <td width="208">&nbsp;</td>
                      </tr>
                    </table>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" class="quadrado3">
                      <tr>
                        <td width="133" height="19"><span class="style14">&nbsp;&nbsp;<span class="style15">Tipo Resposta: </span></span></td>
                        <td width="547"><span class="style16"><%=rs("b_resposta")%></span></td>
                      </tr>
                    </table>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" class="quadrado3">
                      <tr>
                        <td width="133" height="19"><span class="style14">&nbsp;&nbsp;<span class="style15">Tipo Mensagem: </span></span></td>
                        <td width="547"><span class="style16"><%=rs("b_tipomensagem")%></span></td>
                      </tr>
                    </table>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" class="quadrado3">
                      <tr>
                        <td width="133" height="19"><span class="style14">&nbsp;&nbsp;<span class="style15">Assunto: </span></span></td>
                        <td width="547"><span class="style16"><%=rs("b_assunto")%></span></td>
                      </tr>
                    </table>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" class="quadrado3">
                      <tr>
                        <td width="133" height="19"><span class="style14">&nbsp;&nbsp;<span class="style15">2 op&ccedil;&atilde;o assunto : </span></span></td>
                        <td width="547"><span class="style16"><%=rs("b_assuntosubmenu")%></span></td>
                      </tr>
                    </table>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" class="quadrado3">
                      <tr>
                        <td width="133" height="19"><span class="style14">&nbsp;&nbsp;<span class="style15">Informa&ccedil;&atilde;o: </span></span></td>
                        <td width="547"><span class="style16"><%=rs("b_selecao")%></span></td>
                      </tr>
                    </table>
                    <table width="682" border="0" cellpadding="0" cellspacing="0" class="quadrado3">
                      <tr>
                        <td width="133" height="19"><span class="style14">&nbsp;&nbsp;<span class="style15">Descri&ccedil;&atilde;o Mensagem : </span></span></td>
                        <td width="547"><span class="style16"><%=rs("b_descricao")%></span></td>
                      </tr>
                    </table>
                    
                    
                    <table width="680" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td>&nbsp;</td>
                      </tr>
                    </table>
                    
                    <%
rs.MoveNext
Next%>
                    
                    
                    <table width="680" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td width="128" align="left" class="style16"><%
              'CRIA UM LINK PARA A PAGINA ANTERIOR SE A PAGINA FOR MAIOR QUE 1        
              If PosicaoDaPagina > 1 Then 
                  Response.Write "    <a href=""consulta_mens.asp?PaginaAtual=" &  PosicaoDaPagina - 1  & """ target=""_self"">&lt;&lt;&lt; P&aacute;gina Anterior</a>"                
              End If
              
              
              %></td>
                        <td width="424" align="center" class="style16"><%
                        
            atual = request.querystring("PaginaAtual")
            For paginass = 1 to TotalDEPaginas
            If paginass = PosicaoDaPagina then
            Response.Write "&nbsp;<span style=""height:15;border:1px solid #000000;width:18;color:#ffff00;background-color:#336699;padding:3;font-family:arial;text-decoration:none;font-size:11;font-weight:bold"">"
            else
            Response.Write "&nbsp;<a onmouseover=""window.status='Clique para ir &agrave; p&aacute;gina: " & paginass & "';return true"" href=""consulta_mens.asp?PaginaAtual=" & Paginass & """>" 
            end if
            Response.Write Paginass
            If paginass = PosicaoDaPagina then
            Response.Write "</span>&nbsp;"
            else
            Response.write "</a>&nbsp;"
            end if
            Next
           %></td>
                        <td width="128" align="right" class="style16"><%
              'CRIA UM LINK PARA A PROXIMA PAGINA SE EXISTIR A TAL          
               If NOT rs.EOF then       
                   Response.Write "    <a href=""consulta_mens.asp?PaginaAtual=" &  PosicaoDaPagina + 1  & """ target=""_self"">Pr&oacute;xima p&aacute;gina &gt;&gt;&gt;</a>"           
               End If 
               %></td>
                      </tr>
                    </table>
                    <%
'Reseta os objetos do servidor
Set con = Nothing
rs.Close
Set rs = Nothing       
%>
                    <table width="680" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td>&nbsp;</td>
                      </tr>
                    </table></td>
                </tr>
              </table></td>
          </tr>
        </table>
        <table width="960" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="273" align="left" valign="top" background="img/rodape_cont_center.png"><img src="img/rodape_cont_left.png" width="15" height="15" /></td>
            <td width="480" background="img/rodape_cont_center.png">&nbsp;</td>
            <td width="207" align="right" valign="top" background="img/rodape_cont_center.png"><img src="img/rodape_cont_right.png" width="15" height="15" /></td>
          </tr>
        </table></td>
      <td width="9" bgcolor="#00284F">&nbsp;</td>
    </tr>
  </table>
  <table width="1024" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td width="9" bgcolor="#00284F">&nbsp;</td>
      <td width="22" background="img/rodape_esquerda.jpg">&nbsp;</td>
      <td width="866" height="44" align="center" background="img/rodape_expande.jpg"><span class="style12">Av. Shishima Hifumi, 2911 - Urbanova<br />
S&atilde;o Jos&eacute; dos Campos - SP<br />
Fone/ Fax:(12) 3947-1000</span></td>
      <td width="122" background="img/rodape_direita.jpg">&nbsp;</td>
      <td width="9" bgcolor="#00284F">&nbsp;</td>
    </tr>
  </table>
</Center>
  

<%end if%>
  
  
</body>
</html>

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...