Aide accesss 2000

krack -  
 maniani -
Je fais un programme en access les formulaires me serve de fenetre bon....j'aimerai savoir s'il est possible de bloquer l'effet de la roulette de la souris qui effectue automatique un déplacement d'enregistrement et j'aimerai pouvoir retirer la possibilité de quitter par le bouton X en haut a droite et meme chose pour le menu dans la barre de titre. J'attend donc vos réponse !! et merci !!!

13 réponses

Fada09 Messages postés 1741 Statut Contributeur 545
 
Salut,

Bon pour faire disparaitre la croix, double-clique sur la fenetre pour afficher les propriétés/ Format/boîte de controle met "non".

Bonne chance ++
;-)
~ ~ Fada ~ ~ : Member of Star!alco
0
krack
 
hum merci pour l'aide mais ça je le savais déjà ce que je voulais savoir c est comment on peut enlever le bouton quitter du cadre access qui apparait toujour lorsque mon formulaire se fait exécuter pour le bloquer complètement et bien sur empécher la roulette de la souris d'effectuer des déplacements dans les enregistrements de façon automatique, car pour mon programme si l'utilisateur venait a faire cela dans certain cas ça pourrait cause quelque ennuie. et merci encore pour la peine !!
0
krack
 
À moin que vous ne connaissiez un moyen de créer un éxécutable permettant de se défaire du cadre Access 2000 hé bien j aimerai vraiment avoir de l'aide la dessus !!
C'est plutôt important.
Merci !!
0
Utilisateur anonyme
 
Salut !
Créer un exécutable, oui et non. En fait, avec la version Développer de Office, tu as la possibilité de créer une application se servant du runtime Access : les postes clients n'ont pas besoin d'access, donc ta base est bien indépendante.
Sinon, Fada09 te disait qu'en enlevant la boite de contrôle ça serait bon : il a raison, mais oui ça ne suffit pas, car si tu laisses le menu d'access, il y a forcément le moyen de quitter.
Pour empêcher cela, il suffit de créer ta propre barre de Menu et de ne pas y faire figurer la commande 'Quitter'.
Mais, avant de faire cela, réfléchis à la manière avec laquelle les utilisateurs fermeront l'applic, car c plus risqué de mettre un bouton sur lequel l'utilisateur peut plus facilement cliquer par mégarde que sur le Menu Fichier / Quitter.

Pour l'autre question (roulette), à priori non (enfin je n'ai jamais vu ça), mais si tu nous disais la finalité, on pourrait peut-être + t'aider (si c seulement pour empêcher les utilisateurs de changer d'enregistrement, c facile, mais il ne pourront pas non plus changer d'enregistrement avec les boutons de déplacement).
Enfin bon, soit moins secret, et on pourra peut-être avancer...

@+
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
CryingFreeman
 
Concernant la molette de la souris, pour la désactiver dans un formulaire que t'as crée tu dois saisir un code VB j'ai vu ça dans "développez.com" y a la réponse à ton problème
0
Krack
 
Salut !! et merci pour la réponse à propos de la molette de la souris (je ne connaissais pas le mot exact) Je te remercie, j ai trouvé, il ne me reste qu'à tester...

Puis pour ce qui est du bouton quitter... le but est de forcer l'utilisateur à sauvegarder avant ce quitter pour qu'il obtienne un numéro d'index pour son enregistrement, mais s'il quitte autrement qu’avec les boutons du formulaire, je n'ai aucun contrôle à ce moment et il se retrouve plusieurs enregistrement sans numéro d’index!!! J'ai déjà ma barre de menu vide, j'avais compris cette option, mais le problème est qu’il y a en haut de la barre de menu le cadre Access (je ne sais pas le nom exact, enfin la barre de titre) et il contient les 2 façons communes à tous programmes Windows de quitter le programme étant le X en haut a droite et le double click en haut a gauche (celui-ci est moins dérangeant car moins connu, donc engendrant moins de problème), mais c'est ce bouton que j'aimerai retirer ou enfin pouvoir gérer.

Merci à l’avance !!
0
CryingFreeman
 
pour le bouton enregistrer et quitter, c'est simple,
tu crée à l'aide de l'assistant un bouton (dans ton formulaire) qui permet un enregistrement, automaitiquement ce bouton servira à enregistrer (tu peux même vérifier en regardant le code VB), si tu ve que ce mêm bouton permet de quitter tout de suite aprés avoir enregistre, tu crées un autre bouton qui permet lui de quitter puis tu va dans le code VB de ce 2ème bouton tu copie le code (qui permet de quitter) et tu le colle dans le 1er bouton tout de suite aprés le code qui permet d'enregistrer et t'aura un bouton qui enregistre puis qui quitte (ce que tu as choisi dans le 2ème boutton cad quitter le formulaire ou quitter carément l'application access) ettu peux supprimer le 2ème bouton qui te sert plus à rien.
0
Utilisateur anonyme
 
Salut CryingFreeman !
C'est pas ce qu'il veut faire...

Krack, j'ai regardé un peu, il y a l'évènement RECORDEXIT qui empêche l'utilisateur de quitter l'enregistrement en cours, essaie de regarder par là...
Sinon, pourquoi ne mets tu pas le numéro d'index comme 'null interdit', de cette manière l'enregistrement ne sera pas sauvegardé, et quand les utilisateurs en auront marre de ressaisir, t'inquiètes pas, le bouton fermer, il ne l'approcheront plus ;-)

@+
0
krack
 
Oui merci je vois que tu a compris ce que je voulais dire je vais essayer cela !!

Je travail d'ailleurs en moment même à essayer de faire fonctionner le code qui empêche le fonctionnement de la molette, j'ai bien effectué toutes les étapes demandées et pourtant lors l'exécution il me retourne une erreur : 50002 erreurs définies par l'application ou par l'objet. Quelqu'un peut m'aider SVP !!! pcq je vois pas trop ou est le problème.

et un gros MERCI !!!
0
CryingFreeman
 
pour la molette il faut demander à des spécialistes de VB
sinon regarde dans l'aide d'access si t'as de la chance tu trouveras la résolution de to pb
0
CryingFreeman
 
pour qu'un numéro d'index se crée pour chaque enregistrement, il faut que le formulaire qui a pour source ce mêm enregistrement se ferme aprés sa saisie
pour atteindre un formulaire qui a le même numéro index que le formulaire suivant tu utilise le code DoCmd.GoToRecord, , acLast
qui te permet d'atteindre le dernier enregistrement
bref si tu ve ke j'te le fasse envoie moi ta base et je la modifierai
0
krack
 
Salut,

Pour cela non ça va tout est fonctionne pour le calcul d'index, et puis il a d'ailleurs fallu que je crée du code un peu plus poussé car il fonctionne en Multi-Utilisateur et Access ne permet pas de lecture sur un enregistrement en lecture ce qui me faisait donc des doublons. Je n'ai donc aucun problème de cet ordre.

Pour ton information, mon programme Access contient environ 3000 lignes de code mais au boulot ils n’ont pas Vb donc je me débrouille avec ce que j'ai, donc Access. Pour ton information je suis programmeur, je suis en stage en ce moment. C'est seulement pour de petit détail que j'ai besoin d'aide n'étant pas expert en Access.

Merci quand même pour l'aide !!
0
Biname
 
Salut,
voici un petit code qui te permettra de désactiver la croix

Tu dois tout dabord créer un module dans lequel tu places le code suivant
-------------------------------------------------------------------------

Option Compare Database

Private Declare Function GetSystemMenu Lib "user32" _
(ByVal hwnd As Long, ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" _
(ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Public Const SC_CLOSE = &HF060&
Public Const MF_BYCOMMAND = &H0&

Public Sub DesacFermeture()
Dim hSysMenu As Long

hSysMenu = GetSystemMenu(Application.hWndAccessApp, False)
RemoveMenu hSysMenu, SC_CLOSE, MF_BYCOMMAND

End Sub

Ensuite, a l'ouverture de ton formulaire ou de ta bd tu appels ta fonction
---------------------------------------------------------------------------

DesacFermeture
0
Jerome
 
Bonjour. Je suis débutant en VBA access. J'ai regarder votre procédure VBA mais je n'arrive pas à la mettre en place.
Car je souhaiterai empecher d'enregistrer le formulaire en fermant avec la croix.
Pourriez-vous m'aider SVP?
Merci d'avance

Jérôme
0
maniani
 
est ce que vous pouvez repondre à mon message : syncronisation des formulaire poster sous le nom maniani
0