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


    [Resolvido]O sistema guarda a foto

    crysostomo
    crysostomo
    Super Avançado
    Super Avançado

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 879
    Registrado : 23/01/2018

    [Resolvido]O sistema guarda a foto Empty [Resolvido]O sistema guarda a foto

    Mensagem  crysostomo em 4/2/2019, 23:28

    Amigos boa noite. ja percorri o forum , mas não consigo adaptar no codigo.
    Quero que o sistema guarda a foto
    Código:
    Private Sub inserirfotos_Click()
    Dim s As String
    s = OpenCommDlg()
    If s <> "" Then
        foto = s
        foto_AfterUpdate
     
     End If
    End Sub
    Private Sub Form_Current()

    foto_AfterUpdate

    End Sub
    Private Sub foto_AfterUpdate()

    Dim s As String
    s = Nz(foto.Value, "")
    If s <> "" Then s = IIf(Dir(s) = "", "", s)
    On Error Resume Next
    Imagem3.Picture = s
    If err.Number <> 0 Then Imagem3.Picture = ""
    On Error GoTo 0
    End Sub
    crysostomo
    crysostomo
    Super Avançado
    Super Avançado

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 879
    Registrado : 23/01/2018

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  crysostomo em 18/2/2019, 20:54

    tentando encontrar, mas não obtenho sucesso
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4416
    Registrado : 20/04/2011

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  Silvio em 19/2/2019, 11:18

    Não entendi,...

    Quero que o sistema guarda a foto


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    crysostomo
    crysostomo
    Super Avançado
    Super Avançado

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 879
    Registrado : 23/01/2018

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  crysostomo em 19/2/2019, 18:49

    Olá, Silvio .
    Eu queria que o sistema guardasse a foto adicionada.
    Eu busquei por aqui mas não consegui.
    Encontrei um meio de fazer isso,mas tem que ativar uma referência Microsoft Libery 11 , mas o meu VBA não tem essa referência.
    Eu queria uma ajuda de uma código entre esse aí de cima para o sistema fazer uma pasta para guarda as fotos ou guarda na própria pasta do sistema.
    O motivo disso é se um dia o usuário for trocar de computador ou formatar ele vai ter que adicionar todas as fotos de novo porque o caminho das fotos vao continuar os caminhos antigos.
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4416
    Registrado : 20/04/2011

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  Silvio em 20/2/2019, 10:45

    Bom dia....

    O ideal é ter uma pasta onde guardar as fotos e não dentro do sistema.

    Em uma tabela qualquer, haverá o caminho onde o sistema irá "pegar" a foto.

    Vou ver se encontro algo aqui no meus alfarrábios e te mando.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    crysostomo
    crysostomo
    Super Avançado
    Super Avançado

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 879
    Registrado : 23/01/2018

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  crysostomo em 20/2/2019, 10:51

    Entendi. Mas o objetivo é ele ter uma pasta de fotos. Ou seja ele pode pegar as foto de quiser lugar, mas guarda essas fotos em uma pasta do sistema . Para que quando for mudar de PC o caminha na tabela continua o mesmo para não refazer tudo de novo
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4416
    Registrado : 20/04/2011

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  Silvio em 21/2/2019, 17:25

    Ele não guarda as fotos no ou dentro do sistema.

    Fica apenas armazenado o caminho ( local ) onde está a foto.

    Aqui no fórum temos vários exemplos disso no repositório, basta dar uma boa olhada que vai achar.

    Abraços.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 703
    Registrado : 23/08/2010

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  Mylton em 21/2/2019, 18:42

    Vá a esse endereço...
    http://www.maximoaccess.com/t6596-resolvidobd-com-fotos-no-formulario
    baixe exemplo msg 6.
    Acredito que seja isso que deseja.
    Estude e adapte.
    Abs
    crysostomo
    crysostomo
    Super Avançado
    Super Avançado

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 879
    Registrado : 23/01/2018

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  crysostomo em 21/3/2019, 11:53

    Obrigado a vcs dei certo aqui.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    Conteúdo patrocinado

    [Resolvido]O sistema guarda a foto Empty Re: [Resolvido]O sistema guarda a foto

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 24/8/2019, 23:38