MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Transferir imagem de uma tabela para uma pasta

    avatar
    sergio de paula
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/04/2020

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  sergio de paula em 12/7/2020, 00:27

    Tenho alguns projetos que usam imagem que vinha colocando em tabelas como objeto OLE. Porém descobri aqui no forum uma maneira de selecionar a imagem e armazenar na tabela somente o endereço dela, o que diminui muito o tamanho do arquivo. Agora gostaria de encontrar uma maneira de "desanexar" as imagens armazenadas nas tabelas para usar o outro processo. Alguém sabe como fazer para "exportar" as imagens para uma pasta ?
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty Re: [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  ahteixeira em 12/7/2020, 10:04

    avatar
    sergio de paula
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/04/2020

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty transferir imagem de uma tabela para uma pasta

    Mensagem  sergio de paula em 12/7/2020, 17:01

    Caro Teixeira,

    Parece que o caminho é próximo ao que você indicou porém, mesmo fazendo as adaptações sugeridas pelo Maicon, eu não consigo visualizar a imagem. Não sei se entendi, mas incorporei as duas funções e coloquei a seguinte sub :
    Private Sub Salvar_foto_Click()
    BlobToFile "F:\pastas acess\fotos usos\Image-in.jpg", foto
    FileToBlob "F:\pastas acess\fotos usos\Image-in.jpg", foto
    BlobToFile "F:\pastas acess\fotos usos\Image-Out.bmp", foto
    End Sub

    Tem algum erro ?

    Obrigado !!
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty Re: [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  ahteixeira em 12/7/2020, 18:01

    Olá Sérgio Paula,,

    Monte um pequeno exemplo do que tem e pretende fazer.
    Partilhe a base de dados.
    Assim fica mais facil para compreender o que está a fazer e também para poder ajudar.

    Abraço
    avatar
    sergio de paula
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/04/2020

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty transferir imagem de uma tabela para uma pasta

    Mensagem  sergio de paula em 12/7/2020, 18:51

    Olá, Teixeira,

    Como expliquei na abertura do tópico, tenho a imagem incorporada na tabela como objeto OLE, quero saber uma maneira de "desincorporar", colocando estas imagens numa pasta. Tipo c:\projeto\fotos. "Só" isso !! A foto está na tabela fotos, objeto fotos.ole, quero exportá-la para C:\projetos\fotos\imagem.jpg (ou outra extensão qualquer) !! Isto porque a foto, incorporada, aumenta muito o tamanho do projeto e, se eu tiver um campo tipo : me!caminho = c:C:\projetos\fotos\imagem.jpg o projeto fica muito mais leve !!
    As imagens foram resultado de pesquisas, usando a metodologia corta e cola !! Não dá para recuperar os locais de onde foram retiradas !!
    A solução que vc me passou "funcionaria", mas o visualizador de imagens do windows não consegue abrir a imagem diz que não oferece suporte para o formato de arquivo o Paint idem. (opero com windows 7 32 bits)
    Espero ter esclarecido !! Obrigado pela atenção !


    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty Re: [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  ahteixeira em 12/7/2020, 19:43

    Olá Sérgio,

    Estou no celular, o exemplo era para ser mais facil para qualquer membro ajudar.
    No entanto veja neste topico se ajuda:

    https://www.maximoaccess.com/t23187-fotos-em-fomulario-continuo-access-2003

    Abraço
    avatar
    sergio de paula
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/04/2020

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty transferir imagem de uma tabela para uma pasta

    Mensagem  sergio de paula em 12/7/2020, 21:44

    Olá Teixeira,

    A metodologia usada nos exemplos que você mandou por último eu já tenho. E estou querendo usá-la mas, antes, preciso colocar as imagens (que estão na tabela) em um ficheiro.

    obrigado !
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty Re: [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  ahteixeira em 13/7/2020, 00:27

    Olá Sérgio Paula,

    Vai ter que começar a por a mão na massa.
    Se tiver dificuldades, disponibilize exemplo e código para se trabalhar.

    Abraço
    avatar
    sergio de paula
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/04/2020

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty transferir imagem de uma tabela para uma pasta

    Mensagem  sergio de paula em 13/7/2020, 01:56

    Olá, Teixeira ! Eu acho que vc não entendeu !! A parte que você me mandou é posterior à solução que preciso !! Como tirar as imagens da tabela e colocar no ficheiro? Os exemplos dados são de como tirar do ficheiro e colocar na tabela !!
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty Re: [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  ahteixeira em 13/7/2020, 12:51

    Olá Sérgio Paula,

    Assim sendo a solução está na mensagem nº 2.

    Se tiver dificuldades, partilhe uma base de dados com a tabela envolvida na questão com 1 ou dois registos de amostragem para se testar.

    Abraço
    avatar
    sergio de paula
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/04/2020

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty transferir imagem de uma tabela para uma pasta

    Mensagem  sergio de paula em 13/7/2020, 17:00

    Sim !! Mas veja o tópico 3 !
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty Re: [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  ahteixeira em 14/7/2020, 10:09

    Olá Sérgio Paula,

    Sim, já vi a mensagem nº 3 e está a fazer conforme a indicação do tópico que mencionei.
    Acontece que não está a conseguir e estou disposto ajudar, no entanto não se não disponibilizar o que tem para se verificar e poder ajustar não sei como quer ajuda.

    Poderia fazer um exemplo, mas o tempo que vou perder a fazer posso ajudar outros membros mais colaborativos.
    Está nas suas mãos.

    Abraços e boa sorte
    avatar
    sergio de paula
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/04/2020

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty Re: [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  sergio de paula em 14/7/2020, 15:59

    Olá Teixeira,

    Eu já disponibilizei tudo o que era para disponibilizar, mas parece que vc não conseguiu entender. De qualquer maneira, obrigado pela tentativa.
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Transferir imagem de uma tabela para uma pasta Empty Re: [Resolvido]Transferir imagem de uma tabela para uma pasta

    Mensagem  ahteixeira em 17/7/2020, 16:02

    Olá Sérgio Paula,

    Ficamos assim, abraço e bons estudos com o MaximoAccess.

    cheers

      Data/hora atual: 2/12/2020, 16:36