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
Bonjour *3stone* Dans ton message de news:, Tu as pensé très fort :-(*)
Salut,
Bonsoir 3stone,
Tu as fermé proprement la première ? Pas de Christophe.ldb qui traîne ?
Je ne pense pas
ExécuterCode...
Oui exact
Je viens de faire le test... tout va bien pourtant ;-)
Eh bie nje viens de refaire l'essai chez moi avec deux bases test ( tu penses bien que je test avant de le faire sur une appli du boulot car comme ça, si je "merdouille " un peu, il vaut mieux que ce soit sur des bases sans importance ;-) ) et ça ne vas pas ; mais là j'ai l'erreur 3024 ( Impossible de trouver le fichier :"C:Documents............" Et je suis sûr et certain du chemin ( dans Mes Documents c'est pas difficile ) et j'ai copié/collé ta fonction, donc pas d'erreur de recopiage ;-)
Mais bon, si ça fonctionne quand tu test, ça devrait aussi fonctionner chez moi ! Donc, pas de mystère, l'erreur est de mon côté ; mais ou ? Bon je vais continuer à chercher ;-)
Merci encore Pierre et excuse moi
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *3stone*
Dans ton message de news:ObaQRgRmFHA.3380@TK2MSFTNGP12.phx.gbl,
Tu as pensé très fort :-(*)
Salut,
Bonsoir 3stone,
Tu as fermé proprement la première ?
Pas de Christophe.ldb qui traîne ?
Je ne pense pas
ExécuterCode...
Oui exact
Je viens de faire le test... tout va bien pourtant ;-)
Eh bie nje viens de refaire l'essai chez moi avec deux bases test ( tu
penses bien que je test avant de le faire sur une appli du boulot car comme
ça, si je "merdouille " un peu, il vaut mieux que ce soit sur des bases sans
importance ;-) ) et ça ne vas pas ; mais là j'ai l'erreur 3024 ( Impossible
de trouver le fichier :"C:Documents............"
Et je suis sûr et certain du chemin ( dans Mes Documents c'est pas
difficile ) et j'ai copié/collé ta fonction, donc pas d'erreur de recopiage
;-)
Mais bon, si ça fonctionne quand tu test, ça devrait aussi fonctionner chez
moi ! Donc, pas de mystère, l'erreur est de mon côté ; mais ou ?
Bon je vais continuer à chercher ;-)
Merci encore Pierre et excuse moi
--
@+
Ayrton
http://cerbermail.com/?ljOK1CRTMt
Charte NG :
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Bonjour *3stone* Dans ton message de news:, Tu as pensé très fort :-(*)
Salut,
Bonsoir 3stone,
Tu as fermé proprement la première ? Pas de Christophe.ldb qui traîne ?
Je ne pense pas
ExécuterCode...
Oui exact
Je viens de faire le test... tout va bien pourtant ;-)
Eh bie nje viens de refaire l'essai chez moi avec deux bases test ( tu penses bien que je test avant de le faire sur une appli du boulot car comme ça, si je "merdouille " un peu, il vaut mieux que ce soit sur des bases sans importance ;-) ) et ça ne vas pas ; mais là j'ai l'erreur 3024 ( Impossible de trouver le fichier :"C:Documents............" Et je suis sûr et certain du chemin ( dans Mes Documents c'est pas difficile ) et j'ai copié/collé ta fonction, donc pas d'erreur de recopiage ;-)
Mais bon, si ça fonctionne quand tu test, ça devrait aussi fonctionner chez moi ! Donc, pas de mystère, l'erreur est de mon côté ; mais ou ? Bon je vais continuer à chercher ;-)
Merci encore Pierre et excuse moi
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Ayrton [ASC]
Re Pierre,
Eh bien je viens t'annoncer que je suis encore plus mauvais que ce que je croyais! ;-) En chechant bien d' où venait mon erreur, je visn de m'apercevoir qu'au lieu de nommer le fichier avec l'extension.mdb, je le faisais en marquant.mbd ;-( Donc forcément, ça marcahit pas ! En mettant bien la bonne extension, ça fonctionne pil poil ! ;-)
Comme quoi la route est encore longue ! ! !
Avec encore toutes mes excuses pour t' avoir solliciter bêtement et tous mes remerciements pour tes conseils toujours aussi précieux !
Bonne soirée
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Re Pierre,
Eh bien je viens t'annoncer que je suis encore plus mauvais que ce que je
croyais! ;-)
En chechant bien d' où venait mon erreur, je visn de m'apercevoir qu'au lieu
de nommer le fichier avec l'extension.mdb, je le faisais en marquant.mbd
;-( Donc forcément, ça marcahit pas !
En mettant bien la bonne extension, ça fonctionne pil poil ! ;-)
Comme quoi la route est encore longue ! ! !
Avec encore toutes mes excuses pour t' avoir solliciter bêtement et tous mes
remerciements pour tes conseils toujours aussi précieux !
Bonne soirée
--
@+
Ayrton
http://cerbermail.com/?ljOK1CRTMt
Charte NG :
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
Eh bien je viens t'annoncer que je suis encore plus mauvais que ce que je croyais! ;-) En chechant bien d' où venait mon erreur, je visn de m'apercevoir qu'au lieu de nommer le fichier avec l'extension.mdb, je le faisais en marquant.mbd ;-( Donc forcément, ça marcahit pas ! En mettant bien la bonne extension, ça fonctionne pil poil ! ;-)
Comme quoi la route est encore longue ! ! !
Avec encore toutes mes excuses pour t' avoir solliciter bêtement et tous mes remerciements pour tes conseils toujours aussi précieux !
Bonne soirée
-- @+ Ayrton http://cerbermail.com/?ljOK1CRTMt Charte NG : http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
3stone
Salut;
"Ayrton [ASC]" [...] | En mettant bien la bonne extension, ça fonctionne pil poil ! ;-)
Ben voilà... c'est ce qui importe...
Allez, accroche-toi ! Et comme le disait Lucien Jeunesse, "à demain si vous le voulez bien"