Acesso a Clientes específicos por usuário

Prezados,

Tenho um Sistema de Controle Ambiental (Resíduos) onde tem vários usuários acessando.

Porém, cada usuário tem controle de uma qtd específica de Clientes.

Ex: Usuário 1 - Controla Clientes A / B / C
Usuário 2 - Controla Clientes J / H / R
Usuário 3 - Controla Clientes E / F / G e assim por diante.

Tem como ao entrar no Sistema o usuário enxergar apenas seus clientes ?

Como eu faria isso ?

Alguém poderia me dar uma ajuda nisso ?

Muito Grato,

Abs,

Regis

Boa tarde !

Vai duas dicas:

1 - No momento em que cadastrar o usuário, ter um subformulário onde possa selecionar quais clientes ele vai controlar. (clientes já cadastrados no sistema)

2 - No cadastro de clientes, determinar qual usuario irá controlá-lo

Pensando na estrutura, a princípio, depois a parte de programação o fórum vai te auxiliando.

Abraços.

Prezados amigos,

Tenho uma tabela abaixo onde cada usuário é responsável pelo controle de alguns Clientes referente aos lançamentos de (Receitas, Despesas, Medições etc)

CLIENTE                                      ESTADO    RESPONSÁVEL

ABBOTT                                           RJ        BRUNO MIGUEZ / SÉRGIO
BIOMÉRIEUX                                    RJ        BRUNO MIGUEZ / SÉRGIO
ZYDUS NIKKHO                                RJ        BRUNO MIGUEZ / SÉRGIO
C & A MODAS                           RJ        HUGO GUIMARÃES / CLEIDE ARAÚJO / SÉRGIO
ED. BOTAGOFO                                 RJ        HUGO GUIMARÃES / CLEIDE ARAÚJO / SÉRGIO
AMBEV (CERVEJARIA ZX)                  RJ        HUGO GUIMARÃES / CLEIDE ARAÚJO / SÉRGIO
MASSAS NÁPOLES                            RJ        HUGO GUIMARÃES / CLEIDE ARAÚJO / SÉRGIO
LUBRIZOL                                        RJ        JEFFERSON PRATES / SÉRGIO
BIMBO                                            PE        KARLA CAVALCANTI / DIOMEDES SANTOS / SÉRGIO
DAIRY PARTINER MAS -DPA              PE        KARLA CAVALCANTI / DIOMEDES SANTOS / SÉRGIO
ENERGÉTICA SUAPE                         PE        KARLA CAVALCANTI / DIOMEDES SANTOS / SÉRGIO
CAPRICCHE                                     RJ        KARLA CAVALCANTI / MARCELO HENRIQUE / SÉRGIO
CONDOMÍNIO CITY TOWER               RJ        THAMIRES SOARES / SÉRGIO
DIX (RIO SUL)                                   RJ        THAMIRES SOARES / SÉRGIO
FGV TORRE OSCAR NIEMEYER           RJ        THAMIRES SOARES / SÉRGIO

Preciso fazer com que o Usuário, após fazer seu login enxergue apenas seus Clientes conforme tabela acima.

Tem algum jeito de fazer isso ?

Muito Grato,

Abs,

Regis Borda:.

Bom dia
Na origem dos registos, utilizar SQL na origem do formulário ou relatório que filtre os registos de acordo com o utilizador

Caro Alexandre,

Como faria isso ?

Não entendi o que você quis dizer.

Abs,

Regis Borda

Boa tarde
Ao abrir a bd atribui valor a variavel de utilizador (Responsavel="HUGO GUIMARÃES", Responsavel="CLEIDE ARAÚJO", etc)
Ao abrir o form, tenha origem SQL filtrado pelo utilizador
Exemplo Recordsource="SELECT * FROM Tabela LEFT JOIN tblResponsaveis ON Tabela.Empresa=tblResponsaveis.Empresa WHERE Responsável Like'*" & Responsavel & "*'"

Prezados Membros,

Cada usuário é responsável por alguns clientes.
Ao dar login no Sistema, preciso que o Usuário enxergue apenas os seus Clientes isso para todos os Forms e Rels do Sistema.

1) Na tabela de Clientes tem um campo "Usuario" onde contém o nome do Usuário responsável.
2) No FormLogin tem um campo "cboUsuário" onde digito o nome do usuário que está logando.
3) Declarei como Váriável Global ("cboUsuário")

Option Compare Database
Option Explicit
Global cboUsuário As Variant

4) Quando acesso o Menu Clientes, gostaria que buscasse apenas os clientes do Usuário Logado (Exemplo : Cleide)

Tenho o seguinte código nesse menu :

Private Sub AbreFormCliente_Click()
On Error GoTo Err_AbreFormCliente_Click

Dim stDocName As String
Dim stLinkCriteria As String


If IsNull([Ativo]) Then
MsgBox "Você deve selecionar a Opção de Busca (Ativo/Inativo) !!! Use Tab para mudar de campo.", , "Erro de Ativo"
DoCmd.GoToControl "Ativo"
Else
stDocName = "FormBuscaClientes"

stLinkCriteria = "[Ativo]=" & Me![Ativo] And "[Usuario]=" & cboUsuário
DoCmd.OpenForm stDocName, , , stLinkCriteria
End If

Exit_AbreFormCliente_Click:
Exit Sub

Err_AbreFormCliente_Click:
MsgBox Err.Description
Resume Exit_AbreFormCliente_Click

End Sub

Porém, o código acima está dando ERRO no campo "cboUsuário" o mesmo NÃO aparece o nome do Usuário Logado (Ex: Cleide) ele fica VAZIO.

Alguém poderia me dar uma ajuda ?

Muito Grato,

Grande Abraço,

Regis Borda

4) Quando acesso o Menu Clientes, gostaria que buscasse apenas os clientes do Usuário Logado (Exemplo : Cleide) escreveu:

Fiz um exemplo básico  que irá te ajudar

Tópicos fundidos. Mesmo autor e mesma dúvida.