rmmtins

Olá Estou fazendo um Select no banco para buscar um usuario, este usuario pode ter varias classificacoes (Codigo numerico). Exemplo, Tenho usuario 1 com as classificações 100, 80, 131 usuario 2 com as classificacoes 100, 80, 200 usuario 3 com as classificacoes 100, 90, 81 Quero fazer um select onde eu pegue todos os usuarios que exatamente as classificacoes 100 e 80, Como faço

Tenho um formulario com 3 linhas cada uma com 2 campos, são eles Produto e Quantidade. O campo produto e uma select com varios itens. Minha questão é a seguinte quando o usuario escolher o mesmo produto em mais de uma linha, as quantidades tem que se somar. Aqui é onde eu pego as variaveis do formulario e faço a gravação no banco. <% 'Busca as variáveis Qtd_Produto = split(request.Form("Qtd_Produto"),",") Cod_Produto = split(request.Form("Cod_produto"),",") St_Pedido = 1 Conta = ubound(Qtd_Produto) 'verifica se pelo menos uma linha tem registro a ser inserido For f = 0 to conta If trim(Cod_Produto(f)) <> "" and not isnull(Cod_Produto(f)) and trim(Qtd_Produto(f))<> "" and not isnull(Qtd_Produto(f)) then If cdbl(Qtd_Produto(f)) > 0 then InsereRegistro = "sim" End if End if Next If InsereRegistro = "sim" then ' So executa se tiver um registro a ser inserido 'Insere o registro de pedidos na tabela de pedidos SQLQuery = "INSERT into dbo.Tb_Out_Pedidos(Cod_Usuario, St_Pedido) values ("&session("cod_usuario")&", "&St_Pedido&")" Conn_Out.Execute(SQLQuery) 'Busca codigo do pedido inserido SQLQuery = "SELECT top 1 Cod_Pedido from dbo.Tb_Out_Pedidos order by Cod_Pedido desc" Set rs_buscacodigo = Conn_Out.Execute(SQLQuery) Cod_Pedido = rs_buscacodigo.fields("Cod_Pedido") 'Insere os produtos For f = 0 to conta If trim(Cod_Produto(f)) <>"" and not isnull(Cod_Produto(f)) and trim(Qtd_Produto(f))<>"" and not isnull(Qtd_Produto(f)) then If cdbl(Qtd_Produto(f)) > 0 then SQLQuery = "Insert into Tb_Out_Pedidos_Detalhes(Cod_Pedido,Cod_Produto,Qtd_Produto) values ("&Cod_Pedido&","&Cod_Produto(f)&","&Qtd_Produto(f)&")" Conn_Out.Execute(SQLQuery) End if End if Next 'Insere na tabela o registro da criação do pedido Desc_Andamento = "Pedido Criado" Cod_Usuario = session("Cod_Usuario") SQLQuery = "INSERT into Tb_Out_Pedido_Andamento(Cod_Usuario, Cod_Pedido, Desc_Andamento) values ("&Cod_Usuario&","&Cod_Pedido&",'"&Desc_Andamento&"')" Conn_Out.Execute(SQLQuery) %> Quem puder me ajudar desde já agradeço