+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 5 su 5

[Access] Nascondere e Visualizzare barra di navigazione, Ribbon e shortcutMenu

  1. #1
    SalvatoreDC non Ŕ in linea Novello
    Buonasera,
    sto realizzando un DB in Access 2016, al quale gli utenti avranno accesso senza bisogno di utilizzare password. In pratica all'apertura del DB si avvia la maschera di comando principale e l'utente pu˛ compiere tutte le operazioni contemplate dai vari pulsanti inserite nelle maschere create.
    Arrivato a questo punto ho la necessitÓ di vincolare l'utente al solo utilizzo delle maschere, senza possibilitÓ di modificarle.
    Per nascondere la barra di navigazione e le Ribbon uso il seguente codice su LOAD della maschera di avvio
    DoCmd.NavigateTo "acNavigationCategoryObjectType"
    DoCmd.RunCommand acCmdWindowHide
    DoCmd.ShowToolbar "Ribbon", acToolbarNo
    
    Per visualizzare di nuovo la barra di navigazione e le Ribbon usa un pulsante di login, posizionato nella maschera di avvio, che mi chiede una password e se Ŕ corretta esegue il codice seguente, in moda da permettermi di effettuare modifiche strutturali
    DoCmd.SelectObject acTable, , True
    DoCmd.ShowToolbar "Ribbon", acToolbarYes
    
    Vorrei sapere se c'Ŕ un metodo pi¨ efficace per compiere queste operazioni e se Ŕ possibile, allo stesso modo, disabilitare lo shortcutMenu

    Avevo pensato di utilizzare nel LOAD di ogni maschera
    Form.ShortcutMenu = False
    
    ma non riesco ad abilitarlo una volta inserita la password nella maschera di avvio.

  2. #2
    SalvatoreDC non Ŕ in linea Novello
    Nessuno pu˛ aiutarmi?

    Ho un problema anche con Maximize
    DoCmd.RunCommand acCmdAppMaximize
    
    Caricato sul Load della maschera di avvio non la rende a tutto schermo.. suggerimenti?
    Grazie per l'aiuto

  3. #3
    L'avatar di Kwisatz
    Kwisatz non Ŕ in linea Scolaretto
    Solitamente utilizzo la tabella UsysRibbons nella quale metto un record con il codice XML del ribbon personalizzato.

    Successivamente, nella versione ACCDE da distribuire modifico la riga:

    da <ribbon startFromScratch="false"> a <ribbon startFromScratch="true">

    e tolgo dalle opzioni del database:

    - Usa tasti speciali = NO
    - Visualizza riquadro di spostamento = NO
    - Men¨ completi = NO

    In questo modo Ŕ molto difficile per un utente accedere alle strutture delle maschere ed al codice VBA.

  4. #4
    SalvatoreDC non Ŕ in linea Novello
    Quote Originariamente inviato da Kwisatz Visualizza il messaggio
    Solitamente utilizzo la tabella UsysRibbons nella quale metto un record con il codice XML del ribbon personalizzato.

    Successivamente, nella versione ACCDE da distribuire modifico la riga:

    da <ribbon startFromScratch="false"> a <ribbon startFromScratch="true">

    e tolgo dalle opzioni del database:

    - Usa tasti speciali = NO
    - Visualizza riquadro di spostamento = NO
    - Men¨ completi = NO

    In questo modo Ŕ molto difficile per un utente accedere alle strutture delle maschere ed al codice VBA.
    Ciao Kwisatz, grazie per la risposta.
    Utilizzando il tuo metodo, ci sarebbe la possibilitÓ di ripristinare tutto? CioŔ vorrei poter agire su un solo file che all'apertura sia "bloccato" e a seguito di password si "sblocchi" ripristinando Ribbon, elenco oggetti e tutto il resto.
    Ho sempre utilizzato per me i DB creati fin'ora, Ŕ la prima volta che mi trovo a dover distribuire un applicativo.
    Non Ŕ che sto sbagliando completamente approccio al problema?
    Sono aperto a qualsiasi soluzione
    Grazie ancora

  5. #5
    L'avatar di muttley005
    muttley005 non Ŕ in linea Topo di biblioteca
    se ho capito cosa chiedi ...
    io all'apertura del programma disabilito la ribbon
    Sub OnRibbonLoad(RIBBON As IRibbonUI)
        ' Callbackname in XML File "onLoad"
        FLAG_RIBBON = False
        Set myRIBBON = RIBBON
    End Sub
    
    ed eseguo questo dopo l'avvenuto login da maschera apposita
    Public Sub AbilitaRIBBON(OK As Boolean)
        On Error Resume Next
        FLAG_RIBBON = True
        myRIBBON.Invalidate
        On Error GoTo 0
    End Sub
    

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Access 2016 - nascondere "che cosa si desidera fare?" dal ribbon
    Da ArmandoVBA nel forum Microsoft Access
    Risposte: 1
    Ultimo Post: 14-09-2020, 19:22
  2. Icone men¨ ribbon barra personalizzata
    Da CESABAS nel forum Microsoft Access
    Risposte: 0
    Ultimo Post: 25-12-2014, 16:42
  3. Risposte: 3
    Ultimo Post: 18-09-2013, 08:13
  4. Risposte: 1
    Ultimo Post: 26-01-2013, 16:12
  5. nascondere con vb la barra dei menu in file access
    Da giovanni.martignoni nel forum Microsoft Access
    Risposte: 4
    Ultimo Post: 21-08-2007, 11:23