Claudio Volles

Esse é bem simples, mas funciona R<%=Replace(Replace(Replace(Replace(FormatCurrency(RS_IMP_SUM("valor")), ",", "x"), ".", "b"), "b", ","), "x", ".")%>

A dica é criar 2 novos campos na tabela, ANO e mês e enviar os dados para uma tb_temp e re-alimentar a base. Assim você poderá tratar isso facilmente outra opção é cria uma VIEW ---------------------------------------------- create view SOMANDO_MES_ANO as select mês=datepart(month,emissao),ano=datepart(year,emissao),SUM(valor_da_verba) valor from tb_verbas group by emissao select mês,ano,SUM(valor) from SOMANDO_MES_ANO group by mês,ano -------------------------------------------

Obrigado Marcos, funcionou. CLaudio

OK, testei e funciona, só que não estou conseguido fazer ele funcionar da forma que preciso, pois a solicitação de deletar sai do FORM action="deletar.asp", o problema é que nessa página eu coloquei a SCRIPT e não está funcionando corretamente, pois eu tenho 1 destino do FORM e 2 destinos do IF. Claudio

O correto é você colocar o período da SOMA no where. select datas,SUM(vendas_R$) from TABELA Where mês=month(data_entered) and ano=year(data_entered) group by datas

Olá! Preciso pedir ao usuário que confirme que realmente ele quer deletar o registro X da tabela Y, já tentei com javascript e não tive sucesso. Grato! Claudio Volles

beleza Andréa, vou testa isso. Claudio Sua dica foi muito boa. O problema era que avariável estava recebendo o numero como texto e foi só mudar isso. Graças ao response.write "passou" BJS Claudio

Ai está Andréa <% i=1 for i=1 to 20 loop_valor_verba=Request.form("FORM_valor_verba"&(i)) 'por padrão esse valor quando ausente é 1 loop_cod_produto=Request.form("FORM_cod_produto"&(i)) loop_nom_produto=Request.form("FORM_nom_produto"&(i)) if i<=Count_Solicitacao then UPDATE_VERBAS_DML="update tb_verbas_deletar set Tipo_Verba='"&EDITANDO_TIPO_VERBA&"',Data_BI='"&EDITANDO_DT_BI_ANO&"-"&EDITANDO_DT_BI_MES&"-"&EDITANDO_DT_BI_DIA&"'," UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Data_Negociacao='"&EDITANDO_DT_NEG_ANO&"-"&EDITANDO_DT_NEG_MES&"-"&EDITANDO_DT_NEG_DIA&"'," UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Data_Competencia='"&EDITANDO_DT_COMP_ANO&"-"&EDITANDO_DT_COMP_MES&"-"&EDITANDO_DT_COMP_DIA&"'," UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Data_Vencimento='"&EDITANDO_DT_VENC_ANO&"-"&EDITANDO_DT_VENC_mes&"-"&EDITANDO_DT_VENC_DIA&"'," UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Data_Realizacao='"&EDITANDO_DT_REALIZ_ANO&"-"&EDITANDO_DT_REALIZ_MES&"-"&EDITANDO_DT_REALIZ_DIA&"'," UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Dia_BI="&EDITANDO_DT_REALIZ_DIA&",Mes_BI="&EDITANDO_DT_REALIZ_MES&",Ano_BI="&EDITANDO_DT_REALIZ_ANO&"," UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Num_Contrato="&EDITANDO_NUM_CONTRATO&",Valor_da_Verba=replace('"&loop_valor_verba&"',',','.'),Historico='"&EDITANDO_HSTORICO&"',Pedidos_Envolvidos='"&EDITANDO_PED_ENVOLV&"'," UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Produto='"&loop_nom_produto&"',Cod_Produto="&loop_cod_produto&",Forma_Pagamento='"&EDITANDO_PAGAMENTO&"',Centro_Custo='"&EDITANDO_CENTRO_CUSTO&"'," UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"usuario='"&USUARIO_LOGADO&"',atualizado_em=getdate() where solicitacao="&EDITANDO_SOLICITACAO&" and Cod_Produto="&loop_cod_produto set UPDATE_VERBAS = cn.Execute (UPDATE_VERBAS_DML) else if loop_valor_verba>1 then INSERT_VERBA_DML="insert tb_verbas_deletar select top 1 Solicitacao,Emissao,Cod_Cliente,Cod_Rep,Nome_Cliente,CNPJ,Tipo_Verba,Data_BI,Data_Negociacao,Data_Competencia, " INSERT_VERBA_DML=INSERT_VERBA_DML&"Data_Vencimento,Data_Realizacao,Dia_BI,Mes_BI,Ano_BI,Num_Contrato,Valor_da_Verba="&loop_valor_verba&",Historico,Pedidos_Envolvidos,Produto="&loop_nom_produto&"," INSERT_VERBA_DML=INSERT_VERBA_DML&"Cod_Produto="&loop_cod_produto&",Forma_Pagamento,Centro_Custo,Banco,Agencia,Conta,nro_raiz_cnpj,usuario,atualizado_em" INSERT_VERBA_DML=INSERT_VERBA_DML&" from tb_verbas_deletar" INSERT_VERBA_DML=INSERT_VERBA_DML&" where solicitacao="&EDITANDO_SOLICITACAO set INSERT_VERBA = cn.Execute (INSERT_VERBA_DML) end if end if next %>

Amigos, preciso novamente da ajuda de vocês. Eu tenho um formulário de inserção de metas por produtos. A pessoa pode atualizar os dados e nessa atualização também pode fazer novas inclusões, então eu fiz o seguinte: <% ‘Essa variável receberá o numero total de linhas que já foi inserida e que a pessoa quer editar: Ex: 5 set COUNT_SOLICITACAO= cn.Execute ("select count(solicitacao) as total_solicitacao from tb_verbas_deletar where solicitacao="&NUM_SOLICITACAO) for i=1 to 20 valor_verba=Request.form("FORM_valor_verba"&(i)) cod_produto=Request.form("FORM_cod_produto"&(i)) nom_produto=Request.form("FORM_nom_produto"&(i)) ‘ aquele valor “5” deixará apenas as 5 primeiras linhas serem atualizadas as demais deverão ser inseridas if 1<=Count_Solicitacao then ATUALIZA os VALORES e NOMES ‘esse está funcionando bem Else INSERT ‘esse não está funcionando no IF ELSE, mas o script de insert está ok. End if %> Está rodando sem problemas, mas não está fazendo o INSERT

Outro dia eu usei uma fonte de animais e precisei trabalhar a imagem. Tive que criar um objeto qualquer do lado da fonte e selecionei os dois e logo depois eu fiz uma fusão e pronto, consegui editar a fonte. Ante disso eu tentei converter em curva e não funcionou.

Funcionou, muito obrigado

Estou tentando somar uma variável dentro do FOR e não estou obtendo sucesso <% i=1 soma_total=0 for i=1 to 20 valor=REQUEST.FORM("valor"&(i)) soma_total=soma_total+valor %> <% next %> Total:<%=soma_total%> Foi só postar aqui que acabou funcionando. Obrigado!

você não precisa incrementar o i. tire essa linha= i = i + 1

Queiro fazer um select e retornar apenas os dados dos ultimos 10 minutos de uma seleção, ex: select data, pedido, cod_cliente,cliente from tb_pedidos where pedido=10 and data=data-2minutos

Funcionou, muito obrigado. CLaudio

Eu estou comparando duas variáveis e não estou conseguindo obter sucesso. 1) 'primeira variável set RS_VERBAS_INSERT = cn.Execute ('select top 1 cod_cliente from tb_verbas order by cod_cliente desc') variavel_1=RS_VERBAS_INSERT 2) 'segunda variável variavel_2=Request.form("FORM_COD_CLIENTE") 'antes de fazer o IF eu testei para ver se os dados da variável são retornados e funcionou. <%=variavel_1%> <%=variavel_2%> if variavel_1=variavel_2 then Response.write "Dados já inclusos, volte e crie outro!" else ' executa o que tiver abaixo end if %> O problema está na comparação das variáveis. Quando eu removo uma das variaveis eo coloco um número qualquer o IF funciona na boa, mas quando compara as 2 variáveis dá erro.

Obrigado, testei e funcionou!

beleza, MAS COMO TRABALHAR COM A FUNÇÃO ERROR OU ALGO PARECIDO? CLAUDIO

Estou fazendo um select no SQL que está funcionando blzinha, o problema é que se a pessoa não passar um parametro não aparece o erro e eu gostaria de tratar o erro. O mesmo problema está acontecendo com um INSERT de 10 linhas. Ex: O usuário preencha 5 linhas corretamente, e na sexta ele erro o formato do campo e essa linha não é inserida. Como retornar o erro para ele? ----------------------------------- PRE_FORM= "select top 1 COD_CLIENTE,COD_REPRESENTANTE,DES_REGIAO,NOM_CLIENTE,nro_raiz_cnpj,nro_cnpj,nom_representante, " PRE_FORM= PRE_FORM +"banco,agencia,numero_da_conta,des_regiao from Tb_Clientes_Ativos " PRE_FORM= PRE_FORM +" where cod_cliente="&var_Form_cod_cliente&" GROUP BY " PRE_FORM= PRE_FORM +"COD_CLIENTE,COD_REPRESENTANTE,DES_REGIAO,NOM_CLIENTE,nro_raiz_cnpj,nro_cnpj,nom_representante,banco,agencia,numero_da_conta,des_regiao" Set RS_PRE_FORM = cn.Execute(PRE_FORM) --------------------------

Olá Eu quero pegar o valor do ID, e não do VALUE, pois o valor do value eu peciso jogar num database, mas para isso eu preciso mudar o script abaixo. =================================================================== <script> function selectd() { for(var i=0;i<document.fmain.user.options.length;i++) { if (document.fmain.domain.options[i].value == document.fmain.user.options[document.fmain.user.selectedIndex].value) { document.fmain.domain.selectedIndex=i; } } } function selectu() { for(var i=0;i<document.fmain.domain.options.length;i++) { if (document.fmain.user.options[i].value == document.fmain.domain.options[document.fmain.domain.selectedIndex].value) { document.fmain.user.selectedIndex=i; } } } </script> <form action="/scripts/passwd" name="fmain"> <select size="10" name="domain" onChange="selectu();"> <option id="1" value="dapraia">beladapraia.com.br</option> <option id="2" value="joseA">A</option> <option id="3" value="joseB">B</option> <option id="4" value="joseC">C</option> <option id="5" value="joseD">D</option> <option id="6" value="joseE">E</option> <option id="7" value="a122706">122706</option> <option id="8" value="a122708">122708</option> <option id="9" value="a122709">122709</option> </select> <select size="10" name="user" onChange="selectd();"> <option id="1" value="dapraia">beladapraia.com.br</option> <option id="2" value="joseA">A</option> <option id="3" value="joseB">B</option> <option id="4" value="joseC">C</option> <option id="5" value="joseD">D</option> <option id="6" value="joseE">E</option> <option id="7" value="a122706">122706</option> <option id="8" value="a122708">122708</option> <option id="9" value="a122709">122709</option> </select> </form> Resolvido!!! Obrigado

Conheço esse, mas não soma AUTOMATICAMENTE, POIS PRECISA CLICAR EM SOMAR. <form name="calc"> <input type="Text" name="parcela1" value="0" size="12"> <br> <input type="Text" name="parcela2" value="0" size="12"> <br> <input type="Button" name="" value=" + " onclick="calcula('+')"> <input type="Button" name="" value=" - " onclick="calcula('-')"> <input type="Button" name="" value=" X " onclick="calcula('*')"> <input type="Button" name="" value=" / " onclick="calcula('/')"> <br> <input type="Text" name="resultado" value="0" size="12"> </form> <script> function calcula(operacao){ var parcela1 = document.calc.parcela1.value var parcela2 = document.calc.parcela2.value var result = eval(parcela1 + operacao + parcela2) document.calc.resultado.value = result } </script> Agradeço a todos, já consegui um script. CLaudio Volles <form name="calculo"> <label>N1</label> <input type="text" name="n1" size="2" value="0" onblur="calcular()"> <label>N2</label> <input type="text" name="n2" size="2" value="0" onblur="calcular()"> <label>N3</label> <input type="text" name="n3" size="2" value="0" onblur="calcular()"> <label>N4</label> <input type="text" name="n4" size="2" value="0" onblur="calcular()"><br><br> <label>A Média Final é:</label> <input type="text" name="md" disabled="true" size="4"> </form> <script type="text/javascript"> <!-- var p1, p2, p3, p4, media; function calcular(){ p1 = parseFloat(document.calculo.n1.value); p2 = parseFloat(document.calculo.n2.value); p3 = parseFloat(document.calculo.n3.value); p4 = parseFloat(document.calculo.n4.value); media = (p1 + p2 + p3 + p4) ; document.calculo.md.value = media; } //--> </script>

Eu estou usando Javascript que o pessoal me passou. Primeiro eu gravo o retorno em duas variável, e coloco no select, assim quando a pessoa selecionar o campo1 aparece logo do outro lado o complemento. ------------------- <script> function selectd() { for(var i=0;i<document.form.FORM_nom_produto1.options.length;i++) { if (document.form.FORM_cod_produto1.options.value == document.form.FORM_nom_produto1.options[document.form.FORM_nom_produto1.selectedIndex].value) { document.form.FORM_cod_produto1.selectedIndex=i; } } } function selectu() { for(var i=0;i<document.form.FORM_cod_produto1.options.length;i++) { if (document.form.FORM_nom_produto1.options.value == document.form.FORM_cod_produto1.options[document.form.FORM_cod_produto1.selectedIndex].value) { document.form.FORM_nom_produto1.selectedIndex=i; } } } </script> <form name="form" method="post" action=""> <select name="FORM_cod_produto1" size="1" id="FORM_cod_produto1" onChange="selectu();"> <%response.write produtos%> </select> </div></td> <td bgcolor="#FFFFFF" class="textos"><div align="center"> <select name="FORM_nom_produto1" size="1" id="FORM_nom_produto1" onChange="selectd();"> <%response.write produtos1%> </select> </form>

Quero que a pessoa insira o valor nos campos e já veja embaixo o resultado da soma(sem precisar clicar em somar) conforme ela for preenchendo os campos. Grato pela ajuda. CLaudio Volles

;) Era isso mesmo! Muito obrigado, valeu mesmo. Claudio Volles

:lol: DESCULPE A MINHA FALTA DE ATENÇÃO!!! você FOI EXATA, MUITO OBRIGADO!!! CLAUDIO VOLLES