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]O sistema guarda a foto

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  crysostomo 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
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  crysostomo 18/2/2019, 20:54

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


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  Silvio 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
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  crysostomo 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 : Respeito às Regras 100%

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

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

    Mensagem  Silvio 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
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  crysostomo 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 : Respeito às Regras 100%

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

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

    Mensagem  Silvio 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
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  Mylton 21/2/2019, 18:42

    Vá a esse endereço...
    https://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
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  crysostomo 21/3/2019, 11:53

    Obrigado a vcs dei certo aqui.


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    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: 22/11/2024, 14:52