MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]PDF / Email ajuda Jpaulo ?

    Compartilhe
    avatar
    Gilberto Rocha
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1021
    Registrado : 21/01/2010

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  Gilberto Rocha em Ter 23 Ago 2011, 13:25

    Amigo, se está dando tantos erros assim, seria ideal reinstalar seu Office e os service paks para sua versão.


    Última edição por topbr em Ter 23 Ago 2011, 23:12, editado 1 vez(es)
    avatar
    vieirasoft
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7136
    Registrado : 11/05/2010

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  vieirasoft em Ter 23 Ago 2011, 13:31

    OK, companheiro, mas estou aqui para ajudar no que precisar.

    -------------------------------------------------------------------------------
    Aqueles que imaginam que um político seria um melhor chefe de estado que um monarca hereditário, talvez devessem dar-se ao trabalho de conhecer mais políticos.
    Margaret Thatcher

    Naldo
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 376
    Registrado : 16/02/2011

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  Naldo em Ter 23 Ago 2011, 13:45

    Sei que ão é minha instalação Topbr, mas sou muito grato pela dica.

    Vieira, vou dar um geral em um exemplo que o Criquio me passou, caso tenha dúvidas dou um grito pra vc's.

    Sou grato pela atenção, QUE DEUS ILUMINE NOSSAS MENTES.

    Convidad
    Convidado

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  Convidad em Ter 23 Ago 2011, 19:48

    O problema está mesmo no seu office 2003, atualize-o e instale o sp3.

    rnominato
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 18/02/2012

    AJUDA

    Mensagem  rnominato em Seg 20 Fev 2012, 03:58

    PREZADOS,

    ESTOU TENTANDO UTILIZAR UM CÓDIGO QUE OBTIVE NO FORUM, ENTRETANTO, NÃO OBTIVE SUCESSO QUANDO VOU UTILIZO ESTE MESMO CÓDIGO QUANDO TENHO COMO A FONTE DE REFERÊNCIA UMA CONSULTA. QUANDO É TABELA FUNCIONA NORMAL. O CÓDIGO SEGUE ABAIXO:

    Dim rst As DAO.Recordset
    Dim strDestinatarios
    Dim strTitulo
    Dim strMensagemCorpoDoEmail

    Set rst = CurrentDb.OpenRecordset("CONS_EMPRESAS") - O ERRO OCORRE NESTA LINHA E É INFORMADO QUE OS PARÂMETROS SÃO INSUFICIENTES

    Do Until rst.EOF
    strDestinatarios = strDestinatarios & rst("E-MAIL 1") & ";"
    rst.MoveNext
    Loop


    strDestinatarios = Left(strDestinatarios, Len(strDestinatarios) - 1)
    strTitulo = "teste"
    strMensagemCorpoDoEmail = "Obrigado"

    On Error Resume Next
    DoCmd.SendObject , , , "resp1@energy.com.br;resp2@energy.com.br", Me.SOCILITANTE.Value, strDestinatarios, strTitulo, strMensagemCorpoDoEmail, True, True

    rst.Close
    Set rst = Nothing

    ALGUEM PODERIA ME AJUDAR? PRECISO FILTRAR UM CAMPO COM MULTIPLOS VALORES. DESTA FORMA ACHEI QUE UTILIZANDO A QUERY SERIA MAIS FÁCIL.

    MUITO OBRIGADO.

    ABS.
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9552
    Registrado : 04/11/2009

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  JPaulo em Seg 20 Fev 2012, 09:36

    Ola seja bem vindo ao fórum.

    Atenção às regras, não pode postar tudo em letra maíuscula, leia as regras por favor.

    [Você precisa estar registrado e conectado para ver este link.]

    Para a sua duvida:
    Altere a sua linha em erro por esta;

    Set rst = CurrentDb.OpenRecordset("SELECT * FROM CONS_EMPRESAS")





    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    rnominato
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 18/02/2012

    AJUDA

    Mensagem  rnominato em Seg 20 Fev 2012, 13:41

    Prezado JPaulo,

    Obrigado pelas boas vindas. Faço o pedido de desculpa por ter enviado as mensagens em maiúscula, não havia lido as regras. Desculpe-me mais uma vez.

    A respeito do alteração de código sugerida acabei tendo o mesmo problema. Ele me informa que estou com erro na linha:

    Set rst = CurrentDb.OpenRecordset("SELECT *FROM CONS_EMPRESAS")

    Como mensagem de erro fala que os parâmetros esperados são insuficientes. Eram esperados 1. Erro tempo de execução "3061". Novamente se testo a tabela empresas o código funciona corretamente, mas como preciso de filtrar os e-mails nesta tabela isto não me atende.

    Jpaulo, vc poderia me dar alguma sugestão?

    Agradeço mais uma vez a disponibilidade de me ajudar.

    Grato,
    Rnos




    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9552
    Registrado : 04/11/2009

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  JPaulo em Seg 20 Fev 2012, 14:38

    Funciona exatamente como lhe disse, Select * from

    Veja se o nome da sua consulta está correto na instrução do VBA, se for necessario faça F2 em cima da sua consulta e copie o nome para o VBA.



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    rnominato
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 18/02/2012

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  rnominato em Seg 20 Fev 2012, 16:02

    Prezado JPaulo,

    Continuo apanhando aqui. Até consegui resolver meu problema, mas não ficou muito bacana.

    Estou com problemas para ler consultas, esta que é a verdade.

    Eu resolvi o problema da seguinte maneira, fiz a consulta gravar os dados e atualizar uma tabela toda vez que eu necessito. A partir dai pego os dados da tabela e coloco no e-mail.

    Ele até leu a linha de códgio que estava com o problema agora JPaulo, entretanto, tive problemas com outra linha:

    strDestinatarios = strDestinatarios & rst("E-MAIL 1") & ";"

    Nesta linha ele fala que o item não pode ser encontrado. Você tem alguma sugestão neste caso?

    Valeu mais uma vez.

    Abs.


    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9552
    Registrado : 04/11/2009

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  JPaulo em Seg 20 Fev 2012, 17:05

    Vamos lá...

    Repare que todos os erros que tem apresentado, estão relacionados apenas com os nomes ou da consulta ou dos campos, ou os espaços nos proprios nomes;

    teste entre parentesis retos e veja tambem se esse nome é o correto;

    strDestinatarios = strDestinatarios & rst("[E-MAIL 1]") & ";"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    rnominato
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 18/02/2012

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  rnominato em Seg 20 Fev 2012, 21:36

    Obrigado JPaulo. Acredito que pode ser uma falta de experiência minha. Estarei testando para reparar este erro.

    Muito obrigado mesmo pela força.

    Abs.

    l_marcce
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 37
    Registrado : 18/09/2012

    Desencavando o morto.... rs....

    Mensagem  l_marcce em Sex 21 Set 2012, 03:17

    Pessoal...
    Eu só preciso criar o PDF para ser armazenado no computador e em BackUp...
    Não preciso que seja enviado nada por e-mail...
    Até porque, odeio o "outloko"... rs...
    Como fazer para apenas criar o PDF e armazená-lo em alguma pasta???
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9552
    Registrado : 04/11/2009

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  JPaulo em Sex 21 Set 2012, 08:50

    Luis bom dia !

    Depende da versão do seu Access.

    O 2007 já traz de base o exportar para PDF.

    Para o 2000/2003, tem aqui mesmo códigos para isso.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    l_marcce
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 37
    Registrado : 18/09/2012

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  l_marcce em Sex 21 Set 2012, 12:32

    OI JP!!!! Bom dia...
    Eu uso o 2010, com base no 2007... 64Bits (quase que eu me ferro... rs...) Fui colocar o sisteminha feito no 64Bits no PC do cliente... E NÃO RODOU!!!! Rs...
    Ainda bem que a máquina dele aceita 64... aproveitei e fiz o cliente instalar o Seven 64...

    Bom... voltando ao papo original...
    Eu baixei os que eu achei aqui no forum, para dar uma estudada.... más fiquei na mesma, pois não localizei onde é que faz a "exportação" para pdf nos módulos...
    Lembrando que só preciso mesmo dos PDF para fins de BackUp, pois o relatório criado dentro do Access já funciona perfeitamente para a impressão...
    Aproveitando, tô criando um novo tópico na área de tabelas, sobre a criação de uma para fins de cobrança... se puder dar uma força lá...
    Brigadão, desde já...
    Abraços... e novamente, bom dia (apesar de nublado... rs...)

    l_marcce
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 37
    Registrado : 18/09/2012

    Não acredito no que aconteceu!!!!

    Mensagem  l_marcce em Sex 21 Set 2012, 16:38

    Gente... nem respondam mais aqui...
    Olha só a encrenca que deu no cliente:

    [Você precisa estar registrado e conectado para ver este link.]

    Não sei nem o que fazer, para não ter que refazer tudo o que já está feito... Shocked Evil or Very Mad Crying or Very sad

    everson.c
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 22/11/2013

    Usando Gmail

    Mensagem  everson.c em Sex 22 Nov 2013, 10:43

    Bom Dia Paulo

    Achei muito interessante o programa em Access para envio de e-mail, uma ferramenta muito pratica, porém ele utiliza o Outlook, eu não uso essa ferramenta, utilizo o live mail ou diretamente no site gmail, como faço para que ele funcione?

    Abç

    Everson
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11234
    Registrado : 30/12/2009

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  criquio em Sex 22 Nov 2013, 11:01

    Everson, seja bem vindo ao fórum!

    Acredito que para o seu caso seria mais prático enviar via CDO, que não depende de cliente de email. Dê uma pesquisada no fórum.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9552
    Registrado : 04/11/2009

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  JPaulo em Sex 22 Nov 2013, 11:46

    É isso ae como o Criquio diz, para Gmail outro, utilize CDO;

    Veja se ajuda;

    [Você precisa estar registrado e conectado para ver este link.]



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    everson.c
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 22/11/2013

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  everson.c em Sex 22 Nov 2013, 11:56

    Vlw Pessoal vou dar uma pesquisada!!! logo lhes dou um retorno

    Abç

    rafaelbatistadasilva
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 24/02/2014

    ACCESS

    Mensagem  rafaelbatistadasilva em Qui 23 Jul 2015, 21:44

    Muito obrigado pelas explicações e exemplos.
    avatar
    pcbr
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 01/04/2016

    Re: [Resolvido]PDF / Email ajuda Jpaulo ?

    Mensagem  pcbr em Sex 02 Jun 2017, 01:39

    Bom dia!

    Link do Exemplo quebrado!

    Alguém poderia compartilhar comigo esse exemplo do JPaulo em um link ativo? Infelizmente tentei pelo link que o mesmo postou, mas esta quebrado.

    Dese já agradeço!

    Paulo

      Data/hora atual: Seg 25 Set 2017, 10:39