Wilder

Resolvido,, Obrigado ...

Pessoal.. minha duvida é a seguinte: Desejo listar os diversos registros do banco de dados. Quando mudar a data que esta em uma coluna apareça uma linha separando. Exemplo: registro01 12/12/1212 registro02 12/12/1212 registro03 12/12/1212 --------------------------- registro04 13/12/1212 registro05 13/12/1212 ---------------------------- registro06 14/12/1212 Agradeço a ajuda.

Eu so iniciante,, não sei fazer isso que você disse..rsrsr pode me ajudar por favor? Obrigado

O que eu fiz abaixo resolveu em partes. exemplo: setei a data 15/10/2009 em 18 vezes: ele da esse resultado: 15 10 2009 15 11 2009 15 12 2009 15 1 2010 15 2 2010 15 3 2010 15 4 2010 15 5 2010 15 6 2010 15 7 2010 15 8 2010 15 9 2010 15 10 2010 15 11 2010 15 12 2010 15 13 2010 15 14 2010 15 15 2010 Segue o codigo: if (request.form("valor")<>"" ) then n_vezes = request.form("n_vezes") for i=0 to n_vezes -1 data = request.form("data_saida") data = DatePart("m", data) & "/" & DatePart("d", data) & "/" & DatePart("yyyy", data) data = cdate(data) mes = DatePart("m", data)+(i) ano = DatePart("yyyy", data) if (mes>12) then mes=mes-12 ano=ano+1 end if sql="insert into saidas (valor,data_saida,forma_pagamento,nome_conta,tipo_despesa,nome_sub_centro_cust,nome_centro_cust,nome_centro_resp,n_documento,destino,detalhes,quitada) values ('"& request.form("valor")&"','"& mes & "/" & DatePart("d", data) & "/" & ano &"','"& request.form("forma_pagamento")&"','"& request.form("nome_conta")&"','"& request.form("tipo_despesa")&"','"& request.form("nome_sub_centro_cust")&"','"& request.form("nome_centro_cust")&"','"& request.form("nome_centro_resp")&"','"& (i+1) &"/" & n_vezes &"','"& request.form("destino")&"','"& request.form("detalhes")&"','"& request.form("quitada") &"')" conexao.execute(sql) next conexao.Close MM_editRedirectUrl = "confirmacao_saidas.asp" Response.Redirect(MM_editRedirectUrl) End if

você ta certo Rafael veja: coloquei a data: 15/10/2009 e mandei rodar em 15 vezes olha o resultado: 10/15/2009 11/15/2009 12/15/2009 13/15/2009 14/15/2009 15/15/2009 16/15/2009 17/15/2009 18/15/2009 19/15/2009 20/15/2009 21/15/2009 22/15/2009 23/15/2009 24/15/2009 como aceto isso dentro daquele codigo? valeu

Rafael, eu usei do jeito que você falou e também assim: if (request.form("valor")<>"" ) then n_vezes = request.form("n_vezes") for i=0 to n_vezes -1 data = request.form("data_saida") if (DatePart("m", data)>12) then DatePart("m", data)=DatePart("m", data)-12 DatePart("yyyy", data)=DatePart("yyyy", data)+1 end if sql="insert into saidas (valor,data_saida,forma_pagamento,nome_conta,tipo_despesa,nome_sub_centro_cust,nome_centro_cust,nome_centro_resp,n_documento,destino,detalhes,quitada) values ('"& request.form("valor")&"','"& DatePart("m", data)+(i) & "/" & DatePart("d", data) & "/" & DatePart("yyyy", data) &"','"& request.form("forma_pagamento")&"','"& request.form("nome_conta")&"','"& request.form("tipo_despesa")&"','"& request.form("nome_sub_centro_cust")&"','"& request.form("nome_centro_cust")&"','"& request.form("nome_centro_resp")&"','"& (i+1) &"/" & n_vezes &"','"& request.form("destino")&"','"& request.form("detalhes")&"','"& request.form("quitada") &"')" conexao.execute(sql) next conexao.Close MM_editRedirectUrl = "confirmacao_saidas.asp" Response.Redirect(MM_editRedirectUrl) End if E não deu dos dois jeitos, continua entrando no banco apenas ate o mes 12 do mesmo ano e da esse erro: Microsoft OLE DB Provider for ODBC Drivers erro '80040e07' [Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério. /GESFINBac/inserir_saidas_parc.asp, line 38 a linha 38 é: conexao.execute(sql) Obrigado

Amigo, como uso isso dentro do codigo que postei acima? Obrigado

Segue o erro: Microsoft OLE DB Provider for ODBC Drivers erro '80040e07' [Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério. Sempre que o mes é superior a 12 ele da esse erro. e não sei como faço também para que o ano, nesse caso, mude junto com o mes. Obrigado

Pessoal, Estou com duvida para inserir multiplos registros de uma vez no banco de dados. Quando um campo for DATA como faço para o loop ir aumentando o mes e se virar o ano ele virar o ano também? exemplo: quero cadastrar 24 parcelas de x reais apartir do mes 3 eu consigo inserir ate o mes 12 normalmente, se virar o ano da erro. Segue o codigo: if (request.form("valor")<>"" ) then n_vezes = request.form("n_vezes") for i=0 to n_vezes -1 data = request.form("data_saida") sql="insert into saidas (valor,data_saida,forma_pagamento,nome_conta,tipo_despesa,nome_sub_centro_cust,n ome_centro_cust,nome_centro_resp,n_documento,destino,detalhes,quitada) values ('"& request.form("valor")&"','"& DatePart("m", data)+(i) & "/" & DatePart("d", data) & "/" & DatePart("yyyy", data) &"','"& request.form("forma_pagamento")&"','"& request.form("nome_conta")&"','"& request.form("tipo_despesa")&"','"& request.form("nome_sub_centro_cust")&"','"& request.form("nome_centro_cust")&"','"& request.form("nome_centro_resp")&"','"& (i+1) &"/" & n_vezes &"','"& request.form("destino")&"','"& request.form("detalhes")&"','"& request.form("quitada") &"')" conexao.execute(sql) next conexao.Close MM_editRedirectUrl = "confirmacao_saidas.asp" Response.Redirect(MM_editRedirectUrl) End if Obrigadoo

Esse codigo que me passou trabalha com tabelas diferentes, daria certo com registro da mesma tabela? Obrigado

Pessoal, preciso de um help, sou iniciante em asp. Preciso montar um campo List/Menu dinamicamente de acordo com um banco de dados acess. E quando eu escolher alguma opção nesse campo que foi carregado outros dois campos (input) possa receber valores desse registro. Exemplo: No banco de dados esta assim: cod_op opção valor1 valor 2 1 OP1 2 5 2 OP2 12 15 A list/menu carregou com os valores: OP1 - OP2 - OP3 quando eu escolher OP1, o campo InputX recebe 2 e o campo InputY recebe 5 Se escolher OP2 , o campo InputX recebe 12 e o campo InputY recebe 15.. E dai para frente. alguém pode me ajudar por favor? Obrigado

Ei amigo, bom dia.. consegui assim: input_cont_destino=0 function addInput_destino() { if(navigator.appName == "Microsoft Internet Explorer"){ classe="className='campos_form04'" } else { classe="class='campos_form04'" } //vip corretor mr analise document.all['add_input_destino'].innerHTML+="<select name='destino"+input_cont_destino+"' id='destino"+input_cont_destino+"' "+classe+"><o"+"ption>Selecione</option><option value='Vipimovel'>Vipimóvel</option><option value='Corretor'>Corretor</option><option value='Gerente'>Gerente</option><option value='MRV'>MRV</option><op"+"tion value='Analise'>Análise</option></select>" input_cont_destino++; } Só não funciona o class, sabe me dier porq? valeu

Romerito, não estou conseguindo. Veja meu codigo: &lt;script language="javascript"> // - Funcao para somar a quantidade de loop's- Inicio - // var num = 0; function soma(sinal){ if (sinal == "+") num++; else if (sinal == "-" && num>1) num--; document.form1.n_vezes.value = num; var obj = document.getElementById("num"); obj.innerHTML = num; document.getElementById("n_vezes").value = num; } // - Funcao para somar a quantidade de loop's- Inicio - // // - Funcao para inserir input's- Inicio - // var input_cont = 0; function addInput_valor() { var input = document.createElement('input'); input.setAttribute('type', 'text'); input.setAttribute('name', 'valor'+input_cont); input.setAttribute('id', 'valor'+input_cont); input.setAttribute('value', ''); input.setAttribute("class", "campos_form04"); input.setAttribute("className", "campos_form04"); // para o IE var add_input_div = document.getElementById('add_input_div'); add_input_div.appendChild(input); input_cont++; } var input_cont_data_saida = 0; function addInput_data_saida() { var input_data_saida = document.createElement('input'); input_data_saida.setAttribute('type', 'text'); input_data_saida.setAttribute('name', 'data'+input_cont_data_saida); input_data_saida.setAttribute('id', 'data'+input_cont_data_saida); input_data_saida.setAttribute('value', '<%=Day(Date()) & "/" & Month(Date()) & "/" & Year(Date())%>'); input_data_saida.setAttribute("class", "campos_form03"); input_data_saida.setAttribute("className", "campos_form03"); // para o IE var add_input_div_data_saida = document.getElementById('add_input_data_saida'); add_input_div_data_saida.appendChild(input_data_saida); input_cont_data_saida++; } var input_cont_n_documento = 0; function addInput_n_documento() { var input_n_documento = document.createElement('input'); input_n_documento.setAttribute('type', 'text'); input_n_documento.setAttribute('name', 'n_documento'+input_cont_n_documento); input_n_documento.setAttribute('id', 'n_documento'+input_cont_n_documento); input_n_documento.setAttribute('value', ''); input_n_documento.setAttribute("class", "campos_form04"); input_n_documento.setAttribute("className", "campos_form04"); // para o IE var add_input_div_n_documento = document.getElementById('add_input_n_documento'); add_input_div_n_documento.appendChild(input_n_documento); input_cont_n_documento++; } var input_cont_quitada = 0; function addInput_quitada() { var input_quitada = document.createElement('input'); input_quitada.setAttribute('type', 'checkbox'); input_quitada.setAttribute('name', 'quitada'+input_cont_quitada); input_quitada.setAttribute('id', 'quitada'+input_cont_quitada); input_quitada.setAttribute('value', 'Sim'); var add_input_div_quitada = document.getElementById('add_input_quitada'); add_input_div_quitada.appendChild(input_quitada); input_cont_quitada++; } var input_cont_destino = 0; function addInput_destino() { var input_destino = document.createElement('input'); input_destino.setAttribute('type', 'text'); input_destino.setAttribute('name', 'destino'+input_cont_destino); input_destino.setAttribute('id', 'destino'+input_cont_destino); input_destino.setAttribute('value', ''); input_destino.setAttribute("class", "campos_form04"); input_destino.setAttribute("className", "campos_form04"); // para o IE var add_input_div_destino = document.getElementById('add_input_destino'); add_input_div_destino.appendChild(input_destino); input_cont_destino++; } Segue o div: <table width="498" height="43" border="0" cellspacing="0" cellpadding="0"> <tr> <td width="90" align="center" class="style2">N. Documento</td> <td width="65" align="center" class="style2">Data saida:</td> <td width="90" align="center" class="style2">Valor:</td> <td width="90" align="center" class="style2">Destino</td> <td width="30" align="center" class="style2"> Pg</td> <td width="155" align="center" class="style2"><span id="num"></span></span><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> <tr> <td width="90" height="24" align="center" valign="top"><div class="campos_form04" id="add_input_n_documento"></div></td> <td height="24" align="center" valign="top"><div class="campos_form03" id="add_input_data_saida"></div></td> <td width="90" height="24" align="center" valign="top"><div class="campos_form04" id="add_input_div"></div></td> <td width="90" height="15" align="center" valign="top"><div class="campos_form04" id="add_input_destino"></div></td> <td width="30" height="15" align="center" valign="top"><div class="campos_form" id="add_input_quitada"></div></td> <td width="155" align="center" valign="top"><label> <input type="button" class="campos_form" onClick="soma('+');addInput_valor();addInput_data_saida();addInput_n_documento();addInput_quitada();addInput_destino();criaSelect()" value=" + " /> <input type="hidden" name="n_vezes" id="n_vezes" /> </label></td> </tr> </table> O campo destino esta sendo um input, não consigo gerar ele como select varias vezes de acordo com o restante. Se não der para entender me retorne que tento colocar na web para você acessar. Obrigado

Ok amigo, consegui fazer o q eu queria.. muito obrigado. Fiz assim? <script type="text/javascript"> function Calcula() { valor_a = parseFloat(document.formulario1.valor_unidade.value) valor_b = parseInt(valor_a*3/100) valor_c = valor_b*40/100 //Mostra apenas duas casas decimais do campo C valor_c = parseInt(valor_c*100)/100 valor_e = valor_b*8/100 //Mostra apenas duas casas decimais do campo E valor_e = parseInt(valor_e*100)/100 valor_f = valor_b*52/100 //Mostra apenas duas casas decimais do campo F valor_f = parseInt(valor_f*100)/100 valor_d = valor_a*0.4/100 //Mostra apenas duas casas decimais do campo D valor_d = parseInt(valor_d*100)/100 if (valor_d>650) { valor_d = 650 } document.formulario1.valor_assessoria.value = valor_b document.formulario1.comissao_corretor.value = valor_c document.formulario1.valor_analise.value = valor_d document.formulario1.comissao_gerente.value = valor_e document.formulario1.comissao_vip.value = valor_f } function MM_callJS(jsStr) { //v2.0 return eval(jsStr) } </script> <form id="formulario1" name="formulario1" method="post" action=""> <p><br /> </p> <table width="200" border="0" cellspacing="0" cellpadding="0"> <tr> <td><table width="628" border="0" cellspacing="0" cellpadding="0"> <tr> <td colspan="3" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> <tr> <td width="1" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> <td width="518"><table width="100%" border="0" cellspacing="4" cellpadding="0"> <tr> <td width="200" align="right"><span class="style2">Valor Unidade:</span></td> <td width="286">R$ <input name="valor_unidade" type="text" onchange="MM_callJS('Calcula()')" id="valor_unidade" /></td> </tr> </table> <table width="100%" border="0" cellspacing="4" cellpadding="0"> <tr> <td width="200" align="right"><span class="style2">Valor Assessoria:</span></td> <td width="286">R$ <input name="valor_assessoria" type="text" id="valor_assessoria" /> (3%)</td> </tr> </table> <table width="100%" border="0" cellspacing="4" cellpadding="0"> <tr> <td width="200" align="right"> </td> <td width="286"> </td> </tr> </table></td> <td width="81" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> <tr> <td colspan="3" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> </table> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="9" align="right"><img src="icon/linhasbancas.gif" width="1" height="1" /></td> </tr> </table> <table width="520" border="0" cellspacing="0" cellpadding="0"> <tr> <td colspan="3" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> <tr> <td width="1" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> <td><table width="100%" border="0" cellspacing="4" cellpadding="0"> <tr> <td width="208" align="right"><span class="style2">Comissão corretor:</span></td> <td width="371">R$ <input name="comissao_corretor" type="text" id="comissao_corretor" /> (40% da assessoria)</td> </tr> </table> <table width="100%" border="0" cellspacing="4" cellpadding="0"> <tr> <td width="208" align="right"><span class="style2">Comissão Gerente:</span></td> <td width="389">R$ <input name="comissao_gerente" type="text" id="comissao_gerente" /> (8% da assessoria)</td> </tr> </table> <table width="100%" border="0" cellspacing="4" cellpadding="0"> <tr> <td width="208" align="right"><span class="style2">Comissão empresa:</span></td> <td width="394">R$ <input name="comissao_vip" type="text" id="comissao_vip" /> (52% da assessoria)</td> </tr> </table></td> <td width="1" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> <tr> <td colspan="3" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> </table> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="9" align="right"><img src="icon/linhasbancas.gif" width="1" height="1" /></td> </tr> </table> <table width="520" border="0" cellspacing="0" cellpadding="0"> <tr> <td colspan="3" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> <tr> <td width="1" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> <td><table width="100%" border="0" cellspacing="4" cellpadding="0"> <tr> <td width="200" align="right"><span class="style2">Valor Análise:</span></td> <td width="288"><label> R$ <input name="valor_analise" type="text" id="valor_analise" /> (0,4% da unidade)</label></td> </tr> </table></td> <td width="1" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> <tr> <td colspan="3" background="icon/linhas.gif"><img src="icon/linhas.gif" width="1" height="1" /></td> </tr> </table> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="2" align="right"><img src="icon/linhasbancas.gif" width="1" height="1" /></td> </tr> </table></td> </tr> </table> <p> </p> </form> Obrigado mesmo. Amigo to precisando agora criar um selct dinamicamente com o javascript. Consegui criar um unput, so que não consigo usar o mesmo caminho para o select. Segue o input: function addInput_valor() { var input = document.createElement('input'); input.setAttribute('type', 'text'); input.setAttribute('name', 'valor'+input_cont); input.setAttribute('id', 'valor'+input_cont); input.setAttribute('value', ''); input.setAttribute("class", "campos_form04"); input.setAttribute("className", "campos_form04"); // para o IE var add_input_div = document.getElementById('add_input_div'); add_input_div.appendChild(input); input_cont++; }[/codebox] Preciso que o select criado seja assim: [codebox] <select name="Destino" id="Destino"> <option>Selecione...</option> <option value="Vip">Vip</option> <option value="Corretor">Corretor</option> <option value="MR">MR</option> <option value="Analise">Analise</option> </select> Obrigado

Pessoal, preciso somar alguns campos dentro de um formulario. Seguinte: Enserir um valor (Reais) no campo A (exemplo 107.141,00) Preciso que o campo B calcule na mesma hora 3% desse valor que o usuário inserir sem os centavos (exemplo 3.214,00) O campo C calcule 1,4% desse valor (de A também sem os centavos - q sempre apareça xxxx,00)... E o campo D calcule 0,4% do valor inserido no campo A sendo que se for acima de 650,00, ele apareça 650,00 Me ajudem por favor. Obrigado