Voilà, j'ai insérer cette fonction dans un moduel :
Option Compare Database
Option Explicit
Function DesactiveShift()
Dim Dbs As Dao.Database
Dim Prp As Dao.Property
Set Dbs = CurrentDb()
Dbs.Properties("AllowByPassKey") = False
Set Prp = Nothing
Dbs.Close
Set Dbs = Nothing
End Function
Quand je compile, la ligne : Dbs As Dao.Database est surlignée et un message
me dit :"Type défini par l'utilisateur non défini"Si quelqu'un avait une
petite idée car je ne sais pas quoi faire devant ce messageMerci à tous--
CordialementChristophe
"Ayrton [ ASC ]" | Voilà, j'ai insérer cette fonction dans un moduel : | Option Compare Database | Option Explicit | | Function DesactiveShift() | Dim Dbs As Dao.Database | Dim Prp As Dao.Property | | Set Dbs = CurrentDb() | Dbs.Properties("AllowByPassKey") = False | | Set Prp = Nothing | Dbs.Close | Set Dbs = Nothing | End Function | Quand je compile, la ligne : Dbs As Dao.Database est surlignée et un message | me dit :"Type défini par l'utilisateur non défini"Si quelqu'un avait une | petite idée car je ne sais pas quoi faire devant ce messageMerci à tous-- | CordialementChristophe |
"Ayrton [ ASC ]"
| Voilà, j'ai insérer cette fonction dans un moduel :
| Option Compare Database
| Option Explicit
|
| Function DesactiveShift()
| Dim Dbs As Dao.Database
| Dim Prp As Dao.Property
|
| Set Dbs = CurrentDb()
| Dbs.Properties("AllowByPassKey") = False
|
| Set Prp = Nothing
| Dbs.Close
| Set Dbs = Nothing
| End Function
| Quand je compile, la ligne : Dbs As Dao.Database est surlignée et un message
| me dit :"Type défini par l'utilisateur non défini"Si quelqu'un avait une
| petite idée car je ne sais pas quoi faire devant ce messageMerci à tous--
| CordialementChristophe
|
"Ayrton [ ASC ]" | Voilà, j'ai insérer cette fonction dans un moduel : | Option Compare Database | Option Explicit | | Function DesactiveShift() | Dim Dbs As Dao.Database | Dim Prp As Dao.Property | | Set Dbs = CurrentDb() | Dbs.Properties("AllowByPassKey") = False | | Set Prp = Nothing | Dbs.Close | Set Dbs = Nothing | End Function | Quand je compile, la ligne : Dbs As Dao.Database est surlignée et un message | me dit :"Type défini par l'utilisateur non défini"Si quelqu'un avait une | petite idée car je ne sais pas quoi faire devant ce messageMerci à tous-- | CordialementChristophe |
Il te manque la référence à DAO Dans l'interface VB (ALT+F11) Menu Outils|Références rajoutes Microsoft DAO 3.xx Object Library et fais la passer avant ADO ...(que tu peux enlever si pas utilisée)
Bonjour à tous, Bonjour 3 stone
Voilà, j'ai insérer cette fonction dans un moduel : Option Compare Database Option Explicit
Function DesactiveShift() Dim Dbs As Dao.Database Dim Prp As Dao.Property
Set Dbs = CurrentDb() Dbs.Properties("AllowByPassKey") = False
Set Prp = Nothing Dbs.Close Set Dbs = Nothing End Function Quand je compile, la ligne : Dbs As Dao.Database est surlignée et un message me dit :"Type défini par l'utilisateur non défini"Si quelqu'un avait une petite idée car je ne sais pas quoi faire devant ce messageMerci à tous-- CordialementChristophe
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour Ayrton,
Il te manque la référence à DAO
Dans l'interface VB (ALT+F11)
Menu Outils|Références
rajoutes Microsoft DAO 3.xx Object Library et fais la passer avant
ADO ...(que tu peux enlever si pas utilisée)
Bonjour à tous, Bonjour 3 stone
Voilà, j'ai insérer cette fonction dans un moduel :
Option Compare Database
Option Explicit
Function DesactiveShift()
Dim Dbs As Dao.Database
Dim Prp As Dao.Property
Set Dbs = CurrentDb()
Dbs.Properties("AllowByPassKey") = False
Set Prp = Nothing
Dbs.Close
Set Dbs = Nothing
End Function
Quand je compile, la ligne : Dbs As Dao.Database est surlignée et un message
me dit :"Type défini par l'utilisateur non défini"Si quelqu'un avait une
petite idée car je ne sais pas quoi faire devant ce messageMerci à tous--
CordialementChristophe
--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Il te manque la référence à DAO Dans l'interface VB (ALT+F11) Menu Outils|Références rajoutes Microsoft DAO 3.xx Object Library et fais la passer avant ADO ...(que tu peux enlever si pas utilisée)
Bonjour à tous, Bonjour 3 stone
Voilà, j'ai insérer cette fonction dans un moduel : Option Compare Database Option Explicit
Function DesactiveShift() Dim Dbs As Dao.Database Dim Prp As Dao.Property
Set Dbs = CurrentDb() Dbs.Properties("AllowByPassKey") = False
Set Prp = Nothing Dbs.Close Set Dbs = Nothing End Function Quand je compile, la ligne : Dbs As Dao.Database est surlignée et un message me dit :"Type défini par l'utilisateur non défini"Si quelqu'un avait une petite idée car je ne sais pas quoi faire devant ce messageMerci à tous-- CordialementChristophe
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Eric
Bonjour Pierre,
Pour dire la même chose, j'ai mis 4 minutes de plus. Arg !!! je vais plus faire de phrase ;-)
Cocher la référence à DAO ? ;-)
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour Pierre,
Pour dire la même chose, j'ai mis 4 minutes de plus.
Arg !!! je vais plus faire de phrase ;-)
Cocher la référence à DAO ? ;-)
--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
-- Pierre MVP Microsoft Access "Eric" a écrit dans le message de news: Oj#
Bonjour Pierre,
Pour dire la même chose, j'ai mis 4 minutes de plus. Arg !!! je vais plus faire de phrase ;-)
Cocher la référence à DAO ? ;-)
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Ayrton [ASC]
Bonjour *3stone* Dans ton message de news:%23%, Tu as pensé très fort :-(*)
Salut,
Salut 3 stone
Cocher la référence à DAO ? ;-)
Effectivement ça va mieux ! ! ! Je ne pensais à un problème de référence car je n'arrivaos pas à interpreter ce message d'erreur ;-( Par contre, une fois que j'ai tout bie nfait, je peux quand même afficher la fenêtre de base de données en appuyant sur Shift ;-( C'est pas normal ça hein ? l'option est bien décochée dans le menu demarrage.
A+ Tard Merci
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *3stone*
Dans ton message de news:%23%23jJEZEmFHA.3144@TK2MSFTNGP12.phx.gbl,
Tu as pensé très fort :-(*)
Salut,
Salut 3 stone
Cocher la référence à DAO ? ;-)
Effectivement ça va mieux ! ! ! Je ne pensais à un problème de référence car
je n'arrivaos pas à interpreter ce message d'erreur ;-(
Par contre, une fois que j'ai tout bie nfait, je peux quand même afficher la
fenêtre de base de données en appuyant sur Shift ;-( C'est pas normal ça
hein ?
l'option est bien décochée dans le menu demarrage.
A+ Tard
Merci
--
@+
Ayrton
http://cerbermail.com/?ljOK1CRTMt
Charte NG :
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *3stone* Dans ton message de news:%23%, Tu as pensé très fort :-(*)
Salut,
Salut 3 stone
Cocher la référence à DAO ? ;-)
Effectivement ça va mieux ! ! ! Je ne pensais à un problème de référence car je n'arrivaos pas à interpreter ce message d'erreur ;-( Par contre, une fois que j'ai tout bie nfait, je peux quand même afficher la fenêtre de base de données en appuyant sur Shift ;-( C'est pas normal ça hein ? l'option est bien décochée dans le menu demarrage.
A+ Tard Merci
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Ayrton [ASC]
Bonjour *Eric* Dans ton message de news:OSm%, Tu as pensé très fort :-(*)
Bonjour Ayrton,
Bonjour Eric
Il te manque la référence à DAO Dans l'interface VB (ALT+F11) Menu Outils|Références rajoutes Microsoft DAO 3.xx Object Library et fais la passer avant ADO ...(que tu peux enlever si pas utilisée)
Merci pour cette info ; effectivement, comme je l'ai dit à Pierre, ça va mieux au niveau du message d'erreur mais je peux quand même ouvrir la fenêtre base de données ( alors qu'elle est décochée dans le meni Demarrage ) en aapuyant sur la touche Shift .
Dur Dur ! !
Merci quand même de m'avoir répondu Eric
Bien à toi
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *Eric*
Dans ton message de news:OSm%23KbEmFHA.3120@TK2MSFTNGP09.phx.gbl,
Tu as pensé très fort :-(*)
Bonjour Ayrton,
Bonjour Eric
Il te manque la référence à DAO
Dans l'interface VB (ALT+F11)
Menu Outils|Références
rajoutes Microsoft DAO 3.xx Object Library et fais la passer avant
ADO ...(que tu peux enlever si pas utilisée)
Merci pour cette info ; effectivement, comme je l'ai dit à Pierre, ça va
mieux au niveau du message d'erreur mais je peux quand même ouvrir la
fenêtre base de données ( alors qu'elle est décochée dans le meni
Demarrage ) en aapuyant sur la touche Shift .
Dur Dur ! !
Merci quand même de m'avoir répondu Eric
Bien à toi
--
@+
Ayrton
http://cerbermail.com/?ljOK1CRTMt
Charte NG :
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *Eric* Dans ton message de news:OSm%, Tu as pensé très fort :-(*)
Bonjour Ayrton,
Bonjour Eric
Il te manque la référence à DAO Dans l'interface VB (ALT+F11) Menu Outils|Références rajoutes Microsoft DAO 3.xx Object Library et fais la passer avant ADO ...(que tu peux enlever si pas utilisée)
Merci pour cette info ; effectivement, comme je l'ai dit à Pierre, ça va mieux au niveau du message d'erreur mais je peux quand même ouvrir la fenêtre base de données ( alors qu'elle est décochée dans le meni Demarrage ) en aapuyant sur la touche Shift .
Dur Dur ! !
Merci quand même de m'avoir répondu Eric
Bien à toi
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Eric
re,
Et tu la lances quand cette fonction ?
Merci pour cette info ; effectivement, comme je l'ai dit à Pierre, ça va mieux au niveau du message d'erreur mais je peux quand même ouvrir la fenêtre base de données ( alors qu'elle est décochée dans le meni Demarrage ) en aapuyant sur la touche Shift .
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
re,
Et tu la lances quand cette fonction ?
Merci pour cette info ; effectivement, comme je l'ai dit à Pierre, ça va
mieux au niveau du message d'erreur mais je peux quand même ouvrir la
fenêtre base de données ( alors qu'elle est décochée dans le meni
Demarrage ) en aapuyant sur la touche Shift .
--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Merci pour cette info ; effectivement, comme je l'ai dit à Pierre, ça va mieux au niveau du message d'erreur mais je peux quand même ouvrir la fenêtre base de données ( alors qu'elle est décochée dans le meni Demarrage ) en aapuyant sur la touche Shift .
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
3stone
Salut,
"Ayrton [ASC]" | Effectivement ça va mieux ! ! ! Je ne pensais à un problème de référence car | je n'arrivaos pas à interpreter ce message d'erreur ;-( | Par contre, une fois que j'ai tout bie nfait, je peux quand même afficher la | fenêtre de base de données en appuyant sur Shift ;-( C'est pas normal ça | hein ? | l'option est bien décochée dans le menu demarrage.
Fermer la base et l'ouvrir à nouveau.
... et maintenant ?
PS: Fait gaffe... si tu n'as rien prévu pour inverser la vapeur ;-)
"Ayrton [ASC]"
| Effectivement ça va mieux ! ! ! Je ne pensais à un problème de référence car
| je n'arrivaos pas à interpreter ce message d'erreur ;-(
| Par contre, une fois que j'ai tout bie nfait, je peux quand même afficher la
| fenêtre de base de données en appuyant sur Shift ;-( C'est pas normal ça
| hein ?
| l'option est bien décochée dans le menu demarrage.
Fermer la base et l'ouvrir à nouveau.
... et maintenant ?
PS: Fait gaffe... si tu n'as rien prévu pour inverser la vapeur ;-)
"Ayrton [ASC]" | Effectivement ça va mieux ! ! ! Je ne pensais à un problème de référence car | je n'arrivaos pas à interpreter ce message d'erreur ;-( | Par contre, une fois que j'ai tout bie nfait, je peux quand même afficher la | fenêtre de base de données en appuyant sur Shift ;-( C'est pas normal ça | hein ? | l'option est bien décochée dans le menu demarrage.
Fermer la base et l'ouvrir à nouveau.
... et maintenant ?
PS: Fait gaffe... si tu n'as rien prévu pour inverser la vapeur ;-)
Bonjour *Eric* Dans ton message de news:, Tu as pensé très fort :-(*)
re,
Re Eric,
Et tu la lances quand cette fonction ?
Ben je la lance avec une macro AutoExec ; je fais Executer une fonction et dans Nom de la Fonction je tape: "DesactiveShift()" Et c'est tout ce que je fais ;-) Mais peut être que ça suffit pas ?.
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *Eric*
Dans ton message de news:e3NjI0FmFHA.1968@TK2MSFTNGP14.phx.gbl,
Tu as pensé très fort :-(*)
re,
Re Eric,
Et tu la lances quand cette fonction ?
Ben je la lance avec une macro AutoExec ; je fais Executer une fonction et
dans Nom de la Fonction je tape: "DesactiveShift()"
Et c'est tout ce que je fais ;-)
Mais peut être que ça suffit pas ?.
--
@+
Ayrton
http://cerbermail.com/?ljOK1CRTMt
Charte NG :
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *Eric* Dans ton message de news:, Tu as pensé très fort :-(*)
re,
Re Eric,
Et tu la lances quand cette fonction ?
Ben je la lance avec une macro AutoExec ; je fais Executer une fonction et dans Nom de la Fonction je tape: "DesactiveShift()" Et c'est tout ce que je fais ;-) Mais peut être que ça suffit pas ?.
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Ayrton [ASC]
Bonjour *3stone* Dans ton message de news:un$, Tu as pensé très fort :-(*)
Salut, Fermer la base et l'ouvrir à nouveau.
... et maintenant ?
Malheureusement pour moi, c'est pareil ;-(
PS: Fait gaffe... si tu n'as rien prévu pour inverser la vapeur ;-)
Tu veux dire pour récuperer l"activation de la touche Shift ? Si c'est ça, pour l'instant y pas de problèmes puisque je ,e peux même pas la désactiver ! ! Donc pas de problèmes pour la réactiver lol Sérieusement, tu indiques tout sur ton site et de manière très claire donc j'ai pris le fonction que tu préconises pour réactiver shift. Mais bon, pour l'instant je vais essayer de faire fonctionner la déactivation et après je verrai ;-)
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *3stone*
Dans ton message de news:un$u61FmFHA.576@TK2MSFTNGP15.phx.gbl,
Tu as pensé très fort :-(*)
Salut,
Fermer la base et l'ouvrir à nouveau.
... et maintenant ?
Malheureusement pour moi, c'est pareil ;-(
PS: Fait gaffe... si tu n'as rien prévu pour inverser la vapeur ;-)
Tu veux dire pour récuperer l"activation de la touche Shift ? Si c'est ça,
pour l'instant y pas de problèmes puisque je ,e peux même pas la désactiver
! ! Donc pas de problèmes pour la réactiver lol
Sérieusement, tu indiques tout sur ton site et de manière très claire donc
j'ai pris le fonction que tu préconises pour réactiver shift.
Mais bon, pour l'instant je vais essayer de faire fonctionner la
déactivation et après je verrai ;-)
--
@+
Ayrton
http://cerbermail.com/?ljOK1CRTMt
Charte NG :
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *3stone* Dans ton message de news:un$, Tu as pensé très fort :-(*)
Salut, Fermer la base et l'ouvrir à nouveau.
... et maintenant ?
Malheureusement pour moi, c'est pareil ;-(
PS: Fait gaffe... si tu n'as rien prévu pour inverser la vapeur ;-)
Tu veux dire pour récuperer l"activation de la touche Shift ? Si c'est ça, pour l'instant y pas de problèmes puisque je ,e peux même pas la désactiver ! ! Donc pas de problèmes pour la réactiver lol Sérieusement, tu indiques tout sur ton site et de manière très claire donc j'ai pris le fonction que tu préconises pour réactiver shift. Mais bon, pour l'instant je vais essayer de faire fonctionner la déactivation et après je verrai ;-)
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
