Gestione Maschera e accesso utente

di il
7 risposte

Gestione Maschera e accesso utente

Buongiorno,
sono nuovo del forum e ho cercato un pò di informazioni per il mio problema ma, nonostante molti topic interessanti per un programmatore improvvisato come me, non sono riuscito a risolvere il mio problema.

Vi spiego in breve:
ho creato un Database diviso con Access 2010, a questo DB possono accedere più utenti che avranno permissivi differenti.
il DB non ha molte maschere, quindi è stato relativamente semplice mapparle per permettere ad un utente di accedere solamente alle maschere per cui può interagire.
Ho creato due tabelle in relazione tra loro per gestire il log in:
TBUtenti con i campi txt_UserName, txt_Password, txt_Livello
TBSicurezza con i campi txt_Livello, txt_DescrizionePrivilegi

(il campo txt_Livello è un campo numerico, gli altri sono di testo).

Ho creato una maschera di Log In con i campi di UserName e Password.

Ora volevo scrivere un codice da associare all'evento "su click" di un pulsante che:
1) verifica se user name e password sono corretti,
2) se corretti verifichi che livello è associato a quell'utente
3) in base al campo livello (1, 2, 3, 4, etc..) che venga aperta una maschera specifica (ad esempio con il livello 1 si apre la Form1).

Mi sembrava una cosa semplice anche per un "VBA casinista" come me ma, appunto, ho fatto un casino e non riesco a fare un tubo

Qualche suggerimento sul codice?
Grazie

7 Risposte

  • Re: Gestione Maschera e accesso utente

    Se ti potesse interessare qui trovi un sistema di gestione LOGIN gia realizzato:

    "forum.masterdrive.it/access-79/login-sicurezza-form-44771/"

    Non è semplicissimo ma abbastanza intuitivo da implementare.
  • Re: Gestione Maschera e accesso utente

    Grazie Alex,
    ho già visto quel sistema ed effettivamente mi risolve il primo passaggio.
    Tuttavia non mi permette (o non sono stato in grado di implementare) un sistema che mi apre una maschera per quel gruppo utente (o livello di sicurezza come l'ho impostato io).

    Ho pensato di scrivere cosi il codice ma non capisco dove sbaglio:

    Dim Livello As Integer
    If Error Then
    msgbox "User Name o Password errate", ,"Messaggio di Errore"
    If ("Livello"=1, Open.Form [Form 1])
    If ("Livello"=N, Open.Form [Form N])
    End If
    End Sub()
  • Re: Gestione Maschera e accesso utente

    Credo tu non abbia compreso molto bene il DEMO...!
    Se apri il SERVER trovi una Tabella che non viene LINKATA per ovvi motivi di sicurezza... [_USERS]
    Questa Tabella ha 3 Campi:
    1) IdUSER (PK)
    2) USER (Testo che puoi cambiare come credi)
    3) PWD(Criptata)
    4) LEVEL

    A me tuttavia pare INTUITIVO che i 3 USERS inseriti sono 3 GRUPPI Utenti... nella Maschera GESTIONE puoi anche MODIFICARE i NOMI aggiungere e gestire separatamente i PERMISSIVI di ogni GRUPPO...
    Boh... non so cosa non soddisfa la tua richiesta.

    Il tuo metodo non va bene, perchè devi scrivere un sacco di codice e non è flessibile, se cambi qualche condizione devi riscrivere il codice... non si fanno queste sviluppando seriamente....
    Vedi tu...
  • Re: Gestione Maschera e accesso utente

    Sicuramente non ho capito a pieno la demo e sicuramente la soluzione che ho pensato io non funziona, diversamente non sarei qui a chiedere consiglio a chi è più esperto di me.

    Grazie per le risposte, non mi aspettavo una risposta cosi scontrosa da un Utente Senior che si rivolge a un New Entry.

    buona giornata.
  • Re: Gestione Maschera e accesso utente

    Simo1977 ha scritto:


    Sicuramente non ho capito a pieno la demo e sicuramente la soluzione che ho pensato io non funziona, diversamente non sarei qui a chiedere consiglio a chi è più esperto di me.

    Grazie per le risposte, non mi aspettavo una risposta cosi scontrosa da un Utente Senior che si rivolge a un New Entry.

    buona giornata.
    Non è scontrosa, ti ho solo spiegato che la tua LOGICA non è tecnicamente adeguata in ottica di sviluppo, e come vedi non hai nemmeno capito il motivo che ti ho esposto, interpretandolo come offesa.
    Il fatto che tu abbia scritto una bozza di codice con molti errori per mancanza di BASI minime era una considerazione che nemmeno ho esposto, concentrandomi sull'aspetto LOGICO... probabilmente meno ostico... ma tant'è...
    Se non hai basi i suggerimenti non servono in quanto non verrebebro compresi, questo significa che servirebbe ti venisse fornito il codice ed un corso Online mentre ti si da il codice... cosa ovviamente NON FATTIBILE e non prevista dal regolamento che nessuno legge...
  • Re: Gestione Maschera e accesso utente

    1) il regolamento l'ho letto, di fatti non chiedo ne la pappa pronta ne che mi si faccia un corso online "gratis"
    2) Comprendo che si voglia dare un consiglio in ottica sviluppo e il più flessibile possibile, ma non tutti hanno questa necessità (un database che viene gestito da 4 persone ME COMPRESO, non da decine o centinaia di utenti)
    3) quel "vedi tu" te lo potevi risparmiare abbondantemente caro Alex. Se sei un professionista nella programmazione buon per te, io sono professionista per altro

    Detto questo, grazie per la tua attenzione e del link alla demo. Ne farò buon uso.
  • Re: Gestione Maschera e accesso utente

    Prego.
Devi accedere o registrarti per scrivere nel forum
7 risposte