Sbloccare un controllo specifico su maschera bloccata

di hangart il
1 risposte
Ciao a tutti,
ho una form singola che all'apertura richiama la funzione fChkAllowEdits la quale verifica le credenziali dell'utente connesso e blocca di conseguenza la modifica dei record della maschera
(pubblico solo l'ultimo pezzo di codice per semplicità.
'verifico se esistono valori nella tabella Allowedits o l'utente è PL o Admin
If rst.RecordCount > 0 Or gintIsAdm = -1 Or Forms!frmPrjdet.cmbCompiler = glngThisEmpID Then
frm.AllowEdits = True
    frm.AllowDeletions = True
    frm.AllowAdditions = True
    Else:
    frm.AllowEdits = False
    frm.AllowDeletions = False
    frm.AllowAdditions = False
    End If
    
Lo scopo è quello ovviamente di permettere la lettura a tutti gli utenti e limitare la scrittura solo ad altri. Ora, ho aggiunto una ListBox (non associata) che visualizza i file contenuti in una cartella specifica assegnata ad ogni record. Tramite la listbox è possibile selezionare i file ed aprirli con l'evento OnDblClick della ListBox.
Purtroppo però bloccando l'intera maschera non mi è più possibile selezionare un file specifico e neppure avviare il doppio click . Ho provato giocando sulle proprietà della ListBox , tipo inserendo una riga dopo il richiamo della funzione fChkAllowEdits
Me.lstPrjApp.Locked = False
Oppure .AllowEdits, etc. ma non si sblocca ... Qualche dritta?
Grazie

1 Risposte

  • Hai dato un'occhiata a questo se può darti uno spunto utile:
    http://forum.masterdrive.it/access-79/login-sicurezza-form-44771/

    Purtroppo rendendo la Form Looked quello è un'inconveniente... dovresti, invece che gestire l'AllowEdits andare a Bloccare i Controlli che devono essere Bloccati per fare quello che chiedi.
    Quindi un Ciclo sulla collection Controls, verifichi la property ControlSource gestendo l'errore... e su quelli vai ad effettuare un Looked=True.
    Ovviamente AllowAdditions=False va bene...
Devi accedere o registrarti per scrivere nel forum
1 risposte