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]Habilitar campo após envio de email.

    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Habilitar campo após envio de email. Empty [Resolvido]Habilitar campo após envio de email.

    Mensagem  Almeidar 22/10/2018, 13:54

    Bom dia!
    Olá meus amigos, tudo bem ?
    Mas uma vez peço a ajuda de vocês, estou com o seguinte problema.
    Criei um formulário com os colaboradores que estão com os contratos por vencer. E criei neste formulário com campo SIM/NÃO, onde se o mesmo for ser efetivado clica no botão e já abre a tela do outlook para o envio do emeail. Até ai esta tudo funcionando, o problema é que após o envio do email o campo SIM/NÃO ele fica bloqueado para clicar, só volta a ser habilitado quando fecho o formulário e abro de novo. Gostaria que assim que o email fosse enviado o campo voltasse a ser habilitado. Algum amigo poderia me ajudar ?
    Desde já agradeço a ajuda.
    Sidney
    Sidney
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 431
    Registrado : 08/10/2012

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Sidney 22/10/2018, 14:19

    Almeidar Bom dia!

    tente isso;


    Código:
    Me.nomdocampo.enabled = True

    att; Sidney
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Almeidar 22/10/2018, 14:54

    Opa!
    E testei mano, não sei se fiz correto!
    Vou colocar aqui como eu fiz e não funcionou. Logo abaixo tem o código para envio de email pelo outlook.

    rivate Sub Efetivado_Click()
    If Efetivado = não Then
    Me.Efetivado.Enabled = True
    Else
    Me.Efetivado.Enabled = False
    DoCmd.RunCommand acCmdSaveRecord
    DoCmd.RefreshRecord
    End If
    If Efetivado = -1 Then

    Dim rs As Recordset

    ' Atribuindo a aplicação ao outlook 2010 da microsoft office

    Set OutApp = CreateObject("Outlook.Application")

    ' Considerando email e senha para login

    OutApp.Session.Logon

    ' Comando VBA

    Set OutMail = OutApp.CreateItem(0)

    'Com OutMail Faça

    With OutMail

    .to = Email 'Nome do campo da tabela

    .Subject = "Colaborador efetivado"

    .CC = ""

    '.CCO = ""

    .Body = "Coloque aqui o testo do email."

    .display

    End With

    End If
    Sidney
    Sidney
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 431
    Registrado : 08/10/2012

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Sidney 22/10/2018, 15:52

    Almeidar, Não informou nenhuma mensagem de erro?

    att; Sidney
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Almeidar 22/10/2018, 15:53

    É ele não da erro, mas o campo SIM/NÃO fica bloqueado até que eu feche o abra o formulário de novo.
    Sidney
    Sidney
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 431
    Registrado : 08/10/2012

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Sidney 22/10/2018, 18:00

    Tem como mandar uma parte do seu projeto, assim vejo de fato oque esta acontecendo?

    att; Sidney
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Almeidar 22/10/2018, 18:02

    ok
    Segue bd, usuario claudio senha 170976.
    Quando abrir verá alguns colaboradores a serem efetivados, clicando em efetivar abrira a tela para envio de email. Após o envio do email gostaria que o campo SIM/NÃO voltasse habilitado para selecionar outro colaborador.

    Esta reclamando do tamanho, um momento
    https://drive.google.com/file/d/1Sm-Zo2mEL43z_1TP5sH-8FzlVzxVWLGN/view?usp=sharing



    Última edição por Almeidar em 22/10/2018, 18:28, editado 1 vez(es)
    Sidney
    Sidney
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 431
    Registrado : 08/10/2012

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Sidney 22/10/2018, 18:18

    o anexo não veio,

    att; Sidney
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Almeidar 22/10/2018, 18:28

    https://drive.google.com/file/d/1Sm-Zo2mEL43z_1TP5sH-8FzlVzxVWLGN/view?usp=sharing
    Sidney
    Sidney
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 431
    Registrado : 08/10/2012

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Sidney 22/10/2018, 19:05

    Almeidar,

    Nesta parte, na segunda linha, troque o não por 0(zero).

    Código:
    rivate Sub Efetivado_Click()
    If Efetivado = 0 Then
    Else

    e esqueça os camandos que te passei,

    att; Sidney
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Almeidar 22/10/2018, 19:32

    Olá meu amigo!
    Funcionou não. Após o envio do email o botão permaneceu bloqueado mesmo fazendo a alteração que vc me passou.
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Almeidar 22/10/2018, 21:36

    Olá meus amigos,
    Esse formulário em questão (for_admissão) ele esta baseado em cima de uma consulta (Cons_admissao). Poderia ser esse o motivo de eu não estar conseguindo que após eu clicar no botão SIM/NÃO e enviar o e-mail o botão Sim/NÃO fique habilitado de novo ? Já tentei de vários jeitos e não consegui achar a solução. O amigo Sidney me passou algumas orientações mas não consegui chegar a solução.
    O botão só habilita se eu fechar o for e abrir de novo.
    Sidney
    Sidney
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 431
    Registrado : 08/10/2012

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Sidney 23/10/2018, 01:33

    Almeidar,

    teste ai

    att; Sidney
    Anexos
    [Resolvido]Habilitar campo após envio de email. Attachmentatendimento.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.6 Mb) Baixado 26 vez(es)
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Almeidar 23/10/2018, 12:26

    Bom dia!
    Obrigado Sidney.
    Resolvido!

    Conteúdo patrocinado


    [Resolvido]Habilitar campo após envio de email. Empty Re: [Resolvido]Habilitar campo após envio de email.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 23/11/2024, 08:46