Problema para inserir foto

Boa Tarde!

Estou novamente aqui recorrendo a ajuda de vocês, pois estou com alguns problemas no desenvolvimento de um formulário de acesso de colaboradores:

1º Ponto: No formulário "Frm_Controle de Acessos" - Não estou conseguindo inserir a foto, porém, gostaria de inserir em uma pasta à parte para não pesar o arquivo.
2º Ponto: Será utilizado uma CAM na porta para captura a imagem, o que você sugere?

Código:

Private Sub btn_inserir_foto_Click()
Dim strLocalFoto$, strNomeFoto$, strPastaOrigem$, strPastaDestino$
If Me.NewRecord Then DoCmd.RunCommand acCmdSaveRecord
strLocalFoto = fncLocalizarArquivo
If strLocalFoto = "" Then Exit Sub
strNomeFoto = Mid(strLocalFoto, InStrRev(strLocalFoto, "\") + 1)
CurrentDb.Execute "UPDATE Cadastro de Acessos SET NomeFoto= '" & strNomeFoto & "' WHERE txt_n_doc = " & Me!txt_n_doc & ";"
strPastaOrigem = Mid(strLocalFoto, 1, InStrRev(strLocalFoto, "\"))
strPastaDestino = CurrentProject.Path & "\Fotos\"
If strPastaOrigem <> strPastaDestino Then
    FileSystem.FileCopy strLocalFoto, strPastaDestino & strNomeFoto
End If
CurrentDb.Execute "UPDATE Cadastro de Acessos SET LocalPasta = '" & strPastaOrigem & "' WHERE txt_n_doc = " & Me!txt_n_doc & ";"
Me.Repaint
End Sub

SISTEMA DE ACESSO

Grato,

Aguardo retorno.

Lhe recomendarei dois exemplos:
1º https://www.maximoaccess.com/t26710-resolvidovincular-foto-por-cadastro-da-matricula Veja aqui como foi feito a inserção das fotos...

2º https://www.maximoaccess.com/t2619-webcam-access?highlight=webcam Capturando a foto pela WemCam. <== Nunca Testei e nao sei se vale a pena.

Com esses dois exemplos resolverá seu problema.

Fabio,
Obrigado pela ajuda.

Consegui fazer a inserção da foto funcionar, porém, gostaria de fazer uma melhoria:

1 - Ao inserir a Foto ela ser salva automaticamente na pasta "Imagem"
2 - Ao ser inserida automaticamente a foto fosse e renomeada com o Nº do Documento e o Nome, de acordo com o campos no Formulário.

Segue o arquivo para você dar uma avaliada.

Mesmo assim, já estou grato pela ajuda.