Elber Carretoni

é...a idéia foi ótima.. o problema é criar o relatório de novo...são campos pra cacilds...rsrs vou dar uma fuçada...copiar os objetos e depois só encaminhar os índices de controle...vo ve aqui... estive dando uma olhada na função docmd.OpenReport e reparei que há várias opções de critério e também filtragem de dados...caso dê certo, posso armazenar numa variável o número de registro (chave primária) que o usuário acabou de cadastrar e por filtragem indico o número do determinado registro... vo fuça aqui e se tiver qualquer solução ou relevante entre em retorno!!!

então mrmalj...já usei a função dlookup pra várias partes do meu sistema, e funcionou perfeitamente... a primeira coisa que tentei foi fazer a solução usando DLOOKUP, porém não deu certo... não sei se devido ao fato do campo RG ser do tipo texto...enfim...amanhã de manhã vou fazer uns testes usando o cpf (Tipo Número Inteiro Longo)...e qualquer retorno que tiver faço um resumo e coloco a resolução aqui no tópico! vlw a atenção, abraços!!!

;D

JDalcin...evita pedir soluções em e-mail... o ideal do fórum é realmente trocar informações e deixa-las disponíveis para consulta... no seu botão salvar, coloque a seguinte linha de código: me.Seu_Campo_Data_Hora = Now (obviamente, coloque esta linha de código antes da programação de salvar o registro!) a função Now retorna a hora atual do sistema...acredito que de acordo com a hora do seu computador! a função Date retorna a data atual do sistema...acredito também que de acordo com a data configurada do seu computador... além disso, para alterar a forma de visualização das datas e horas ("dd/mm/yyyy", "dd/mm/yy", "diadasemana, dia 'de' mês 'de' ano", "22:34", "10:34")´, vá no modo estrutura da sua tabela, e nas propriedades do campo do tipo data/hora, vá na paleta GERAL, e em FORMATO altere a forma de visualização como queira... caso você não tenha uma tabela com os campos de data e hora, em objetos textbox não-acolpados do formulário também há está opção de FORMATO! se você quiser usar a data e a hora no mesmo campo, use CONCATENAÇÃO! me.Seu_Campo_Data_Hora = Date & "," & Now espero que resolva... abraços, falow!

o problema é que concatenando desta forma não se é possível obter um padrão de todos registros com o mesmo número de caracteres no textbox que você mencionou... o ideal seria você supor, por exemplo, um padrão de 50 caracteres para o campo... ao digitar o dado no campo (Feijão, Latas de Óleo), fazer contar o número de caracteres das palavras digitadas, subtrair do 50 e o resultado colocar em pontos finais... ex. Feijão = 6 caracteres ; 50 - 6 = 44 ; -> concatenar 44 pontos finais no restante da textbox... dá pra fazer uma lógica usando laço de repetição while... declara uma variável pra receber o número de caracteres da palavra digitada; atualiza o valor da variável para '50 MENOS o valor de caracteres da palavra digitada'; e, ENQUANTO (While) o valor final da variável declarada for maior que 0 (zero), concatena-se um ponto a mais na textbox.[/codebox] deu pra entender a lógica ? acho que funciona... só não sei se é possível fazer isso em VBA...agora bérra o MrMALJ aí porque ele que é o guru da programação...rs abraços, gracias!

opa...eu que agradeço o apoio que várias vezes já me deu... acredito nesse fenômeno da troca de informações, e nada melhor do que um fórum pra aprender coisas que não se encontra em livros e revistas! não basta apenas solucionar sua dúvida, o importante é adiquirir o maior conhecimento possível e transmiti-lo! VLW mrMARLJ!!! em relação à dúvida do tópico, apenas à fim de complemento, as barras "Barra de Visualização" e "Barra de Formatação..." não precisam ser retiradas...muita das vezes o vba acusa inexistência dessas barras também... pra quem tiver solucionando essa dúvida, dêem uma olhada em Ferramentas, Opções e Ferramentas, Inicializar...lá tem várias opções que bloqueiam as barras de ferramentas e outra menus de atalhos...enfim...é uma boa! só ressaltando ainda, com a função docmd.showtoolbar é possível tirar e retirar barras de ferramentas e menus que você também personalizou... abraços,

esse jeito eu tenho certeza que funciona sim cara...ainda mais porque você quer localizar as informações do registro através de uma chave primária (código)... tenho exemplos aqui dessa utilização DLookup e caso você queira te envio por e-mail...não dá pra anexar aqui pois o fórum não aceita arquivo .mdb! sei criar uma combobox (através de relacionamento) que, ao clicar nela, aparece uma listinha com colunas dos dados que você quer mostrar... toda combobox relacionada após ser preenchida (escolhida) pode enviar o valor de algum campo relacionado nela para para outro campo...porém, como mandar mais de um valor já não sei, e não sei se tem como... bom...tem uma galera aí do fórum que é bem mais experiente e pode te iluminar um pouco... no entanto, com o que eu puder ajudar, tamo o dia todo online... meu e-mail tá aí embaixo, caso precise...prefiro que me responda no fórum, já que estou sempre online... abraços,

galera...minha dúvida é o seguinte... tenho um sistema em que o usuário, logo depois de efetuar seu cadastro, precisa imprimir um relatório... então, juntamente com o botão salvar, eu já programaria para imprimir o registro dele através de um relatório... só que não consigo fazer imprimir apenas o registro dele... talvez indicando qual número de registro que eu queira que o relatório imprima, ou o últmo registro do relatório, no qual acabou de ser cadastrado... alguém poderia me dar um help para imprimir apenas o registro especificado! de qualquer forma, vlw a atenção... abraços,

hum...também já tive essa dúvida...e isso é bastante procurado no fórum... há vários, vários tópicos relacionados à essa dúvida...inclusive tópicos que eu mesmo já criei pra tirar a dúvida... você vai precisar usar uma função chamada dlookup, onde através de critério de pesquisa você faz outro campo receber os dados desejados e automaticamente... dá uma olhada nesse tópico que o MrMALJ respondeu...e caso você ainda tenha alguma dúvida, manda otro post no tópico... http://scriptbrasil.com.br/forum/index.php?showtopic=92397 abraços, falou!

Daniel, todos os itens do seu banco de dados apresentam eventos...desde o formulário até os objetos que se encontram dentro do formulário... pelo que reparei nas programações você busca informações de registros através da função DLokup...enfim...seria legal colocar essas programações logo depois que o objeto atualizar (no caso, o objeto base que você digita o código para fazer a pesquisa dlookup)...Evento após atualizar, ou ao perder foco... todos os eventos de todos os objetos/formulários estão em propriedades/eventos como você mencionou... enfim, é só usar a criatividade... o "me." serve pra fazer referência à um objeto do formulário...assim você indica qualquer objeto do seu formulário!

fiz os testes com o código do felipe... está dando erro na declaração do "i"... e agora??? em outro fórum achei algumas dicas pra tirar barra de ferramentas...e lá aprendi que uma forma de tirar as barra de ferramentas era da seguinte maneira: docmd.ShowToolbar("NOME DA BARRA", acToolbarNo) sendo assim, você indiciva, no "NOME DA BARRA", a barra de Banco de Dados,Barra de Menus, Barra de Formatação (formulário/relatório) e Barra de visualização... acredito que o último seja barra de visualização, não me lembro perfeitamente... as barras saíram sim...o único problema é que ainda ficou uma barra do acess lá que ainda não consigo tirar e nem sei o nome dela pra desabilitar... alguém sabe? galera, fiz mais uns testes aqui agora usando para tirar as barra o comando docmd.ShowToolbar e também mandei maximizar a janela... funcionou certinhu sim...aquela barra que achei que permanecia, saiu agora (acho que antes eu estava indicando 'Barra de Menu', e não 'Barra de Menus')... e além disso, meu formulário ficou RESTRITO e como POP-UP, tornando-o ainda a janela do arquivo access com o nome do aplicativo DESABILITADA, apenas dando ênfase ao formulário aberto... vlw a força galera... abraços! 'Retira as Barras docmd.ShowToolbar "Banco de Dados", acToolbarNo docmd.ShowToolbar "Barra de Menus", acToolbarNo docmd.ShowToolbar "Barra de Formatação (formulário/relatório)", acToolbarNo docmd.ShowToolbar "Barra de Visualização", acToolbarNo 'Maximiza a Janela docmd.maximize[/codebox]

cara...dexa eu vê se entendi: você quer selecionar o código do cliente cadastrado em outra tabela e automaticamente em outros dois campos aparecer o nome e a cidade do respectivo código selecionado? isso?

galera...estive procurando outros fórum e de forma surpresa achei a mesma dúvida que a minha no fórum da revista INFO... fiz os procedimentos da solução que propuseram lá e o cálculo da idade realmente funcionou, quer dizer, parcialmente... algumas datas funcionam perfeitamente...já outras, como 22/03/1990 já não funciona...acredito que o erro se dê devido a anos maiores que 1990... a linha de código proposta foi esta: me.DtNascimento -> meu objeto que recebe a data de nascimento no formulário me.idade -> outro objeto que recebe a idade a partir da data de nascimento digitada evento APÓS ATUALIZAR do campo DtNascimento dim dn as integer dn = me.DtNascimento if month(dn) < month(date) then me.Idade = year(Date) - year(dn) 'Neste caso o sujeito já completou anos elseif month(dn)=month(date) and day(dn)<day(date) then me.Idade = year(Date) - year(dn) 'Neste caso o sujeito já completou anos else me.Idade = year(Date) - year(dn)-1 'Neste caso o sujeito ainda não completou anos [/codebox] alguém poderia me dizer porque ocorre o erro em determinadas datas supostas superiores ao ano de 1990? to precisando disso bem rapido galera...help aí! abraços, vlw! GALERA, TÓPICO RESOLVIDO! Já consegui solucionar a dúvida... na declaração da variável dn, em vez de integer, coloquem STRING [i](Dim dn As String)[/b] que vai funcionar perfeitamente em todas as datas, inclusive superior ao ano de 1990!! gracias... :lol:

salve salve galera... tenho um formulário em que usuário digita a data de nascimento. preciso calcular a idade do usuário automaticamente através da data de nascimento, e a partir de então verificar se o usuário é maior ou menor de 16 anos... como faço pra calcular usando os dias, meses e anos? alguém dá uma força aí? vlw! abraços,

cara...para trazer a informação de outra tabela diretamente após digitar o CNPJ, você pode usar a função DLOOKUP... aqui no fórum tem vários tópicos relacionados à essa função! inclusive eu também já tive essa dúvida e me ensinaram pelo fórum...rs O campo que você quer que receba o nome da Pessoa Jurídica, vou nomear como FormNomeJuri... O campo da tabela que você quer buscar para aparecer no FormNomeJuri, vou nomear como TabNomeJuri... Vou supor que o nome da tabela em que se encontra o CNPJ verdadeiro e o TabNomeJuri seja TbEmpresa... E o campo CNPJ do formulário pelo qual você vai comparar os dados com a tabela, vou chamar de FormCNPJ beleza? dae fica assim: me.FormNomeJuri = DLookUp("[TabNomeJuri]", "TbEmpresa", "[CNPJ verdadeiro]=" & me.FormCNPJ) deu pra entender? confirme se deu certo, ok? abraços,

salve salve galera...supimpa? mais uma outra dúvida... tenho um formulário que cadastro fichas de inscrições de novos alunos. Porém, há como um mesmo aluno gerar dois registros nesta tabela, conforme ele queira se matricular em mais de um curso. gostaria que, se o aluno estivesse se cadastrando pela segunda vez, ao informar o RG (por exemplo) todos os outros campos recebecem os valores automaticamente após encontrar o determinado RG já cadastrado na tabela! desta forma, evito que o usuário cadastre dados diferentes para um mesmo RG e automatizo meu formulário! sei como usar a função DLookUP para trazer as informações do registro encontrado para o formulário, porém não sei como pesquisar o registro e verificar se algum valor foi encontrado para a pesquisa! se alguém souber, dá uma força aí! estou precisando disso o mais rápido possível! Lógica da Programação: 1. Efetuar a PESQUISA; 2. Verificar se foi encontrado algum valor para a pesquisa; 3.1 SE foi encontrado algum valor no item 2, busque as informações (dlookup) e inative a entrada de dados nos campos preenchidos automaticamente por programação! 3.2 Caso contrário, deixo os campos habilitados para que o usuário cadastre as novas informações![/codebox]

galera, sobre as propriedades da checkbox já consegui uma solução... em vez de checkbox.checked (conforme delphi), em vb se usa apenas checkbox.value = True/False! a dúvida agora é mandar uma instrução em sql (determinada por uma variável string do vb) para uma consulta do access!!! Alguém sabe aí??? :unsure:

VLW mais uma vez MRMALJ! Confirmo sua solução...tópico resolvido!!! abraços, ps.: a propriedade máscara de entrada tipo 'senha' pode ser feita também nos campos não acoplados de um formulário, e não necessariamente apenas na estrutura de uma tabela.

fica tranquilo...também sou novato em access e ando dando meus pulos por aqui...o fórum é ótimo pra tirar dúvidas!!! cara, não sei se tem como 'expandir' sua tela para torná-la 'tela cheia'. Na verdade, até onde sei, a tela fica apenas do tamanho que você mesmo criou...se for o caso, crie você mesmo um espaço colorido em volta do seu formulário de modo que o mesmo preencha todo o tamanho da tela. sei como tirar as barras de ferramentas, não permitir alterações nas barras de menus que você mencionou e assim por diante. se isso lhe for útil, e acredito que sim, te dou uns toques em como personalizar suas próprias barras de ferramentas e menus e retirar os padrões do access! Vou dar uma olhada se há como expandir a tela para 'cheia'. E assim que tiver qualquer retorno, te mando... Espero resposta... abraços,

gracias renato! já fiz os testes e confirmo sua solução! vlw a força, brigadão! abraços,

salve salve galera! tenho uma dúvida relativamente simples... estive usando o fórum do access...postei esta dúvida lá, mas não obtive retorno já faz alguns dias... costumo usar o delphi pra programação, mas de uma hora pra outra tive que comecar a usar VBA devido às ligações que ele tem com o msoffice e outros programas... em delphi, pra declarar se uma checkbox está assinalada ou não, usava-se a propriedade .checked... porém, em vba esta propriedade não existe e não consigo encontrar outra relativa... alguém poderia dar um help? estou usando o editor VBA através do acess, colocando o objetivo checkbox de forma não acoplada em um formulário! desde já, gracias! abraços,

rsrs...pior que acho que não...

dale dale galera... acredito que esta dúvida seja bem simples... tenho um formulário que solicita a senha do usuário para acessar partes restritas do sistema! este 'campo senha' não é acoplado! gostaria de criptografar a entrada de dados do mesmo para que, ao digitar qualquer conteúdo no campo, apareça apenas os sinais de ******* (asteristico), conforme um campo de senha! desde já agradeço a atenção! vlw! abraços!

Gracias galera! boa noite! Estou pensando em criar um formulário em que o usuário possa efetuar uma filtragem de dados de determinada tabela selecionando critérios simultâneamente e digitando seus respectivos valores procurados. Portanto, pensei na seguinte hipótese: Criaria um formulário (FormPesquisa) independente, com objetos checkbox (critérios) e campos não acoplados a fim de solicitar as informações ao usuário para efetuar uma filtragem avançada de dados! O usuário pode efetuar a filtragem de dados através de vários critérios assinalados simultaneamente...a verificação de quais critérios o usuário assinalou e à determinação da instrução SQL já tenho em mente através de VB. Criaria uma consulta com todos os campos da tabela (ConsultaPesquisa) e esta colocaria como subformulário não ativado no formulário 'FomPesquisa', a fim de gerar um efeito apenas de visualização de dados filtrados (DBGrid). Porém, tenho dúvidas de como mandar a instrução sql gerada por progamação (armazenada em uma variável string) para a ConsultaPesquisa. A idéia planejada daria certo? Além disso, tenho dúvidas de como determinar por VBA quando uma checkbox está checada ou não. Em DELPHI a instrução era CHECKBOX.CHECKED. Fiz os testes e, portanto, no VBA não consigo determinar tal propriedade. Alguém poderia ainda me dar uma luz sobre as propriedades de uma checkbox? Sou fraco em consultas através de access. Mas acredito que a idéia dê certo! Só gostaria de umas dicas, alguns procedimentos, ressalvas...enfim...AJUDA aí? desde já agradeço a força... Abraços! :blink:

Opa! sempre quebrando o galho em MrMalJ... pois é, ainda tenho muito que aprender e fuçar...rsrs cara...a dica foi ótima...acho que nunca tinha parado pra olhar as propriedades do formulário! foi viajem minha... inclusive, além dos botões de navegação, já dei uma olhada em muitas outras coisas lá que vou realmente precisar! vlw a força mais uma vez... mais tarde ou amanhã vo postar um outro tópico...talvez um poquinho mais complexo...daria um apoio? já é relacionado com pesquisa sql e vb! Grande abraço, vlw! Boa Noite!