Newsgroup: it.comp.appl.access
Titolo: VT - Disabilitare tasto shift - per utente non amministratore error 3033

Buongiorno NG,
Buongiorno Vicenzo :)
ho un problema. Tempo fa ho attivato la macro per disabilitare il
tasto shift all'avvio del programma, rinominandola come AUTOEXEC.
Solo che quando un utente lo apre,  ottiene l'errore:
"3033 - Non si dispone delle autorizzazioni necessarie per uutilizzare
l'oggetto "MSysDB". Per disporre delle autorizzzazioni appropriate,
rivolgersi all'amministratore del sistema o all'autore dell'oggetto."
Sto facendo dei test, e dalla mia macchina se entro con mia
credenziale di amministratore tutto va enon mi da messaggi, ma se
entro come uno degli utenti, ha quell'errore. Però l'operatività non è
compromessa, ll'utente riesce a lavorare. Come posso fare sparire
questo messaggio?
Ho provato a cambiare i vari diritti di accesso agli oggetti del
database, da sola apertura/esecuzione + lettura  a  completa
amministrazione... ma l'errore rimane!
Cosa mi consigli?
Dove sto sbagliando?
Grazie infinite
Samantha

(.....)
Ahi ahi ahi !!!
Non sta bene postare sul NG richieste indirizzate specificamente a qualcuno !
Comunque ora non ho tempo: tenterò di darti una risposta in serata o al più tardi domattina 
Vincenzo Turturro
Certificato Eucip Core Level
ITA 0000-002299 del 14/05/2007
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
risorse Access:
http://www.accessgroup.it
---------------------------------------------
Il sito comune di it.comp.as400
http://www.faq400.com
---------------------------------------------

VT @ home ha scritto:

Giorno Vincenzo,
ma VT non è un nome in codice?  O mio DIO ci hanno scoperti...  ;)
scherzi a parte hai ragione!!!
Avevamo parlato in un altro post della protezione utente, e ci tenevo
che vedessi il mio post,
Buon lavoro
Samantha


Vincenzo Turturro 


VT @ Work ha scritto:

Questo è il contenuto di modulo 3:
Function byPassKeyAdmin(bolVal As Boolean, Optional strMDB As String)
As Boolean
 'Autore: sconosciuto
 'Modificato da Federico Luciani
 'Accetta:
 ' bolVal = True: abilita; False: disabilita
 ' strMdb = [Opz.] percorso+nome del database
 'Restituisce: True l'operazione e' stata eseguita correttamente
    On Error GoTo ChangePropertyDdl_Err
    Dim wrk As Workspace
    Dim dbs As DAO.Database
    Dim prp As DAO.Property
    Set wrk = DBEngine.Workspaces(0)
    If strMDB = "" Then
         Set dbs = CurrentDb()
    Else
         Set dbs = wrk.OpenDatabase(strMDB)
    End If
    dbs.Properties.Delete "AllowBypassKey"
    Set prp = dbs.CreateProperty("AllowBypassKey", dbBoolean, bolVal,
True)
    dbs.Properties.Append prp
    byPassKeyAdmin = True
ChangePropertyDdl_Exit:
    Set prp = Nothing
    Set dbs = Nothing
    Set wrk = Nothing
    Exit Function
ChangePropertyDdl_Err:
    If Err.Number = 3265 Then
        Resume Next
    Else
        MsgBox Err.Number & " - " & Err.Description
    End If
    Resume ChangePropertyDdl_Exit
End Function
Poi ho creato la MACRO Autoexec dove in
Esegui codice c'è byPassKeyAdmin
e nome funzione byPassKeyAdmin(false)
Grazie ancora!!!
Samantha

Prova a sostituire 
Set prp = dbs.CreateProperty("AllowBypassKey", dbBoolean, bolVal, True)
con
Set prp = dbs.CreateProperty("AllowBypassKey", dbBoolean, bolVal, False)
poi, magari, facci sapere se ci ho dato ...



Ciao VT,
Scusa del ritardo con cui ti rispondo.
Funziona alla grande, ma non capisco... perchè da false a true e va...
è lo stesso testo che si trova sul sito, cos'è che è cambiato??
Grazie,
Samantha

Samantha



Grazie Vincenzo,
come sempre il tuo aiuto è prezioso.
Non capisco comunque perchè solo io ho avuto questo tipo di problema.
Ovvero, quali autorizzazioni hanno dato o dai tu visto che non hai
riscontrato il mio problema?
Io solitamente lascio solo Lettura struttura +
Lettura dati
Aggiornamento dati
Inserimento dati
Eliminazione dati
Modifica struttura e Amministrazione non li abilito. Tu si?
Cmq vedo che con queste autorizzazioni gli utenti lavorano sul
database e modificano i dati senza problemi.
Cmq sono contenta ora funziona tutto alla grande... e visto che si
avvicinano le vacanze avrò il tempo di capire come funzionano i
permessi... e un pò di VBA...
Hai qualche bel libro o dispensa internet da consigliarmi?
Buone vacanze anche a te!!!!
Samantha

Buone vacanze anche a te!!!!
Grazie, ma niente ferie fino al 1/9, e solo una settimana !


 wrote:

Ciao Vincenzo,
grazie x le dritte!!!! Ora mi stampo il tutto!!!
Se mai ti capitasse qualsiasi necessità in tema privacy Decreto Leg.vo
196/2003 contattami pure, che in quest'ambito ti posso essere
d'aiuto!!!
D'aiuto per fare:
1)Informativa
2)Disclaimer da mettere sotto le email
3)eventuale dps ma da analizzare se ne hai necessità.
Ciao Vincenzo,
Samantha

Ciao Vincenzo,



A tua disposizione,
Samantha
