[Resolvido]ENVIAR RELATORIO DIARIO PARA EMAIL

Galera é o seguinte estou precisando enviar todos os dias em um determinado horário um relatorio que esta no acess será que tem esta possibilidade. abraço

Se for enviar o relatório tal qual está no Access mesmo, dê uma estudada no SendObject na ajuda do VBA:

DoCmd.SendObject...

Se for relatório em pdf ou exportado para outro arquivo, você pode enviar via Outlook ou via CDO. Nesses casos, pesquise no fórum. Temos diversos exemplos e dúvidas resolvidas.

Bacana ele será enviado em pdf.

Olá colegas, desculpe minha intromissão no meio do post mas eu não sei enviar diariamente por email automático.

Por exemplo: ao inves de fazer o geito que o aldan quer, eu quero que cada vez que o usuario sair seja registrado a ultima data em algum campo, assim no outro dia qdo o usuario entrar rode outra macro que verifica se a data atual é igual a data armazenada, como vai ser diferente ele continua a macro e envia o email. Teem como fazer assim no access?

No meu caso eu tenho disponivel em excel, mas não vou usar mais o msm vou usar access e eu não sei programar em access isto, eu já consegui varios exemplos aqui no forum mas nenhum que me atenda no que preciso e tbm eu não entendo a linguagem do access :/ agradeço pelas ajudas.

Boa tarde, Daniela
Se pretende registar a data actual ao sair do Access, procure aqui no fórum, mas lembro-me de ter visto uma solução que
1 - ao abrir a bd, abre um formulário em modo escondido
2 - Nesse formulário tem código para, ao fechar, gravar a data actual na tabela ou em variável
3 - Como, para fechar o Access, tem de fechar o formulário garante que a data actual seja gravada

Ok Alexandre obrigada pelo retorno

Agora uma pergunta ao fechar ele vai armazenar a data atual então Ok
Mas ao abrir eu criei uma macro auto_open mas no access ela parece que não roda :/ teem alguma outra forma?

Boa tarde,
Veja se fez bem a macro AutoExec. A bd tem de abrir normalmente, sem a tecla alt pressionada

Alexandre

Estou fazendo conforme vc me orientou para gravar a ultima data, mas não esta aparecendo nada na minha caixa texto, me oriente onde estou errando por gentileza.

Se pretende registar a data actual ao sair do Access, procure aqui no fórum, mas lembro-me de ter visto uma solução que:
1 - ao abrir a bd, abre um formulário em modo escondido
Ok fiz o formulário em branco
2 - Nesse formulário tem código para, ao fechar, gravar a data actual na tabela ou em variável
Criei uma Caixa de texto e no evento ao fechar coloquei que tem que aparecer a ultima data nesta caixa de texto.
3 - Como, para fechar o Access, tem de fechar o formulário garante que a data actual seja gravada
Não está gravando a ultima data na minha Caixa de texto.

Boa tarde,
Disponibilize para se ver o que não está certo

Alexandre, Bom Dia

Segue modelo da planilha que eu estou usando.

//Criei uma caixa que receberá sempre a última data "Ao Sair" do formulário. Assim todos os dias o primeiro acesso que fizerem, a planilha irá verificar a data, caso seja diferente da data atual irá aparecer uma msg informativa, caso a data seja igual não acontece nada [isso assegura que se o usuario possa entrar e sair varias vezes do access e não apareça varias vezes a msg]

Agradeço desde já atenção dispensada.

Att

Boa tarde,
Andamos em ziguezague?
Disse que tinha feito um formulário para abrir em modo escondido. Não vejo nada
Agora indica o que tem, mas não expõe dúvida ou necessidade

Eu não te disse que tinha feito um formulário para abrir em modo escondido.
Você pediu para eu fazer assim, e eu não fiz.

Minha duvida é como faço para a caixa de texto gravar minha ultima data ao sair.

Como vc pode ver o que eu escrevi:

Sua pergunta: 1 - ao abrir a bd, abre um formulário em modo escondido
Minha resposta: Ok fiz o formulário em branco
Sua pergunta: 2 - Nesse formulário tem código para, ao fechar, gravar a data actual na tabela ou em variável
Minha resposta: Criei uma Caixa de texto e no evento ao fechar coloquei que tem que aparecer a ultima data nesta caixa de texto.

veja

Ok

Como eu faço para chamar a "TblUltimaData" em uma verificação, por exemplo:

If "TblUltimaData".Value <> Date Then
Msgbox "Não foi enviado o relatório diário, favor enviar", 0, "Aviso"
End If

É desta forma que devo chama-la?

If DLookup("UltimaData","TblUltimaData") <> Date Then
Msgbox "Não foi enviado o relatório diário, favor enviar", 0, "Aviso"
End If

Alexandre, muito Obrigada pela ajuda, e me desculpe por parecer não saber como me expressar e que realmente oque eu aprendi no access foi com vcs aqui do Forum e realmente este forum me ajudou muito, estão todos de Parabéns.

Muito Obrigada.

Abraços

Daniela

Mas resolveu? se sim, marque o "Resolvido"

Sim resolveu, mas não estou conseguindo marcar como resolvido, acho pq se trata de um tópico criado por outro usuário.

Certo, não me tinha apercebido
Abraço,