Discussion :

[DJOUFOU]

Bonjour chers tous,
j'ai un sérieux problème, au moment j'ai presque finis de tout monter, ma base de données refuse de s'ouvrir. j'ai travailler sur la BD il y'a 2 jours en y apportant d'importantes modifications. Aujourd'hui dès que j’essaie de l'ouvrir voici le message qui apparait: "Microsoft Access a cesser de fonctionner. Windows recherche une solution au problème". et quelques instant plus tard un message dit "un problème a fait que le programme a cesser de fonctionner correctement. Windows va fermer ce programme et vous indiquez si une solution est disponible."
j'ai tout essayer mais rien a faire. j'ai même changer de poste mais rien. Existe t-il une solution?
merci d'avance

[DJOUFOU]

Ce sue j'ai oublié de dire c'est que j'ai une fenêtre connexion qui s'affiche a l'ouverture de la BD et c'est que je clic sur le bouton OK du formulaire après avoirs entré mon login et mot de passe que j'ai ces messages.
les autres bases de données s'ouvrent bien sur.
voici le code VBA de ce formulaire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Private Sub Commande176_Click()
If [connexionlogin] = "" Or [connexionmdp] = "" Then
MsgBox "Veuillez renseigner tous les champs.", vbOKOnly, "FreeMan connexion"
ElseIf StrComp([Conca], [connexionconcatener], vbBinaryCompare) = 0 Then
MsgBox "Bienvenue Dans FreeMan V1.0"
Me.Visible = False
Form_Accueil.Visible = True
Else
MsgBox "Identifiants incorrects. Veuillez réessayer.", vbInformation + vbOKOnly, "FreeMan Connexion"
End If
End Sub

En tout cas ça marchais très bien jusqu'à aujourd'hui.

[loufab]

Bonjour,

Essaye cette manip :

http://blogaccess.free.fr/?s=decomp

Cordialement,

[DJOUFOU]

Ok je vais regarder et vous revenir. Merci

[DJOUFOU]

Merci à Loufab pour son lien. je suis allé regarder mais avant de l’essayer j'ai encore insisté pour ouvrir l'application. j'ai réussi a contourner la fenêtre connexion et je vous épargne des détails à ce niveau car vous savez que lorsqu'on à mis en place un système de sécurité, on sait aussi comment le contourner en cas d'urgence. Alors bref, je me suis retrouver sur l'application sans avoir à cliquer sur le bouton OK de mon formulaire connexion puisque c'est de la que venait le problème. Alors une fois sur l'application, je suis allé directement dans VBA pour voir ce que le code avait, après des recherches infructueuses, j'ai cliqué sur "compiler ..." dans l'onglet "Débogage". Et devinez ce qui se passe: il y avait un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private sub...
.
.
.
End sub
End sub

il y avait un end sub qui était la tout seul sans père. je l'ai donc effacé et compilé encore le code. une fois sûr qu'il n’y avait plus de problème dans mon code, j'ai fermé l'application et rouverte en cliquant sur le bouton OK de ma fenêtre connexion et ça marche sans problème. En tout cas pour l'instant. Je finis donc par conclure qu'un tel problème est lié au code VBA, alors assurez vous toujours votre code est compilé(lorsque le code est compilé, vous voyez que "Compiler ..." est grisé).

[loufab]

quoi quoi quoi !!! tu ne compiles pas ton code avant de l'exécuter ?!!

Décoches "compilation sur demande" dans ce cas !

[DJOUFOU]

A vrai dire je ne savais pas à quoi sa servait de compiler un code. Maintenant je pense que je le sais. Mais Loufab, vous me demandez de décocher "Compilation sur demande", ou est ce que je trouve cette commande? et à quoi sa sert de decocher cette commande?