MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Capturar imagem

    Compartilhe

    Carlos Ilha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 08/11/2009

    [Resolvido]Capturar imagem

    Mensagem  Carlos Ilha em Sab 17 Jul 2010, 14:32

    Tenho um formulário, no qual existe um campo FOTO. Gostaria de saber se é possível que quando clicasse nele, ele capturasse a imagem da webcam. É um formulário de cadastro e precisso iserir fotos.
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11231
    Registrado : 30/12/2009

    Re: [Resolvido]Capturar imagem

    Mensagem  criquio em Sab 17 Jul 2010, 14:48

    Sim, é possível. Para isso, você deverá usar um componente da própria camera ou instalar um compatível, uma dll, ocx, algo do gênero, e depois fazer as configurações e programação necessária para que o mesmo funcione.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


    Carlos Ilha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 08/11/2009

    Re: [Resolvido]Capturar imagem

    Mensagem  Carlos Ilha em Sab 17 Jul 2010, 15:13

    O equipamento já está instalado, mas ao dar o clique é aberto o localizador de imagens do windons. Gostaria que abrisse o progrma da camera.
    avatar
    vieirasoft
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7124
    Registrado : 11/05/2010

    Re: [Resolvido]Capturar imagem

    Mensagem  vieirasoft em Sab 17 Jul 2010, 22:46

    Amigo

    Veja se este exemplo ajuda. Se ajudar retorne.

    [Você precisa estar registrado e conectado para ver este link.]

    Abraço
    Anexos
    CamaraWeb.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (274 Kb) Baixado 38 vez(es)

    Carlos Ilha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 08/11/2009

    Re: [Resolvido]Capturar imagem

    Mensagem  Carlos Ilha em Dom 18 Jul 2010, 01:11

    vieieasoft
    Perfeito, era isso que eu estva procurando, muito obrigado
    avatar
    vieirasoft
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7124
    Registrado : 11/05/2010

    Re: [Resolvido]Capturar imagem

    Mensagem  vieirasoft em Dom 18 Jul 2010, 12:54

    Valeu amigo se precisar apite

    Este tópico pode ser encerrado

    Carlos Ilha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 08/11/2009

    Re: [Resolvido]Capturar imagem

    Mensagem  Carlos Ilha em Seg 19 Jul 2010, 01:09

    vieieasoft
    No meu PC está dando erro 439, quando clico no botão fotografar do formulário Imagenes. Será que preciso habilitar alguma referência? Uso Access 2007.
    avatar
    vieirasoft
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7124
    Registrado : 11/05/2010

    Re: [Resolvido]Capturar imagem

    Mensagem  vieirasoft em Seg 19 Jul 2010, 01:13

    Abra o formulário em modo de código aponte para tools references e verifique se existe alguma Missing. Não tenho aqui o 7 para experimentar, mas é o mais provável.

    Carlos Ilha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 08/11/2009

    Re: [Resolvido]Capturar imagem

    Mensagem  Carlos Ilha em Qui 29 Jul 2010, 16:59

    vieieasoft
    Ainda não consegui
    avatar
    vieirasoft
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7124
    Registrado : 11/05/2010

    Re: [Resolvido]Capturar imagem

    Mensagem  vieirasoft em Qui 29 Jul 2010, 17:16

    Amigo

    No 2003 funfa bem, mas aqui vai material que ´so visto:

    [Você precisa estar registrado e conectado para ver este link.]

    jefersonkuntz
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 27/12/2012

    Re: [Resolvido]Capturar imagem

    Mensagem  jefersonkuntz em Ter 05 Jul 2016, 21:39

    o link está okk

    profjoabe
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 10/01/2017

    Link Atuaizado

    Mensagem  profjoabe em Qua 18 Jan 2017, 11:35

    Prezados Boa tarde;

    preciso do Código atualizado para versão 64bts. tem como disponibilizar???

    Windows 10 + Access 2010. preciso muito do exemplo de como tirar uma foto com a câmera do Notebook;

    Obrigado;

    Att.

    Joabe SOusa cheers
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Capturar imagem

    Mensagem  Alexandre Neves em Dom 22 Jan 2017, 17:25

    Boa tarde, profjoabe
    Não use o título para mensagem


    .................................................................................
    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
    Styluss
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 40
    Registrado : 21/05/2014

    Capturar imagem

    Mensagem  Styluss em Sex 24 Fev 2017, 22:23

    Olá

    Tentei utilizar o app, mas está aparecendo um erro de compilação - tipos incompatíveis em "MyStatusCallback" no código abaixo:

    Código:

    Private Sub Form_Open(Cancel As Integer)
    Dim lpszName As String * 100
    Dim lpszVer As String * 100
    Dim Caps As CAPDRIVERCAPS
    capGetDriverDescriptionA 0, lpszName, 50, lpszVer, 50
    lwndC = capCreateCaptureWindowA(lpszName, WS_CAPTION Or WS_THICKFRAME Or WS_VISIBLE Or WS_CHILD, 0, 0, 160, 120, Me.hwnd, 0)
    SetWindowText lwndC, lpszName
    capSetCallbackOnStatus lwndC, AddressOf MyStatusCallback
    capSetCallbackOnError lwndC, AddressOf MyErrorCallback
    If capDriverConnect(lwndC, 0) Then
    capDriverGetCaps lwndC, VarPtr(Caps), Len(Caps)
    capPreviewScale lwndC, True
    capPreviewRate lwndC, 66
    capPreview lwndC, True
    ResizeCaptureWindow lwndC
    End If
    End Sub

    Podem ajudar com este problema?


    .................................................................................
    Gilberto Moreira. ( Styluss )    -    A dúvida é o principio da sabedoria. (Aristóteles)
    Access 2013 - Windows 7 Home Premium - 64 Bits

      Data/hora atual: Qui 30 Mar 2017, 19:39