MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido] Enviar Relatório PDF por e-mail

    avatar
    devill_sfc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 20/11/2012

    [Resolvido] Enviar Relatório PDF por e-mail Empty [Resolvido] Enviar Relatório PDF por e-mail

    Mensagem  devill_sfc Sex 09 Ago 2013, 01:32

    Boa Noite.
    É o seguinte, tenho esse código que está funcionando no sistema que preciso.

    Código:
    Private Sub Comando60_Click()
    On Error Resume Next

        Dim stDocName As String
        Dim contact As String
        
        stDocName = "Relatório Consulta"
        contact = Me![Consultas].Form![CT_MAIL]
        DoCmd.SendObject acReport, stDocName, acFormatPDF, contact

    Exit_Comando60_Click:
        Exit Sub

    Err_Comando60_Click:
        Dim erro As String
        erro = MsgBox("Esse contato não possui e-mail cadastrado.", vbOKOnly)
        Resume Exit_Comando60_Click
        
    End Sub
    Funciona normal em 02 computadores! Tudo ok, 100%.
    Windows 7 SP1 e Windows XP + Windows Live mail.

    Agora tem outros 2 que não pegam de jeito nenhum!
    Fala que a ação ou comando 'enviar objeto' não está disponível no momento.

    Já tentei reinstalar o office, reinstalar o windows live mail, trocar a versão do office, trocar o cliente de e-mails.
    Não pega, alguém pode me responder porque ? as máquinas são iguais as outras que pegam...


    Obrigado,
    Att,
    Lucas.


    Última edição por devill_sfc em Sex 16 Ago 2013, 02:49, editado 1 vez(es)
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3880
    Registrado : 04/04/2010

    [Resolvido] Enviar Relatório PDF por e-mail Empty Re: [Resolvido] Enviar Relatório PDF por e-mail

    Mensagem  Avelino Sampaio Sex 09 Ago 2013, 04:54

    Só faltou dizer qual é a versão do Office que está falhando. 2003, 2007 ou 2010 ?

    2003 tem que usar programa exerno de PDF
    2007 só funciona a partir do Sp1. Baixe o Sp3 direto do site da Microsoft
    2010 funciona desde a primeira versão

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    devill_sfc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 20/11/2012

    [Resolvido] Enviar Relatório PDF por e-mail Empty Re: [Resolvido] Enviar Relatório PDF por e-mail

    Mensagem  devill_sfc Sex 09 Ago 2013, 11:53

    o office é a versão 2010,

    tentei trocar pra versão 2007, funcionou com erros (as vezes abrir a nova mensagem pra enviar, as vezes não).
    instalei o sp3 do 2007, piorou...ai que não funcionou mais, só aparece essa mensagem de erro.
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3880
    Registrado : 04/04/2010

    [Resolvido] Enviar Relatório PDF por e-mail Empty Re: [Resolvido] Enviar Relatório PDF por e-mail

    Mensagem  Avelino Sampaio Sex 09 Ago 2013, 12:38

    Qual é o programa de email padrão utilizado nessas máquinas que deu o erro ? Tem contas de email configuradas nessas máquinas ?

    Nas máquinas que funcionáram, quais os programas de email padrão utilizado ?

    Como teste, mantenha o programa padrão de email aberto e tente enviar



    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    devill_sfc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 20/11/2012

    [Resolvido] Enviar Relatório PDF por e-mail Empty Re: [Resolvido] Enviar Relatório PDF por e-mail

    Mensagem  devill_sfc Sex 09 Ago 2013, 15:45

    É o Windows Live Mail... última versão tanto no XP como no Seven.

    Quando mudei para o office 2007, antes de atualizar pro SP3, realizei um teste.
    Coloquei o programa padrão no XP sendo o Outlook Express e funcionou correto!

    Se eu volto pro Windows Live Mail, começam os problemas...

    Pra funcionar eu tenho que abrir o Windows Live Mail
    Abrir o Sistema no Access
    Clicar no botão para enviar e-mail (ele abre o Windows live mail mas não abre a nova mensagem).
    Se eu fechar o Windows Live Mail e clicar no botão, aí sim funciona.

    Porém não da pra ficar seguindo esses passos toda hora. No outlook express, funcionou ok!


    Valeu.
    avatar
    devill_sfc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 20/11/2012

    [Resolvido] Enviar Relatório PDF por e-mail Empty Re: [Resolvido] Enviar Relatório PDF por e-mail

    Mensagem  devill_sfc Sex 16 Ago 2013, 02:51

    fiz a troca pro Thunderbird + Office 2007 em todos os computadores. Funcionou perfeitamente, inclusive com as assinaturas em html que no Windows live mail não funcionava, não precisei modificar em nada o código. Por algum motivo o Windows live mail estava com incompatibilidade. Resolvido.

    Conteúdo patrocinado


    [Resolvido] Enviar Relatório PDF por e-mail Empty Re: [Resolvido] Enviar Relatório PDF por e-mail

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Sex 26 Abr 2024, 12:44