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

    Erro de compilação

    Compartilhe
    avatar
    Clecio Oliveira
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 17/08/2015

    Erro de compilação

    Mensagem  Clecio Oliveira em 14/12/2018, 11:48

    Prezados, estou tentando um programa enviado por um amigo JPaulo, um controle de refeitório e está dando a seguinte mensagem:
    "Erro de compilação, na expressão de consulta '((([tbl_cadastro horas entrada].data)=Date() AND (([tbl_cadastro horas entrada]. Def) like [Formulários]![Marcação Barras]![Def] & "*")'.

    Alguém pode me ajudar?.
    good guy
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1248
    Registrado : 05/02/2010

    Erro de compilação

    Mensagem  good guy em 14/12/2018, 13:30

    Olá Clecio,

    Poste o bd com o problema mencionado.
    avatar
    Clecio Oliveira
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 17/08/2015

    Re: Erro de compilação

    Mensagem  Clecio Oliveira em 28/12/2018, 12:26

    Amigo, ver se com este arquivos você consegue me ajudar.
    Anexos
    Refeição.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (360 Kb) Baixado 1 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 652
    Registrado : 13/12/2016

    Re: Erro de compilação

    Mensagem  Alexandre Fim em 28/12/2018, 12:45

    O seu Access é 64 bits?

    Se for, no código do formulário FrmCadastro, voce deve colocar o "PtrSafe" na declaração:


    Private Declare PtrSafe Function SendMessage Lib "user32" Alias "SendMessageA" _
    (ByVal hWnd As Long, ByVal wMsg As Long, _
    ByVal wParam As Long, lParam As Any) As Long

    Private Declare PtrSafe Function GetFocus Lib "user32" () As Long

    Em seguida, vá ao menu Depurar>>Compilar Database2
    Obs: Ao tentar compilar a aplicação, vai gerar outro erro: uma variável global que não foi localizada. É necessário declará-la (Global as )

    Espero ter ajudado.

    Boa sorte
    avatar
    Clecio Oliveira
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 17/08/2015

    Re: Erro de compilação

    Mensagem  Clecio Oliveira em 29/12/2018, 01:31

    Alexandre, obrigado pela ajuda, ainda sou leigo em access, como devo fazer para inderir os códigos e declarar?

      Data/hora atual: 26/3/2019, 14:58