enviar formulario/relatório por email

Olá Anderson, boa noite.

Você executou o exemplo que disponibilizei ou já tentou adapta-lo a algum projeto seu?

Outra, qual a versão de seu access?

De qualquer forma, tente esse abaixo, é o mesmo mas como diz a propaganda: Vai que...

Bom dia wsenna,

Com a nova cópia deu certo o envio, porém foi sem alterar o e-mail e senha do remetente.

na primeira cópia eu tinha alterado tal dados e provavelmente fiz algo errado   

Vou tentar de novo e muito obrigado pelo tempo disposto a ajudar a minha pessoa, e peço desculpas ao amigo javs2608 por ter usado seu tópico, "alias, a guantas anda sua duvida amigo javs2608???".


Att,

Olá Anderson, bom dia.

Amigão veja isto:

With vFields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com" 'pode ser usado outro smtpserver
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465 ' existem outros smtpserverport. verifique na internet
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "SeuEmail@gmail.com"
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "SuaSenha"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

.
.
.
.
.From = """SeuEmail@gmail.com"" " 'mude para o seu e-mail

Altere os campos em negrito e em azul, valew?

Outro detalhe, a configuração acima está pronta para o Gmail caso pretenda utilizar outro smtpserverport terá que procurar a porta correta porém lembre-se que nem todos os provedores de e-mail são compatíveis com o sistema CDO ou dão uma mão de obra tremenda para serem configurados, portanto, mais fácil é você criar um e-mail no Google Gmail e fazer apenas as alterações acima.


Abraços, WSenna

Trabalho em uma empresa que tem domínio próprio "dieselbrax.com.br", pensei poder usa-lo, mas seguirei teu conselho.

   Um grande abraço.

Bom Dia,

Primeiro queria dar parabens pelo conteúdo e explicações do forum.
Estou realizando minhas primeiras implementações em Access e o site tem sido muito util.

Queria aproveitar ainda para perguntar se é possível enviar email com um relatório sempre que atualizado um campo de uma tabela.

Agradeço antecipadamente

senhores, desculpa minha ignorância, mas gostaria de uma tratativa de erro, no ".send", do tipo que se os parâmetros de envio estiver errado ele informe na tela.