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]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

    MS Kid
    MS Kid
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 64
    Registrado : 22/01/2013

    [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA Empty [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

    Mensagem  MS Kid 25/8/2018, 19:25

    boa tarde!

    eu tenho uma tabela com algumas imagens salvas em um campo do tipo anexo. eu preciso carregar essas imagens em um controle do tipo imagem que está no formulário, via código VBA. alguma coisa está errado com o meu código.

    segue o código usado:
    Código:
    Private Sub btnTesteImagem_Click()
        Dim registro As DAO.Recordset

        Set registro = Me.Recordset

        Me.minhaImagem.Picture = registro.Fields("imagem").Value

        Set registro = Nothing
    End Sub
    quando eu rodo o código acima, ele gera o erro #13 ("Tipos incompatíveis"). quando eu tento passar o FileData para a imagem, ele gera o erro #2176 ("A configuração desta propriedade está muito longa.").
    Código:
    Me.minhaImagem.Picture = registro.Fields("figura").Value.Fields("FileData").Value
    fico grato por qualquer ajuda.

    obrigado.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7998
    Registrado : 15/03/2013

    [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA Empty Re: [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

    Mensagem  Alvaro Teixeira 29/8/2018, 08:45

    Olá Thor,

    Tem que gravar o ficheiro que necessita numa pasta temporária, depois elimina quando não é necessário.
    Não permite "carregar" diretamente da tabela de dados.

    Veja se ajuda:
    https://www.maximoaccess.com/t33634-exportar-anexos-de-uma-tabela

    Abraço
    MS Kid
    MS Kid
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 64
    Registrado : 22/01/2013

    [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA Empty Re: [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

    Mensagem  MS Kid 29/8/2018, 13:55

    tudo beleza, Alvaro?

    eu até sei que é possível exportar o arquivo da tabela e depois associá-lo ao controle do tipo imagem. eu queria mesmo era fazer isso direto no controle. to vendo que o melhor caminho é fazer isso que você está falando: salvar temporariamente e depois deletar o arquivo.

    obrigado pela ajuda.

    ps: gostaria de compartilhar com todos como fazer classe estática no VBA que não precisa ser declarada, onde eu uso como variáveis globais estáticas. é só escrever o nome da classe (em qualquer lugar do projeto) e apertar ponto (.) que aparecerão as propriedades na lista drop-down, retornando valores estáticos. muito bom.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7998
    Registrado : 15/03/2013

    [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA Empty Re: [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

    Mensagem  Alvaro Teixeira 30/8/2018, 17:37

    Olá Thor,

    Eu desconheço da forma que pretende e creio não ser possível.

    Quanto à "classe" seria ótimo, poderia carregar os ficheiros para a pasta %temp%\NomeSeuApp

    Para não gastar muito código na eliminação, ao sair do aplicativo executava o eliminar da pasta temporária.

    Se vier a dedenvolver essa classe, o fórum agradece a partilha.

    Abraço
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA Empty Re: [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

    Mensagem  DamascenoJr. 21/3/2020, 17:48

    MS Kid, resolveu sua questão?

    Se sim, dê o tópico por finalizado editando e marcando-o como resolvido.

    bounce


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    MS Kid
    MS Kid
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 64
    Registrado : 22/01/2013

    [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA Empty Re: [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

    Mensagem  MS Kid 27/3/2020, 19:57

    obrigado pessoal!

    Conteúdo patrocinado


    [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA Empty Re: [Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/12/2024, 16:38