Neutraliser touche MAJ au démarrage

Bonjour

Tu peux trouver le code complet dans l'aide d'Access...

Il suffit de modifier la propriété une fois, cette modification s'appliquera
aux prochaine démarrage de la base de donnée.

Voici le code fournit dans l'aide d'Access :

****************************************************
Sub ParamProprDémarrage()
ModifiePropr "AllowBypassKey", dbBoolean, True
End Sub

Function ModifiePropr(chNomPropriété As String, varTypeProp As Variant, varValeurProp As
Variant) As Integer
Dim bds As Database, prp As Property
Const conErreurPropNonTrouvée = 3270

Set bds = CurrentDb
On Error GoTo Change_Err
bds.Properties(chNomPropriété) = varValeurProp
ModifiePropr = True

Change_Sortie:
Exit Function

Change_Err:
If Err = conErreurPropNonTrouvée Then ' Propriété non trouvée.
Set prp = bds.CreateProperty(chNomPropriété, _

varTypeProp, varValeurProp)
bds.Properties.Append prp
Resume Next
Else
' Erreur inconnue.
ModifiePropr = False
Resume Change_Sortie
End If
End Function
****************************************************

--
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Rémi" <info@catmontbard.com> a écrit dans le message news:
uesKDm8mEHA.3996@TK2MSFTNGP09.phx.gbl...

Bonjour !

je souhaite bloquer l'affichage de la fenêtre base de donnée au démarrage de
l'application avec la touche MAJ, je sais que l'on peut utiliser la
propriété AllowByPass en lui attribuant la valeur False.

C'est la méthode createproperty qu'il faut employer apparement.

Est que quelqu'un peut me fournir le code complet de la procédure et les
explications relatives à son exécution : exécution au démarrage, ou une fois
pour toute ?

Merci d'avance

Rémi