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

Tá Dificil...

Deividy

Perguntado por Deividy,

 Share

Pergunta

Deividy

Deividy

Postado
Postado

Eu tenho que apresentar algumas informações que esão no db na tabela X.

Até ai tudo normal.

Só que nesse mesma apresentação eu tenho tenho que chamar uma outra tabela do mesmo db com o login da primeira só nessa nem sempre vai ter informção muitas vezes elas vão estar faltando.

Então eu teria que apresentar a tabela X e complementar com a tabela Y, só que a Y nem sempre vai conter informação.

Eu estou colocando a Y dentro do mesmo loop que a X mais num esta dando certo.

alguém tem alguma idéia.

Link para o comentário
Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

  • 0
Deividy

Deividy

Postado
  • Autor
Postado

heheheheh imaginei isso aqui é a páguna inteira como estou tentando fazer

<% 
'cada estado novo coloca-se um variavel do estado e faz a verificação um em cada tela
bernardo = "Osasco" ' cidade
saopaulo = "São Paulo" ' estado

	Set conn = Server.CreateObject("ADODB.Connection")
	rs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../aguas/bancodados/agente.mdb")
	conn.Open rs 

    sql = "SELECT * FROM grupo WHERE estado= '" & saopaulo & "' and cidade= '" & bernardo & "'"
    Set consulta = Server.CreateObject("ADODB.Recordset")
    consulta.Open sql, conn, 3, 3
  
  if not consulta.EOF then
    existe = true
  	else
    existe = false
    	Response.Redirect "erro.asp?cod=1"
    	Response.End()
  	end if
  
  	estado = consulta("estado")
  	cidade = consulta("cidade")
  
	If consulta.EOF = "" then

	Response.Write("erro")
	Response.End()

	else


    %>
<html>
<head>
<title>::::: AGENTE AMBIENTAL :::::</title>
<!-- site criado por Deividy Ramires deividy_r_ramires@hotmail.com -->
<meta name="description" content="Agente Ambiental - Bem vindo ao mundo dos que fazem - Fornecemos kits pra ánalise de campo pra ong's, escolas, prefeituras,  estudantes, etc. ">
<meta name="keywords" content="Agente Ambiental, Meio Ambiente, Análises em campo, Kits para análise, preservação meio ambiente, projeto Agente Ambiental, analises via correio, Agente, Ambiente, Água, Ar, Solo, Alimento, Análise, Coleta, Teste, Kit, Análise de Água, Análise de Ar, Análise de Solo, Análise de Alimento, Terra, Verde, Preservação, Natureza, Oportunidade, Maleta, Maleta Agente Ambiental, Preservar meio Ambiente, agente ambiental, meio ambiente, análises em campo, kits para análise, preservação meio ambiente, projeto agente ambiental, analises via correio, agente, ambiente, água, ar, solo, alimento, análise, coleta, teste, kit, análise de água, análise de ar, análise de solo, análise de alimento, terra, verde, preservação, natureza, oportunidade, maleta, maleta agente ambiental, preservar meio ambiente">

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

<link href="../css/agenteamb.css" rel="stylesheet" type="text/css">
<style type="text/css">
.caixa_alta{
  text-transform: uppercase;
  font-family: Verdana, Arial, Helvetica, sans-serif;
  font-size: 8px;
}
</style>
</head>

<body topmargin="0" leftmargin="0">
<table width="761" border="0" cellspacing="0" cellpadding="0" height="25">
  <tr> 
    <td align="center" valign="middle" width="30" height="25" bgcolor="#99CC00"><img src="../img/clear.gif" width="30" height="15" border="0" vspace="0" hspace="0"></td>
    <td width="731" height="25" align="center" valign="middle" bgcolor="#0099FF" class="branco">Estado 
      <%= estado%> Cidade de <%= cidade%></td>
  </tr>
</table>
<table width="760" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td width="10" height="39" bgcolor="#0099FF">
<p>&nbsp;</p>
      <p><img src="../img/clear.gif" width="30" height="1"></p></td>
    <td width="750" align="center"><table width="100%" border="0">
        <tr> 
          <td align="center" class="titulobq"><br>
            Descri&ccedil;&atilde;o dos Munic&iacute;pios de <%= cidade%> no estado <%= estado%>.<br>
            Click em Gr&aacute;fico para ver os Detales das An&aacute;lises. <br>
            Click em Grupo para Ver que s&atilde;o os Integrantes. </td>
        </tr>
        <tr> 
          <td> <%
' função pra fazer os campos se duplicarem    
    	consulta.MoveFirst
	Do While not consulta.EOF

	estado = consulta("estado")
	cidade = consulta("cidade")
	login  = consulta("login")
	grupo  = consulta("grupo")
	ponto  = consulta("ponto")
  	
    
  if (cor = "#FFFFFF") then
  	cor = "#f2f2f2"
  else
  	cor = "#FFFFFF"
  end if
        
    %> 
            <!-- começa aqui a duplicar -->
            <table width="100%" border="0"  bgcolor="<%=cor%>">
              <tr> 
                <td width="26%" class="nomefrm">Ponto</td>
                <td width="25%" class="nomefrm">Grafico</td>
                <td width="26%" class="nomefrm">Grupo</td>
                <td width="23%" class="nomefrm">Data da Ultima Coleta</td>
              </tr>
              <tr> 
                <td class="dentrofrm"><%= ponto%></td>
                <td class="caixa_alta"><strong> 
                  <%Response.Write("<a href=" & "../aguas/grafponto.asp?" & "Gp=" & login & ">" & "Visualisar" & "</a>")%>
                  </strong> </td>
                <td class="caixa_alta"> <strong> 
                  <%
	Response.Write("<a href=" & "../aguas/grupo.asp?" & "grupo=" & login & ">" & "" & grupo &"" & "</a>")
       %>
                  </strong> </td>
                <td class="dentrofrm"><%' = Resposta%></td>
              </tr>
            </table></td>
          <!-- e termina aqui. -->
          <%

	consulta.MoveNext
	loop

	end if 


	%>
        </tr>
        <tr> 
          <td align="right">&nbsp; </td>
        </tr>
        <tr> 
          <td><%     
    	sql = "SELECT * FROM analise WHERE login= '" & login & "'"
      Set data = Server.CreateObject("ADODB.Recordset")
      data.Open sql, conn, 3, 3
        
      	
    
  	if not data.EOF then
    existe = true  
  	else
    existe = false
    	Response.Write("erro")
    	Response.End()

  	end if 
    	
      
      coleta = data("datacoleta")
      response.Write(coleta)
        Response.End()

  	
  	%></td>
        </tr>
        <tr> 
          <td align="right"><a href="javascript:self.history.go(-1)">Voltar</a></td>
        </tr>
        <tr>
          <td align="right">&nbsp;</td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html>

Link para o comentário
Compartilhar em outros sites
  • 0
pgmador

pgmador

Postado
Postado

Cara.. vou te dar a idéia de como resolver isso.

<%
rsX.open "SELECT * FROM X",conexao

Do while not RsUsuario.Eof
campoX=rsX("campo")

rsY.open "SELECT * FROM Y WHERE campoY='"&campoX&"'",conexao

'listar os campos que voce quer da tabela X
=rsX("campo1"), rsX("campo2")

'listar os campos que voce quer da tabela Y
if not rsY.EOF then
=rsY("campo1")
end if

rsX.moveNext
Loop
rsX.Close
%>

Veja se é isso.

[]'s

Pgmador

http://www.ondagospel.com.br

Link para o comentário
Compartilhar em outros sites
  • 0
Deividy

Deividy

Postado
  • Autor
Postado

Eu entendi só que eu tenho um problema.

Nem sempre na essa conexão

sql = "SELECT * FROM analise WHERE login= '" & login & "'"
     Set data = Server.CreateObject("ADODB.Recordset")
     data.Open sql, conn, 3, 3
       
      
   
  if not data.EOF then
   existe = true  
  else
   existe = false
    Response.Write("erro")
    Response.End()

  end if

que é a ultima da minha página vai conter todos que estão fazendo o loop.

entendi. Eu acho que esta complicado.

Vou tentar de novo.

Aprimeira parte onde esta o loop beleza. na hora de encontrar o que quero na segunda consulta que esta dificil por que famos supor que na primeira consulta achei 5 resultado. Eu teria que achar os 5 login na outra tambem só que eu tiria só 2 como eu faço pra ele iginoraar os outros 3.

Isso pra mim esta muito dificil.

Agora acho que dá pra entender

Link para o comentário
Compartilhar em outros sites

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.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...