Ir para conteúdo
Fórum Script Brasil

MrMALJ

Moderadores
  • Total de itens

    2.152
  • Registro em

  • Última visita

Tudo que MrMALJ postou

  1. Ummm num é complicado você pode utilizar a função dLookup no seu código, veja o tópico abaixo acredito que deva dar uma luz (existem alguns outros exemplos use a busca para encontrar)... http://scriptbrasil.com.br/forum/index.php?showtopic=92397 Se não resolver podemos tentar alguma outra solução mais se resolver dê um retorno... valeu!!!
  2. MrMALJ

    Runtime No 2003

    Olha procurei e o unico que achei foi esse dai, talvez funcione http://www.dm10.com.br/download/runtime/Runtime.exe Eu relamente espero que funcione, se funcionar ou não de o retorno... valeu
  3. MrMALJ

    Famoso Erro 3197

    Fera da uma olhada nesse artigo http://support.microsoft.com/directory/art...US;Q164097& Se resolve avise!
  4. MrMALJ

    Imprimindo Formulário

    Crie uma consulta que utilize como criterio o registro atual do seu form, então utiliza]e ela para gerar seu relatório!
  5. Fera vou montar um exemplo e depois posto aqui, uma coisa bem simples só pra se ter uma ideia e aprimorar depois... Aguarde
  6. ummm pelo que seu código parece certo, tem como você mandar para mim o BD ou a parte para que eu posso dar uma analisada e ajudar melhor?
  7. Bom com certeza deve ter muito material sobre o assunto na net, você pode ir num site de busca e digitar o assunto. Não tenho material aqui comigo pois sempre que precisei ia no F! (ajuda) do proprio access e lia as sintaxes e exemplos e apartir desenvolver algo, mais vou dar uma pesquisada e depois posto algo
  8. MrMALJ

    Zero A Esquerda (resolvido)

    No modo estrutura da sua tabela no campo desejado e va ate a propriedade 'FORMATO" então digite a quantidade de zeros digitados Exemplo: 000000 = 000001 Você pode tambem utilizar a propriedade Mascara da caixa de texto para fazer isso... Se resolveu confirme para que eu possa dar essa duvida como resolvido1
  9. Ia sugerir algo semelhante, algo que quando você saisse do campo EMISAO ele automaticamente atualizasse o VALIDADE (utilizando a propriedade ao Perder Foco) mais ou menos assim me.validade.value=(me.emissao)+365 No caso ele iria utilizar como base a data de emissão e não a data atual
  10. Bom no meu caso, eu crio uma tabela onde cadastro os usuarios, suas senhas e seu tipo de acesso e setor (geralmente utilizo administradores e gerentes e usuarios), então quando o usuario faz o login eu capturo seu nome e seu tipo de acesso e guardo em variáveis do tipo global, e sempre quando ele abre um ou outro form ou tenta realizar algum procedimento o sistema verifica se ele tem acesso ou permissão para realiza-la, algumas vezes dependendo do usuario bloqueio botões ou campos para que não possa ser utilizado outras vezes retorno uma mensagem informando que ele não tem acesso. Ou seja Administradores tem acesso a todo o sistema, gerentes tem acesso a toda a parte em que ele é responsável e o usuario no geral só fazem lançamentos e consultam dados.
  11. MrMALJ

    Pesquisa Em FormulÁrio

    Crie uma consulta com os com campos que deseja mostrar, então no critério do campo protocolo digite uma linha semelhante a seguinte Formulários!seuFormCriteio!protocoloCriterio Note que seuFormCriterio seria um formulário onde você irá digitar o protocolo procurado, e que o campo protocoloCriterio é uma caixa de texto não acoplada, e imagino para isso que você tenha criado um formulário com base na consulta criada, e que esse será utilizada como um subformulario do seuFormCriterio (vou chamar esse sub de tstResultado), tendo feito isso basta você ir na propriedade "Após atualizar" do protocoloCriterio e digitar o seguinte: me.tstResultado.requery Pronto imagino que isso resolva seu problema, agora bastaria você alterar as propriedades "Ativado" dos campos do subformulario pra NÃO isso deve impedir que se faça alterações neles... Não esqueça de dar o retorno... valeu
  12. Crie uma consulta no modo estrutura com os campos que você ira necessitar e no criterio do do seu campo data digite o seguinte: entre [Data1] e [Data2] Bom depois disso é só criar um relatorio com base na consulta criada... bom se resolveu confirme valeu!!!
  13. Acho que falo senão por todos mais pela maioria dos usuarios do forum, que estão sempre dispostos a ajudar e compartilhar conhecimentos, e com certeza estamos alegres pelo reconhecimento, espero que tenha muito + sucesso fera!!!
  14. Bom você pode criar uma rotina de login, onde îrá precisar de uma tabela para cadastrar usuarios, senhas e se caso for implementar algo como nivel de acesso, depois disso basta incluir os usuarios na tabela com suas respectivas senhas e utilizar um formulario para acessar seu sistema... se não era isso que desejava dê uma olhada no link que dá algumas dicas sobre seguranca no Access, mais eu sinceramente acho que fique com uma aparência melhor se vocÊ mesma criar um procedimento de login... valeu http://www.forumweb.com.br/foruns/lofivers...x.php/t287.html
  15. MrMALJ

    Tabela Vinculada

    Fera dê o retorno se seu problema foi solucionado!
  16. MrMALJ

    Ajuda No Acess

    Erro 429 - O componente ActiveX não pode criar objeto Este erro ocorre por falta de uma ferramenta que faz parte do Access, geralmente está e instalada automaticamente ao instalar o Access. Para corrigir este problema faça o download e instale o arquivo de correção http://www.gr8.com.br/arq/dao36.exe Extrai esse texto do site "GR8 Help Desk", se funcionar dê o retorno valeu...
  17. Bom sua duvida me parece simples, mais quero observar que quando abrir um tópico para pedir ajuda tente colocar no titulo um assunto que servir como referência para futuras referências para pqesquisa (ex: Contar itens no período) SELECT suaTabela.Data, Count(suaTabela.oQuerContar) AS contaAlgo FROM suaTabela HAVING (((suaTabela.Data) Between [datainicial] And [datafinal])); Bom é isso ai, só dê o retorno se funcionou ou não valeu!
  18. Tenta algo assim select top 10 empresaNome, reclamaNr from suaTabela order by suaTabela.reclamaNr desc Acho que isso deve ajudar, dê o retorno valeu! O link abaixo pode te dar uma visão melhor do comando http://www.linhadecodigo.com.br/artigos.asp?id_ac=797
  19. Dim vcnpj as Variant vcnpj = DLookup("[cnpj]", "tab_cadastro", "[destinatario] ="& Forms![Digigraph_Ordem de Serviço]!CLIENTE) If vcnpj = Null Then Forms![Digigraph_Ordem de Serviço]![CNPJ] = "Sem CNPJ" End If Bom como você pode ver só o que tinha de errado era as aspas no critério... se der certo confirme alias se puder sempre que suas duvidas solucionados confirme ok!
  20. Bom você pode mapear o destino da copia tipo atribuir X: para o local da rede de destino, aqui funciona perfeitamente copy *.* x:\caminho ou copy x:\caminho\*.* c:\caminho
  21. Desculpem, quando postei o agradecimento nem lembrei que não estava em casa (onde já fica pra entra automatico)... mais como disse vou tentar ajudar bastante
  22. Supondo que a caixa de texto aplicação sirva de criterio para a comboBox tstCombo que seja alimentada pela tabela pecas... na propriedade origem da linha da tstCombo digite algo assim: select [pecas].[pecaNome],[pecas].[pecaMarca] from peca order by [pecas].[pecaNome] where [pecas].[pecaMarca]=Formulários!seuFormula!Aplicaçao; e na propriedade "Após atualizar" da caixa de texto aplicação insira uma linha assim: me.tstCombo.requery Bom acredito que isso resolva, claro que com as devidas adequações ao seu sistema, não esqueça de confirmar se funcionou!!
  23. bom como você não disse como irá fazer a seleção vou fazer um exemplo supondo que você tenha uma caixa de texto de qRel e que nessa caixa de texto irá receber 1 ou 2, na propriedade "Ao Clicar" do seu botão de impressão coloque um codigo assim! if me.qRel=1 then DoCmd.OpenReport "publico", acPreview else DoCmd.OpenReport "privado", acPreview end if Bom isso fará com seu relatório um ou outro seja exibido na tela para direcionar para impressora muda acPreview para acViewNormal Se resolveu seu problema confirme ok!
  24. Certifique-se de que o campo de numeração seja a chave primária e esteja indexada, então, crie uma consulta com o seuCampoControle que busque somente o ultimo registro lançado então crie um procedimento para pegar esse valor, mais ou menos assim seuCampoControle=nz(dlookup("[ultimo de seuCampoControle]","suaConsultaUltimo");0)+1 pronto com as devidas adequações a nomenclatura que você adotar vai funcionar... confirme ok!
×
×
  • Criar Novo...