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


3 participantes

    [Resolvido]Enviar e-mail

    avatar
    brunag
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 27/06/2011

    [Resolvido]Enviar e-mail Empty Enviar e-mail

    Mensagem  brunag 27/6/2011, 12:01

    Pessoal, estou criando um banco de dados no Access para montar um pós-venda.

    Bom, eu quero gerar uma consulta com as datas das vendas e, ao clicar duas vezes no nomes da pessoa, o formulário seja preenchido com os dados da venda e do cliente. Depois disso, eu escolho entre o e-mail personalizado e o padrão, dependendo se o cliente é fidelizado ou não.

    A minha ideia seria de eu apertar no botão correspondente e abrir a mensagem no outlook com o nome da pessoa e a data da compra de cada cliente específico. Como eu crio essa rotina?
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  criquio 27/6/2011, 12:07

    Olá Bruna, seja bem vinda ao Máximo Access. Nós temos exemplos e tópicos resolvidos que envolvem tudo isso. Você já deu uma pesquisada? Conhece bem o vba a ponto de fazer os ajustes necessários nos exemplos? Se for o caso, talvez fosse melhor colocar aqui uma cópia do seu aplicativo seguindo as dicas da minha assinatura abaixo para darmos uma olhada ↓↓↓


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    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.

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  vieirasoft 27/6/2011, 12:15

    Bem vinda Bruna

    Veja se este exemplo ajuda

    http://dl.dropbox.com/u/8157744/Cereja.rar

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  vieirasoft 27/6/2011, 12:19

    Veja aqui também o preenchimento de campos

    http://maximoaccess.forumeiros.com/t1423-busca-por-cbo-e-com-funcao-dlookup

    E tem aqui um excelente tutorial do grande Allen Brown

    http://maximoaccess.forumeiros.com/t1533-funcao-dlookup-explicacao
    avatar
    brunag
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 27/06/2011

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  brunag 27/6/2011, 13:35

    Eu dei uma pesquisada, mas só achei tópicos sobre anexos, mandar e-mail para uma lista.. essas coisas. O que eu quero é mandar para várias pessoas, mas uma por vez, visto que o e-mail tem que conter o nome da pessoa e a data que ela realizou a compra. Eu não manjo muito de VBA, mas o meu colega, que está me ajudando, sabe bastante e pode resolver essa parte.

    Eu vou mandar em anexo o meu banco de dados.

    Outra coisa que não está funcionando é o preenchimento automático do formulário pós-venda quando eu seleciono o cliente. Eu quero que apareça a última compra que ele fez e que ainda não foi mandado o e-mail, ou seja, a data da remessa tem que estar em branco.

    Espero um retorno.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  vieirasoft 27/6/2011, 13:46

    Um dos exemplos que lhe enviei, mostra como preencher os campos através do nome do cliente. Penso que antes de enviara a BD, deve ver o funcionamento do exemplo e tentar adaptar.
    avatar
    brunag
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 27/06/2011

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  brunag 27/6/2011, 13:53

    Eu não consigo abrir na extensão .rar. Só tenho o zip.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  vieirasoft 27/6/2011, 13:54

    Não seja por isso, eu envio-lhe por ZIP. Aguarde por favor.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  vieirasoft 27/6/2011, 13:57

    http://dl.dropbox.com/u/8157744/Cereja.zip
    avatar
    Convidado
    Convidado


    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  Convidado 27/6/2011, 14:12

    Mais um exemplo...

    https://www.dropbox.com/s/noz42pbbieaxwwx/E-Mail.zip
    avatar
    brunag
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 27/06/2011

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  brunag 27/6/2011, 16:39

    Valeu pessoal.. já estou conseguindo enviar o e-mail.

    Mas tô com outro problema que tá meio impossível de resolver.
    Eu quero fazer isso: "The example involves a simple Access inventory database. The form contains a field for the General Contractor (GC). We have added a Double click event to the GC combo box field. If the user double clicks on the GC field then a new form opens displaying the detailed information for the selected general contractor. The VB code also demonstrates how to filter records with the openargs command line options." Mas não estou conseguindo abrir o arquivo modelo para ver. Alguém sabe fazer?

    O código "Private Sub Lista24_DblClick(Cancel As Integer)

    DoCmd.OpenForm "Formulário de Pós-venda", acNormal, , "CD_VENDA = " & Me.Lista24.Column(0)

    End Sub" NÃO ESTÁ FUNCIONANDO.

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  vieirasoft 27/6/2011, 16:44

    Veja o simples

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "NomeFormulário"

    stLinkCriteria = "[NomeCliente]=" & "'" & Me![NomeCliente] & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

    Este é um exemplo. Substituir NomeCliente pelo seu campo
    avatar
    brunag
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 27/06/2011

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  brunag 27/6/2011, 17:17

    Funcionou!!

    MUITO obrigada, mesmo!

    Agora o meu banco de dados tá perfeito Very Happy
    avatar
    brunag
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 27/06/2011

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  brunag 27/6/2011, 18:48

    Alguém sabe qual é a referência desse negócio no access 2007? Meu banco não tá rodando lá.

    visual studio 7 html Editor package 1.0 type Library
    avatar
    Convidado
    Convidado


    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  Convidado 27/6/2011, 18:58

    Ola Bruna, boa noite...

    Eu a aconselho abrir outro tópico com esta duvida pois a mesma distoa do que foi resolvido neste tópico, inclusive sera ate mais fácil para obter ajuda, pos todos terao acesso, como este topico ja esta sendo resolvido pelos mestres vieira e criquio os demais apesar de terem acesso a ele, por vezes não prestam atenção..

    se o assunto deste tópico foi resolvido eu acho melhor colocar o resolvido e abrir novo tópico com o novo problema..


    Bem.. é apenas uma ideia ok? não leve a mal..

    Explique melhor o que esta acontecendo...

    Saudações
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  vieirasoft 27/6/2011, 19:02

    Damos este por resolvido

    Conteúdo patrocinado


    [Resolvido]Enviar e-mail Empty Re: [Resolvido]Enviar e-mail

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 10:03