Ir para conteúdo

POWERED BY:

Arquivado

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

securityBR

Problema com filtro

Recommended Posts

Bom dia...

 

Estou com outro problema galera, criei um filtro para somar a quantidade fabricada em um mes, segue o codigo:

dim meses
meses = Request.Form("meses")
'Criamos a consulta RecJan para soma do total fabricado em (Janeiro) 
set RecJan = conexao.Execute("SELECT Item, SUM(total) AS DtEntrega from TABELA where month(DtEntrega) = 01 group by Item = '"&meses&"' ")

 

Esta retornando o seguinte erro:

Microsoft JET Database Engine erro '80040e21'

 

Você tentou executar uma consulta que não inclui a expressão 'Item' especificada como parte de uma função agregada.

 

/sigma/inicio.asp, line 24

 

 

Estava funcionando certinho até eu aplicar o filtro vindo do formulário..

Aguardo a ajuda ae galera, mais uma vez obrigado...

Compartilhar este post


Link para o post
Compartilhar em outros sites

Por favor, se atente às regras do fórum antes de postar.

 

09ª Regra

É proibido a abertura de tópicos com título: "ME AJUDE", "PELO AMOR DE DEUS", "ESTOU DESESPERADO", "URGENTE", "SOCORRO!", "HELP!", ou qualquer coisa similar, assim como utilizar Caixa Alta (letras todas em maiúsculas) no titulo ou mesmo no corpo do tópico ou post. Utilize títulos curtos e claros, que condizem com sua dúvida. Os títulos, tópicos e posts serão editados e os membros advertidos por MP.

Remova o "= '"&meses&"' "" depois do GOURP BY...

 

Abraços..

Compartilhar este post


Link para o post
Compartilhar em outros sites

Por favor, se atente às regras do fórum antes de postar.

 

09ª Regra

É proibido a abertura de tópicos com título: "ME AJUDE", "PELO AMOR DE DEUS", "ESTOU DESESPERADO", "URGENTE", "SOCORRO!", "HELP!", ou qualquer coisa similar, assim como utilizar Caixa Alta (letras todas em maiúsculas) no titulo ou mesmo no corpo do tópico ou post. Utilize títulos curtos e claros, que condizem com sua dúvida. Os títulos, tópicos e posts serão editados e os membros advertidos por MP.

Remova o "= '"&meses&"' "" depois do GOURP BY...

 

Abraços..

 

 

Ok, prestarei atenção agora...

Mais se remover a o request da variavel = '"&meses&"' como vou puxar os dados do form ?

Compartilhar este post


Link para o post
Compartilhar em outros sites

O GROUP BY não precisa de nenhum outro parametro...

 

Se você qr q os dados sejam ORDENADOS por um determinado campo.. use o ORDER BY.. e não GROUP BY...

 

Abraços...

Compartilhar este post


Link para o post
Compartilhar em outros sites

O GROUP BY não precisa de nenhum outro parametro...

 

Se você qr q os dados sejam ORDENADOS por um determinado campo.. use o ORDER BY.. e não GROUP BY...

 

Abraços...

Entedi, mais retirei a variavel '"&meses&"' da consulta sql e troquei por order by...continua dando o mesmo erro..

Preciso filtrar um campo de formulario com essa consulta, segue o codigo da página:

 

<%

Set conexao = Server.CreateObject("ADODB.Connection")
conexao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("dados/dados.mdb")

'Menu de lista - Clientes
set menu_clientes = conexao.Execute("SELECT CÓD, Cliente from TABELA order by Cliente")

'Setamos a variavel RecSet para exibir os itens
set RecSet = conexao.Execute("Select Item From TABELA where CÓD =1")

'Setamos a variavel RecMix para exibir o total de itens cadastrados na tabela TABELA
set RecMix = conexao.Execute("SELECT DISTINCT COUNT(Item) AS Item from TABELA") dim meses
meses = Request.Form("meses")
'Criamos a consulta RecJan para soma do total fabricado em (Janeiro)
set RecJan = conexao.Execute("SELECT Item, SUM(total) AS DtEntrega from TABELA where month(DtEntrega) = 01 Order by Item")

'Criamos a consulta RecFev para exibição dos dados relativo ao mes de Fevereiro
set RecFev = conexao.Execute("SELECT SUM(total) AS DtEntrega from TABELA where month(DtEntrega) = 02 group by Item")

'Criamos a consulta RecMar para exibição dos dados relativo ao mes de Março
set RecMar = conexao.Execute("SELECT SUM(total) AS DtEntrega from TABELA where month(DtEntrega) = 03 group by Item")

'Criamos a consulta RecAbril para a exibição dos dados relativo ao mes de Abril
set RecAbril = conexao.Execute("SELECT SUM(total) AS DtEntrega From TABELA where month(DtEntrega) = 04 group by Item")

'Criamos a consulta RecMaio para a exibição dos dados relativo ao mes de Maio
set RecMaio = conexao.Execute("SELECT SUM(total) AS DtEntrega From TABELA where month(DtEntrega) = 05 group by Item")

'Criamos a consulta RecJun para a exibição dos dados relativo ao mes Junho
set RecJun = conexao.Execute("SELECT SUM(total) AS DtEntrega From TABELA where month(DtEntrega) = 06 group by Item")

'Criamo a consulta RecJul para a exibição dos dados relativo ao mes de Julho
set RecJul = conexao.Execute("SELECT SUM(total) AS DtEntrega From TABELA where month(DtEntrega) = 07 group by Item")
%>

 

 

<!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">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>::: :::</title>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-color: #FFFFFF;
}
.titulo_menor {
	font-family: Geneva, Arial, Helvetica, sans-serif;
	font-size: 11px;
}
.titulo {
	font-family: Geneva, Arial, Helvetica, sans-serif;
	font-size: 12px;
}
.style3 {font-family: Geneva, Arial, Helvetica, sans-serif; font-size: 11px; font-weight: bold; }
-->
</style></head>

<body>
<form method="GET" action="inicio.asp">
  <table width="1500" border="0" align="center" cellpadding="0" cellspacing="3" bgcolor="#FFFFFF">
	<tr>
	  <td width="729" height="16" rowspan="5" valign="top"><img src="imagens/banner.jpg" width="600" height="100" /></td>
	  <td colspan="3"><div align="center"><span class="titulo_menor"></span></div></td>
	</tr>
	<tr>
	  <td colspan="3"> </td>
	</tr>
	<tr>
	  <td width="95" bgcolor="#F2F2F2"> </td>
	  <td width="92" bgcolor="#F2F2F2"> </td>
	  <td width="74" bgcolor="#F2F2F2"> </td>
	</tr>
	<tr>
	  <td colspan="3"> </td>
	</tr>
	<tr>
	  <td colspan="3"> </td>
	</tr>
	<tr>
	  <td height="6" colspan="4"> </td>
	</tr>
	<tr>
	  <td height="7" colspan="4"><table width="1500" border="0" cellspacing="2" cellpadding="0">
		  <tr>
			<td width="46" bgcolor="#DDDDDD"><span class="style3">Cliente:</span></td>
			<td width="151" bgcolor="#F2F2F2"><label></label>
			  <label>
						<select name="menu_clientes" >
				<%
Do until menu_clientes.EOF
%>
				<option value="<% Response.Write menu_clientes("CÓD") %>">
				<% Response.Write menu_clientes("Cliente") %>
				</option>
				<%
	menu_clientes.MoveNext
loop
%>
			  </select>
			</label></td>
			<td width="132" bgcolor="#F2F2F2"> </td>
			<td width="52" bgcolor="#DDDDDD"><span class="style3">Células:</span></td>
			<td width="173" bgcolor="#F2F2F2"><label></label>
			  <label>
			  <select name="celulas" id="celulas">
			  </select>
			</label></td>
			<td width="94" bgcolor="#DDDDDD"><span class="style3">Mês atual: </span></td>
			<td width="278" bgcolor="#F2F2F2">
	
			  <select name="meses" id="meses">
				<option value="janeiro">Janeiro</option>
				<option value="fevereiro">Fevereiro</option>
				<option value="marco">Março</option>
				<option value="abril">Abril</option>
				<option value="maio">Maio</option>
				<option value="junho">Junho</option>
				<option value="julho">Julho</option>
				<option value="agosto">Agosto</option>
				<option value="setembro">Setembro</option>
				<option value="outubro">Outubro</option>
				<option value="novembo">Novembro</option>
				<option value="dezembro">Dezembro</option>
			  </select>
			  <input type="submit" name="Submit" value="Buscar" />
			  </label>			 </td>
			<td width="63" bgcolor="#DDDDDD"> </td>
			<td width="187" bgcolor="#DDDDDD"><div align="center" class="style3">Mês atual </div></td>
			<td width="157" bgcolor="#DDDDDD"><div align="center" class="style3">90 D </div></td>
			<td width="137" bgcolor="#DDDDDD"><div align="center" class="style3">180D</div></td>
		  </tr>
		  <tr>
			<td bgcolor="#DDDDDD"><span class="style3">Planta:</span></td>
			<td bgcolor="#F2F2F2"><label>
			  <select name="planta" id="planta">
			  </select>
			</label></td>
			<td bgcolor="#F2F2F2"> </td>
			<td bgcolor="#DDDDDD"> </td>
			<td bgcolor="#F2F2F2"> </td>
			<td bgcolor="#DDDDDD"><span class="style3">Mix de Produtos: </span></td>
			<td bgcolor="#F2F2F2" class="titulo"><%=RecMix("Item")%></td>
			<td bgcolor="#DDDDDD"><span class="style3">Demanda:</span></td>
			<td bgcolor="#F2F2F2"><div align="center" class="titulo_menor">ASP</div></td>
			<td bgcolor="#F2F2F2"><div align="center" class="titulo_menor">ASP</div></td>
			<td bgcolor="#F2F2F2"><div align="center" class="titulo_menor">ASP</div></td>
		  </tr>
		  <tr>
			<td bgcolor="#DDDDDD"><span class="style3">Fonte:</span></td>
			<td bgcolor="#F2F2F2" class="titulo">EDI</td>
			<td bgcolor="#F2F2F2"> </td>
			<td bgcolor="#DDDDDD"> </td>
			<td bgcolor="#F2F2F2"> </td>
			<td bgcolor="#DDDDDD"> </td>
			<td bgcolor="#F2F2F2"> </td>
			<td bgcolor="#DDDDDD"><span class="style3">Variações:</span></td>
			<td bgcolor="#F2F2F2"><div align="center" class="titulo_menor">ASP</div></td>
			<td bgcolor="#F2F2F2"><div align="center" class="titulo_menor">ASP</div></td>
			<td bgcolor="#F2F2F2"><div align="center" class="titulo_menor">ASP</div></td>
		  </tr>
		</table>
		  <table width="1500" border="0" cellspacing="2" cellpadding="0">
			<tr>
			  <td colspan="5"> </td>
			</tr>
			<tr>
			  <td bgcolor="#F2F2F2" class="titulo_menor"><div align="center"></div></td>
			  <td bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Demanda</strong></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"> </td>
			  <td width="329" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Analise das variações </strong></div></td>
			  <td width="143" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Curva</strong></div></td>
			</tr>
			<tr>
			  <td width="212" bgcolor="#F2F2F2" class="titulo_menor"><div align="center"></div></td>
			  <td width="586" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Próximos 6 meses</strong></div></td>
			  <td width="212" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Consolidação</strong></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"> </td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"> </td>
			</tr>
			<tr>
			  <td colspan="5"> </td>
			</tr>
		  </table>
		

		  <%
		  Do until RecSet.EOF
		  %>
		  
		  
		<table width="1500" border="0" cellspacing="2" cellpadding="0">
			<tr>
			  <td width="105" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Item</strong></div></td>
			  <td width="103" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Janeiro</strong></div></td>
			  <td width="93" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Fevereiro</strong></div></td>
			  <td width="91" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Março </strong></div></td>
			  <td width="94" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Abril </strong></div></td>
			  <td width="99" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Maio</strong></div></td>
			  <td width="97" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Junho</strong></div></td>
			  <td width="98" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Julho</strong></div></td>
			  <td width="105" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>90D</strong></div></td>
			  <td width="106" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>180D</strong></div></td>
			  <td width="101" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Mês atual x 90D </strong></div></td>
			  <td width="118" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>Mês atual x 180D </strong></div></td>
			  <td width="103" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"><strong>90D x 180D </strong></div></td>
			  <td width="142" bgcolor="#DDDDDD" class="titulo_menor"><div align="center"></div></td>
			</tr>
			<tr>
			  <td bgcolor="#D7F4EB" class="titulo_menor"><div align="center"><%=RecSet("item")%></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"><div align="center"><%=RecJan("DtEntrega")%></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"><div align="center"><%=RecFev("DtEntrega")%></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"><div align="center"><%=RecMar("DtEntrega")%></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"><div align="center"><%=RecAbril("DtEntrega")%></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"><div align="center"><%=RecMaio("DtEntrega")%></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"><div align="center"><%=RecJun("DtEntrega")%></div></td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"><div align="center"><%=RecJul("DtEntrega")%></div></td>
			  <td bgcolor="#D7F4EB" class="titulo_menor"><div align="center"></div></td>
			  <td bgcolor="#D7F4EB" class="titulo_menor"> </td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"> </td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"> </td>
			  <td bgcolor="#F2F2F2" class="titulo_menor"> </td>
			  <td bgcolor="#D7F4EB" class="titulo_menor"> </td>
			</tr>
		</table>
		
		   <% RecSet.MoveNext
					   loop
					   %>
	  </td>
	</tr>

		
	<tr> </tr>
  </table>
</form>

</body>
</html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Data = CDate(Seu campo)

 

Query = "SELECT Item, SUM(Total) AS TotalPorMes FROM Tabela WHERE MONTH(Data) = "& Month(Data) &" AND YEAR(Data) = "& Year(Data) &" GROUP BY Item"

Compartilhar este post


Link para o post
Compartilhar em outros sites

Data = CDate(Seu campo)

Query = "SELECT Item, SUM(Total) AS TotalPorMes FROM Tabela WHERE MONTH(Data) = "& Month(Data) &" AND YEAR(Data) = "& Year(Data) &" GROUP BY Item"

 

 

Obrigado pela ajuda ae cara, mais ainda esta dando erro:

 

Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A000D)

Tipos incompatíveis

/sigma/inicio.asp, line 29

 

ta dando pau na cuca já ....

Compartilhar este post


Link para o post
Compartilhar em outros sites

Data = CDate(Seu campo)

Query = "SELECT Item, SUM(Total) AS TotalPorMes FROM Tabela WHERE MONTH(Data) = "& Month(Data) &" AND YEAR(Data) = "& Year(Data) &" GROUP BY Item"

 

 

Obrigado pela ajuda ae cara, mais ainda esta dando erro:

 

Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A000D)

Tipos incompatíveis

/sigma/inicio.asp, line 29

 

ta dando pau na cuca já ....

 

 

 

 

ae pessoal, se eu deixar o codigo assim:

 

set RecJan = conexao.Execute("SELECT Item, SUM(total) AS DtEntrega from TABELA where month(DtEntrega) = 01 group by Item")

 

da certo, ele exibe a soma da produção pelo mes de janeiro, só que o valor fica ná pagina eu quero que nao apareça nada, só apos eu clicar no botao buscar pra aparecer sacou ?

 

nao estou sabendo onde declarar e colocar a variavel que vem do formulário...

Compartilhar este post


Link para o post
Compartilhar em outros sites

use date e nao data no valor mantenha apenas no nome do campo

Compartilhar este post


Link para o post
Compartilhar em outros sites

use date e nao data no valor mantenha apenas no nome do campo

 

 

beleza Mario ?

entao cara meu codigo parece estar funcionando certinho mais quando seleciono o mes de janeiro no menu de lista e clico em filtrar ele nao filtra,quando eu carrego a página o valor é carregado junto com a página, eu quero filtrar o valor que seleciono no menu/list...

 

Obrigado ae...aguardo

Compartilhar este post


Link para o post
Compartilhar em outros sites

use date e nao data no valor mantenha apenas no nome do campo

 

 

beleza Mario ?

entao cara meu codigo parece estar funcionando certinho mais quando seleciono o mes de janeiro no menu de lista e clico em filtrar ele nao filtra,quando eu carrego a página o valor é carregado junto com a página, eu quero filtrar o valor que seleciono no menu/list...

 

 

 

Se alguem estiver disposto a dar uma força mesmo ae eu envio os arquivo por email, assim da pra entender melhor o funcionamento dos sistema, parece nao ser muito dificil ele é feitio só a base de filtros o probblema é que nao tenho muita experiencia e preciso entregar essa bomba daqui 20 dias na empresa onde eu faço estágio...

 

Estou aqui pra aprender e ensinar tambem...Obrigado a todos ae quem tem ajudado...aguardo

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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