Notax

Oi Andreia... mais uma vez muito obrigado pelo retorno... então.. entendi sua sugestão da seguinte forma: Response.Write("<script language=javascript type=text/javascript>") Response.Write("_blanck.href = http://www.revistaria.com/"& request.form ("usuario")) Response.Write("</script>") só que não funcionou... eu tentei colocar isto no lugar de response.redirect... só que daí o quadro(frame) em que se encontra a página ficou todo branco, ou seja, não abriu o endereço correto nem no local correto... será que fiz alguma coisa errada? Só que assim, eu posso usar dois tipos de linguagem no mesmo script? porque. o script em questão está todo em vbscript, daí eu coloquei só esse trechinho acima em java... não tem problema? será que não é esse o motivo de não funcionar? grato.

:) gente... ajuda eu aí! olha só... acho que já fiz algum avanço... mas ainda não ta funcionadno... o código abaixo, apesar de não indicar erro nenhum, fica trancado... e não adiciona registro nenhum no banco... não to sabendo fazer esse for...next direito! :( será que alguém pode dar essa forcinha?

pessoal, então... consegui fazer o redirecionamento... mas abrir em nova janela (que eu achava que era mais simples) não estou conseguindo... o redirecionamento ficou: response.redirect "http://www.revistaria.com/"& request.form ("usuario") no botao de submit tentei colocar um <target = (_blanck)> tentei tb com <target = (_new)> que pelo que eu li funcionaria tb! mas não rolou... tentei colocar esta target tb no botao de submit, do formulario que é preenchido antes do script que usa o redirect acima... mas tb não rolou! alguém pode me dar essa força?

Boa tarde, Tenho um cadastro de usuario e senha em meu site, no entanto, quando o usuário digita nome e senha correta gostaria que ele fosse encaminhado para o endereço: http://www.meudominio.com/usuario_que_logou além disto gostaria que esta página abrisse em uma nova janela... poderiam me ajudar a contruir essa expressão: hoje está assim: Session("login") = True response.redirect "http://www.meudominio.com/" Abração Notax

tava pensando em derepente usar um For Next do tipo: Data Inicia = txtData Data Final = txtData * txtQuantidade o que acham? pode ser alguma coisa parecida a isto? podem me ajudar a fazer este comando de forma a incluir todas parcelas no banco?

Amigos boa tarde... e me desculpem pelo incomodo... a duras penas estou aprendendo... mas confesso que ta bem dificil... pensei bastante e me dei conta que a questão da repercussão de datas não precisa ser aborada em javascript, já que já tenho boa parte do código pronto em vbscript e este é o responsavel por fazer propriamente a inserção no banco... o form, continuará em java, visto que ficou maravilhosamente ótimo com a ajuda da andréia! então, por isso criei um novo post: http://scriptbrasil.com.br/forum/index.php?showtopic=106825 que está tratando do mesmo assunto, só que em vbscript e lá no fórum de asp! Apreciaria muito se pudessem continuar me ajudando... visto que entendo que neste novo post as coisas estão mais claras, até por que já havia aprendido muito com todos vocês que me ajudaram por aqui! um forte abraço a todos e muito obrigado pela enorme paciencia e pela imensa quantidade de colaborações, em especial a Andréia, que vem tendo uma paciencia enorme comigo e me dando a moior força! Notax

Boa tarde... o que eu quero é fazer lançamentos financeiros em bd access atraves de formulario asp... Só que estou criando algumas regras para facilitar estes lançamentos... do tipo: tenho um carne de pagto. com 48 parcelas de valor 0,00 vencendo todos os dias 01 até o final... então pensei em criar um campo de qtde de parcelas e ainda uns radio buttons dizendo se é pra repetir semanalmente, mensalmente, semestralmente ou anualmente... Desta forma com apenas um lançamento e colocando-se a data inicial o numero de parcelas e a condição de repetição teria automaticamente os 48 registros lançados em suas datas específicas... a quantidade de parcelas é preenchida pelo usuário em um capo texto chamado txtQuantidade... Será que alguém pode me dar uma força? Grato Notax

Ah bão... realmente... nesse caso, pode estar aparecendo de outra forma no script do formulário que utliza este outro script acima para inclusão no banco, certo? Daí neste caso, no formulário deverá haver um script parecido com FormatDate Time(Data[,Formato_do_Nome]) é isso? no caso o formato_do_nome seria = vbshortdate e Data o nome do campo...

esaqueci de colocar no post acima o código completo em vb que tenho funcionando nos formularios do access... o código abaixo refere-se apenas a repercussão mensal... mas das outras eu tb já tenho pronto... só não sei passar pra javascript :( Private Sub IncrementaData() Dim vData As Date Dim vLimite As Integer 'REPERCUSSÃO MENSAL If Me.qdrRepercussao = 2 Then 'verificar se o dia digitado para a data é maior do que 30... 'se é maior do que trinta, verificar o mês para saber se o mês da próxima parcela pode apresentar dia 31 'verificar se o dia digitado para a data é maior que 28 e o mês é maior que janeiro If Day(Me.txtData) > 28 And Month(Me.txtData) = 1 Then Me.txtData = 28 & "/" & 2 & "/" & Year(Me.txtData) ElseIf Day(Me.txtData) > 30 Then Select Case Month(Me.txtData) Case 3, 5, 8, 10 Me.txtData = 30 & "/" & Month(Me.txtData) + 1 & "/" & Year(Me.txtData) Exit Sub End Select GoTo Vai_Normal_Mes Else Vai_Normal_Mes: Me.txtData = DateAdd("m", 1, Me.txtData) Me.txtData = vNormal & "/" & Month(Me.txtData) & "/" & Year(Me.txtData) End If

aí... consegui pessoal! o problema era no banco... usei uma ferramenta do proprio access que compacta e corrige qualquer problema do banco... depois disso ficou beleza! abraços

Amigos, já consegui resolver... a saber: os problemas 1 e 2 resolvi substituindo os códigos "padrão" por estes abaixo: objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 'porta do SMTP objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "e-mail do remetente" 'porta do CDO objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "sua senha smtp" 'timeout objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 a dúvida numero 3 consegui resolver, após muito esforço e muitas gambiarras criando um campo strBody... mas ó foi bem difícil, pelo menos pra mim! Moderador... fique a vontade para dar este post como concluído, resolvido ou afins... Abração a todos. Notax

Andreia, eu tive um problema bem parecido o que eu fiz foi colocar o campo entre aspas simples ' além de abraçá-lo com # e deu certo... ficou assim '#"& DATA &"#'... mas sabe como é né... sou leigo!!! não confia muito! o fato de abraçar o campo com sustenido (não sei se é o seu caso) mas até onde eu saiba é a forma de selecionar as datas no access... espero ter ajudado... desulpa aí qualquer inconveniente!

Pessoal, boa tarde. Estou tentando fazer um cadastro ativado por e-mail usando o Cdosys... No entanto estão acontecendo os seguintes problemas: 1) apesar me mandar a mensagem, aparece o erro: Microsoft JET Database Engine error '80004005' The changes you requested to the table were not successful because they would create duplicate values in the index, primary key, or relationship. Change the data in the field or fields that contain duplicate data, remove the index, or redefine the index to permit duplicate entries and try again. /rafa/servidor/cadastro/cadastro/cadastrar.asp, line 122 que vem a ser a linha: Set rsInsert = conexao.Execute(strInsert) 2) além deste erro, só está sendo possivel enviar e-mails para endereços do tipo: usuário@dominioparticular.com.br, quando coloco endereços do tipo ...@hotmail, ou @bol, ou @ig não envia e aparece outro erro: error '8004020f' /rafa/servidor/cadastro/cadastro/cadastrar.asp, line 72 , que vem a ser a linha objCDOSYSMail.Send; 3) o último erro que está acontecendo é que estou tendo dificuldade em construir a mensagem do e-mail, principalmente no que diz respeito ao construtor do link com o código para ativação... estou tentando da seguinte forma: 'conteúdo da mensagem objCDOSYSMail.TextBody = "http://www.revistaria.com/rafa/servidor/cadastro/cadastro/cadastrar1.asp?id="&request.form = ("codigo") mas em meu e-mail vem apenas a palavra false escrita! segue abaixo, na íntegra, o script que estou usando, mas vale destacar que tomei o cuidado de entrar em contato com o servidor e me certifiquei de que tenho este componente habilitado em meu domínio... afora tentei encontrar exaustivamente em outros posts respostas para o meu problema e não encontrei... será que alguém poderia me ajudar em mais essa? <!--#include file="conexao.asp"--> <% Dim conexao site = "www.revistaria.com" 'aqui vem o nome do seu site seumail = "revistaria@revistaria.com" 'aqui o e-mail de quem está enviando a chave de ativação para o usuário 'abaixo as variáveis criadas para cara requisição dos formulários da página cadastro.asp Login = Request.form("txtLogin") Senha = Request.form("txtSenha") email = Request.form("txtMail") Ende = Request.form("txtEnd") Num = Request.form("txtNum") Endereco = Ende&", "&Num 'aqui é uma montagem do endereço, "Ende" é o endereço seguido de vírgula ", " e acrescentado o número "Num". Cep1 = Request.form("txtCep1") Cep2 = Request.form("txtCep2") Cep = Cep1&"-"&Cep2 'mesmo idéia de cima Cidade = Request.form("txtCidade") Estado = Request.form("txtEstado") Tel = Request.form("txtDDD") &"-"& Request.form("txtFone") DDD = Request.form("txtFone") Nome = Request.form("txtNome") codigo = day(date)&month(date)&year(date)&"abc"&Login&month(date)&year(date)&minute(date) 'aqui é o código que irá ser enviando para o usuário, poderia ser qualquer coisa, desde de que respeite um diferencial dos demais, teria ques er randômico, ou ter algo que o diferendcie dos demais...como no exemplo, tem o "Login" mais algumas datas e umas letras abc só para enrolar, poderia por um código para cada tempo, se quiser incrementar... não = "não" 'esse não é que vai decidir se o usuário está livre para navegar nas páginas restritas... quando ele terminar de cadastar ativando seu cadastro pelo e-mail, aí ele terá uma atualização para 'sim'. data = day(date)&"/"&month(date)&"/"&year(date) 'aqui a data que foi efetuado o cadastro IP = Request.ServerVariables("REMOTE_ADDR") 'aqui é o IP da máquina de quem efetuou o cadastro if Request.form("txtNome") = "" then 'caso a pessoa não coloque o nome, a mensagem de boas vindas no e-mail, irá ser para o login do usuário user = Login else user = Nome end if 'aqui irá enviar para o e-mail do usuário 'cria o objeto para o envio de e-mail Set objCDOSYSMail = Server.CreateObject("CDO.Message") 'cria o objeto para configuração do SMTP Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") 'SMTP objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.revistaria.com" 'porta do SMTP objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 'porta do CDO objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'timeout objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 objCDOSYSCon.Fields.update 'atualiza a configuração do CDOSYS para o envio do e-mail Set objCDOSYSMail.Configuration = objCDOSYSCon 'e-mail do remetente objCDOSYSMail.From = "revistaria@revistaria.com" 'e-mail do destinatário objCDOSYSMail.To = request.form ("txtMail") 'assunto da mensagem objCDOSYSMail.Subject = "ativação de registro" 'conteúdo da mensagem objCDOSYSMail.TextBody = "http://www.revistaria.com/rafa/servidor/cadastro/cadastro/cadastrar1.asp?id="&request.form = ("codigo") 'para envio da mensagem no formato html altere o TextBody para HtmlBody 'objCDOSYSMail.HtmlBody = request.form("mensagem") 'objCDOSYSMail.fields.update 'envia o e-mail objCDOSYSMail.Send 'destrói os objetos Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing 'aqui são preenchimentos dos espaços vazios, no caso do usuário não colocar tudo corretamente if Endereco = ", " then Endereco = "Sem endereço" end if if Cep = "-" then Cep = "sem cep" end if if Cidade = "" then Cidade = "sem cidade" end if if Estado = "" then Estado = "sem estado" end if if Tel = "-" then Tel = "sem telefone" end if if Nome = "" then Nome = "sem nome" end if 'aqui é inserido tudo na base strInsert = " INSERT into usuarios " strInsert = strInsert & "(nome, login, senha, email, cidade, estado, cep, endereco, telefone, data, libera, IP, codigo)" strInsert = strInsert + "VALUES ('" + Nome + "'," strInsert = strInsert + "'" + Login + "'," strInsert = strInsert + "'" + Senha + "'," strInsert = strInsert + "'" + email + "'," strInsert = strInsert + "'" + Cidade + "'," strInsert = strInsert + "'" + Estado + "'," strInsert = strInsert + "'" + Cep + "'," strInsert = strInsert + "'" + Endereco + "'," strInsert = strInsert + "'" + Tel + "'," strInsert = strInsert + "'" + data + "'," strInsert = strInsert + "'" + não + "'," strInsert = strInsert + "'" + IP + "'," strInsert = strInsert + "'" + codigo + "')" 'é aberta a conexao Call abreConexao Set rsInsert = conexao.Execute(strInsert) 'é fechada Call fechaConexao Set rsInsert = Nothing Response.redirect("enviado_cadastro.asp") 'redireciona para uma página que avise que a chave de ativação foi enviada no e-mail do destinatário. on error resume next if Err.number <> 0 then Call Erro("Já existe um usuário cadastrado com esse nome",Err.description) end if 'no caso de haver um erro, pode se fazer uma página "aviso.asp" avisando do erro com um "meta refresh redirect de 8 segundos, mais ou menos", logo em seguida redirecionando para o cadastro.asp 'If err.number <> 0 then 'Response.redirect("aviso.asp") 'end if %> agradeço a atenção de todos... forte abraço. notax

grato pelo retorno... bom, o link onde estou fazendo testes deste formulário é: http://www.revistaria.com/rafa/teste/a_pagar_inclui.asp o que acontece é que agora estou tentando criar formas de repercurtir datas para facilitar lançamentos... entenderás quando acessar o link e clicar naquela opção que me ajudaste a desenvolver (clique para atvar repetições)... Eu tenho essa programação para repercurtir as datas já funcionando em formulário do access e agora queria passar para form asp, para poder administrar o bd remotamente... por isso coloquei os códigos acima... um em vb que está funcionando ok, e o outro em javascript que estou tentando fazer funcionar! muito obrigado pela sua atenção...

Entendi, se fossem muitos itens poderia ser um facilitador de programação! muito bacana! mas a pergunta que não quer calar agora é como transformar o código abaixo que está em VBScript em javascript? os comandos abaixo tem relação direta com a primeira parte deste post... o que eu quero é criar uma forma de lançar por ex: parcelas mensais, tipo um carnê que a primeira parcela vence no dia 10/01/08 e que possui 36 parcelas... então se escolheria a repercussão mensal, e se preencheria o número 36 no campo de parcelas... pronto! tudo lançado direitinho com as respectivas datas... só que eu teno isso funcionando em vba... Private Sub IncrementaData()<br> Dim vData As Date<br> Dim vLimite As Integer<br> <br> 'REPERCUSSÃO MENSAL<br> If Me.qdrRepercussao = 2 Then<br> 'verificar se o dia digitado para a data é maior do que 30...<br> 'se é maior do que trinta, verificar o mês para saber se o mês da próxima parcela pode apresentar dia 31<br> 'verificar se o dia digitado para a data é maior que 28 e o mês é maior que janeiro<br> <br> If Day(Me.txtData) > 28 And Month(Me.txtData) = 1 Then<br> Me.txtData = 28 &amp; "/" &amp; 2 &amp; "/" &amp; Year(Me.txtData)<br> <br> ElseIf Day(Me.txtData) > 30 Then<br> <br> Select Case Month(Me.txtData)<br> Case 3, 5, 8, 10<br> Me.txtData = 30 &amp; "/" &amp; Month(Me.txtData) + 1 &amp; "/" &amp; Year(Me.txtData)<br> Exit Sub<br> End Select<br> <br> GoTo Vai_Normal_Mes<br> <br> Else<br> Vai_Normal_Mes:<br> Me.txtData = DateAdd("m", 1, Me.txtData)<br> Me.txtData = vNormal &amp; "/" &amp; Month(Me.txtData) &amp; "/" &amp; Year(Me.txtData)<br> End If<br> <br> tentei esboçar alguma coisa da seguinte forma: function IncrementaData(qdrrepercussao) { if (qdrrepercussão=2) then elseif day (txtData) > 28and month (txtData) = 1 Then txtData = 28 & "/" & 2 "/" & Year (txtData) ElseIf Day (txtData) > 30 Then Select Case Month (txtData) Case 2, 4, 7, 9 txtData = 30 & "/" & Month (txtData) + 1 & "/" & Year (txtData) EndIf } mas o que acontece é que quando coloco estes comandos a primeira coisa que para de funcionar é a DIV... eu ainda não consegui testar se esse comando funcionará tb. da mesma forma que funciona em vb... Será que é por aí o caminho, ou ainda to muito longe? por que a DIV para de funcionar, não posso ter mais de uma função? muito obrigado desde já! abraçao Notax.

putz... esse troço de programação ta abrindo meus horizontes! Estava certo de que a culpa era do servidor! rssssssssssssss... quando desabilitei a opcao mensagem de erros amigaveis escancarou os meus erros e ficou bem faceis de corrigilos... mais uma vez, muito obrigado. Notax

Ahhhh, agora entendi... Deu super certo, ficou bem legal... muito obrigado! valeu mesmo... Estou trabalhando agora na repercussão das datas... mas acho que estou conseguindo, por incrivel que pareça! rssssssss um abração! Notax.

Eu tenho tido muitos problemas com bd de mais de uma tabela... fiz um teste esses dias tentando fazer com que meu script funcionasse em u bd com só uma tabela... e rolou perfeito... não sou o mais indicado para dar sugestãoes, pois sou leigo no assunto... mas já tentou fazer esse teste que mencionei? enfim... não que esta seja uma boa solução, mas se funcionasse em bd com uma tabela só tu já terias um bom indicativo de onde pode ser o problema, não? vou acompanhar este tópico para ver se derepente não encontro a solução pro meu problema tb! Boa sorte!

Andreia, bom dia e mais uma vez obrigado pelo retorno, mas deixa eu ver se entendi... pra aprender e não ter que encomodar denovo! :) o que tu fizeste foi incluir: { if (status) document.getElementById("div").style.display = 'block'; else document.getElementById("div").style.display = 'none'; } e depois nas opçoes a desativar enquanto não estiver marcado: <p align="left"><font face="Abadi muito Condensed Light"><input name="chcboleto" type="checkbox" id="chcboleto" value="ON" onclick="ExibeCampo(this.checked)"><i>Clique para ativar repetições</i></font> é isso? aproveitando... pelo que eu já pude testar (lógicamente funcionou), mas não fica claro pro usuário ainda que as opções semanal, mensal, semestral ou anual só liberam mediante o clique daquele cheqkbox... teria ainda como eu fazer estas opções mudarem de cor enquanto esse checkbox não ficar marcado... tipo aquele "cinza" de opções desablitadas. poderias me ensinar isso tb?

Olá... Estou tentando entrar em páginas asp que coloquei em meu domínio na net... acontece que quando eu entro aparece a mensagem de erro abaixo: HTTP 500 ERRO INTERNO DE SERVIDOR Alguém já passou por isso? Bom, já entreiem contato com o servidor que garante que não é nada lá e afirma que deve ser algum erro nos meus scripts! alguma pista de por onde começar? Notax.

Oi... olha só... minha esposa tem um compaq e eu tenho um acer 5050, que pelo visto supriria as tuas necessidades... ficamos muito impressionados com o acer... eu recomendo! pra mim o custo X benefício é melhor no acer... mas é uma opinião pessoal! forte abraço...

oi Andreia, muito obrigado pelo retorno, viu! isso o checkbox queria que servisse para habilitar a função "lançamento por boleto" ou "repercurssão de datas" como preferir... porque? porque daí, se esse checkbox não tiver marcado, o formulário fará um lançamento único, levando em consideração apenas a data inicial... enfim... segue o form abaixo, e mais uma vez agradeço toda atenção! <html> <head> <title></title> &lt;script language="javascript"> function valida_campo() { <!-- var data = document.form.data.value if (data==""){ alert("Digite a data dd/mm/yyyy!"); document.form.data.focus() return false } var historico=document.form.historico.value; if (historico==""){ alert("Digite o histórico de sua conta!") document.form.historico.focus() return false } var valor=document.form.valor.value; if (valor==""){ alert("Digite o valor de sua conta!") document.form.valor.focus() return false } var chcBoleto=document.form.chcBoleto.value; if (chcBoleto=="on") and is null (txtQuantidade) then { alert("Digite a quantidade de parcelas a serem incluidas!") document.form.chcBoleto.focus() return false } } //--> </script> </head> <body> <p align="center"><img border="0" src="http://www.revistaria.com/rafa/logoaccess.jpg" align="left"></p> <p align="center">&nbsp;</p> <p align="center">&nbsp;</p> <p align="center">&nbsp;</p> <form method="post" action="insert_into.asp" name="form" onsubmit="return valida_campo()"> <p align="left"><font face="Abadi muito Condensed Light"><b><i><u>Lançamento de Contas à <font color="#FF0000">Pagar</font></u></i></b></font></p> <p align="left"><font face="Abadi muito Condensed Light"><i>Data</i><input type="text" name="data" size="16"> <i>Tipo</i> <select size="1" name="tipo"> <option>HONORÁRIOS</option> <option>ALUGUEL</option> <option>CLIENTES</option> <option>FORNECEDORES</option> <option>CONDOMINIO</option> <option>LUZ</option> <option>AGUA</option> <option>TELEFONE</option> <option>GAS</option> <option>ESCOLAS</option> <option>CHEQUES</option> <option>SEGURO</option> <option>SAUDE</option> <option>OUTROS</option> <option>PRÓ-LABORE</option> </select></font></p> <p align="left"><font face="Abadi muito Condensed Light"><i>Histórico</i> <input type="text" name="historico" size="38"></font></p> <p align="left"><font face="Abadi muito Condensed Light"><i>Valor </i><input type="text" name="valor" size="20" style="color: #FF0000"></font></p> <p align="left"><font face="Abadi muito Condensed Light"><input name="chcboleto" type="checkbox" id="chcboleto" value="ON"><i>Clique para ativar repetições</i></font></p> <p align="left"><font face="Abadi muito Condensed Light"><i>Nº de Parcelas</i> <input name="TxtQuantidade" type="text" id="TxtQuantidade" size="5"></font></p> <p align="left"><font face="Abadi muito Condensed Light"><i>Repercussão:</i></font></p> <p align="left"><font face="Abadi muito Condensed Light"><i><input type="radio" value="semanal" checked name="Opcao31">semanal&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="Opcao33" value="mensal">mensal</i></font></p> <p align="left"><font face="Abadi muito Condensed Light"><i><input type="radio" name="Opcao38" value="semestral">semestral&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="Opcao36" value="anual">anual</i></font></p> <p align="left"><font face="Abadi muito Condensed Light"><input type="submit" value="Submeter" name="B1"><input type="reset" value="Redefinir" name="B2"></font></p> </form> </body> </html>

Bom dia amigos, desculpem incomodar mais esta vez, prometo que é a última, já que só falta isto pra concluir meu sistema... Como todos sabem sou leigo no assunto e resolvi aprender e estudar banco de dados e forma de administrá-lo pela Net... Graças ao apoio de alguns amigos deste forum meu banco de dados access juntamente com seus forms em vb estão funcionando muito bem... mas o que acontece é que preciso administrar este bd também pela internet... Portanto comecei a desenvolver formularios em Asp que incluem, visualizam ou excluem registros no meu BD e já está tudo funcionando muito bem... com exceção desta última tarefa que passo a expor, contando com a atenção de todos e pedindo mais esta gentileza em me ajudar... não querendo abusar, mas já abusando... peço desculpas antecipadas por qualquer. inconveniente... primeiro: preciso criar uma chechbox que habilite as funções a seguir; segundo: preciso que um textfield que será preenchido com o numero de pareclas represente o grau multiplicador dos lançamentos dos registros. terceiro: escolher a forma de inclusão destes registros atraves de radio buttons, podendo ser semanais, mensais, semestrais ou anuais... na pratica significa o seguinte: tenho um carnê de pagtos com 12 parcelas mensais, semanais ou anuais... pra isso preencheria o meu form que já conta com campos de data inicial, tipo, historico e valor, depois selecionaria a checkbox que habilitaria o textfield de parcelas e os radio buttons, colocaria 12 no textfield de parecelas e selecionaria a opçao que atende a condição do carne, ou seja, repetir mensalmente, semanalmente e etc.... daí ao clicar em submit todos os lançamentos já estaria lançados nas respectivas datas! se adiantar alguma coisa, posso postar o códico em VBS onde já tenho este sistema de repercussão de datas funcionando... Alguém pode me dar uma ajuda... qualquer que seja! já nem sei mais por onde ir... e falta apenas isso pra terminar meu projeto! Agradeço novamente a atenção de todos... Forte abraço. Notax.

Bareta, muito obrigado por sua atenção! Com relação aos comentários, seguem respectivamente: 1) No db o tipo do campo é 'moeda', já no form .asp coloquei um textfield numérico, e acertei a disposição da pontuação e virgulas, acertando as casas decimais, deixando-os compatível com o sistema monetário... aqui incluisive segue outra dúvida: como configurar um text field para tipo moedas ou datas, com respectivas máscaras? 2) ok, achei um exemplo e estou tentando me espelhar em cima dele... outros exemplos sempre são bem vindos, caso alguém tenha! :) 3) Calendários... certo! mas não achei nenhum assim... com essa função... eu tenho já uma programação bem certinha em vba, o problema agora seria trazê-la para asp... existe alguma forma? Novamente agradeço a atenção de todos... forte abraço. Notax

desculpem, postei no local errado...