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

    Tirar Foto Webcam ou Camera Notbook direto do formulário do access

    avatar
    Eduardo Pires
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 08/02/2012

    Tirar Foto Webcam ou Camera Notbook direto do formulário do access Empty Tirar Foto Webcam ou Camera Notbook direto do formulário do access

    Mensagem  Eduardo Pires 21/7/2014, 19:35

    Boa tarde pessoal. Tenho um sistema que trabalho muito com fotografias do cliente. Tiramos a foto da webcam, salvamos numa pasta do servidor e depois faço uma referência para buscar a foto de um campo texto (caminho salvo) e converte em campo foto.

    Para inserir o caminho como campo texto e vincular no registro utilizo o seguinte código:
    Dim strCaminho As String, strPastaInicial As String
       strPastaInicial = "C:\Documents and Settings\Cliente\Desktop\fotos\imagens"
       strCaminho = Buscar(Me.hwnd, "Inserir foto", strPastaInicial, _
       "Arquivos gráficos (*.bmp; *.gif; *.jpg)" & vbNullChar & "*.bmp; *.gif; *.jpg")
       If Len(strCaminho) > 0 Then
           Me.localfoto1 = strCaminho
           Me.Foto1.Picture = Me.localfoto1
           Call cmdSalvar_Click
           End If

    Depois, para mostrar a foto na pasta, seja no botão "ao clicar" ou no evento "no atual", utilizo o seguinte código
    If IsNull(Me.localfoto1) = False Then
       Me.Foto1.Picture = ""
       Me.Foto1.Picture = Me.localfoto1
       Else
       Me.Foto1.Picture = ""
       End If

    Gostaria de saber se alguém sabe de um código ou tem um formulário do access que eu tire a foto do próprio access e já vincule automaticamente no campo após tirar a foto.


    Última edição por Eduardo Pires em 21/7/2014, 20:22, editado 1 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8498
    Registrado : 05/11/2009

    Tirar Foto Webcam ou Camera Notbook direto do formulário do access Empty Re: Tirar Foto Webcam ou Camera Notbook direto do formulário do access

    Mensagem  Alexandre Neves 21/7/2014, 19:39

    Boa tarde,
    Adeqúe o título. Escrever em maiúsculas significa gritar.


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    Eduardo Pires
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 08/02/2012

    Tirar Foto Webcam ou Camera Notbook direto do formulário do access Empty Re: Tirar Foto Webcam ou Camera Notbook direto do formulário do access

    Mensagem  Eduardo Pires 21/7/2014, 20:22

    ok Alexandre. Feito. Desculpe-me. Não foi a intenção. Forte abraço.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8498
    Registrado : 05/11/2009

    Tirar Foto Webcam ou Camera Notbook direto do formulário do access Empty Re: Tirar Foto Webcam ou Camera Notbook direto do formulário do access

    Mensagem  Alexandre Neves 21/7/2014, 21:49

    Certo. Aguardemos se algum colega conhece forma de fazer o que pretende


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    Tirar Foto Webcam ou Camera Notbook direto do formulário do access Empty Re: Tirar Foto Webcam ou Camera Notbook direto do formulário do access

    Mensagem  Noobezinho 21/7/2014, 22:39

    Eduardo

    Veja AQUI um exemplo

    Abraços

    Noob


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.

    Conteúdo patrocinado


    Tirar Foto Webcam ou Camera Notbook direto do formulário do access Empty Re: Tirar Foto Webcam ou Camera Notbook direto do formulário do access

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 14:08