Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom de
mon
formulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait plein
de modifs)
cdlt
Alain
Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom de
mon
formulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait plein
de modifs)
cdlt
Alain
Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom de
mon
formulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait plein
de modifs)
cdlt
Alain
Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm & ".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " & strForm, _
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom de
monformulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
plein
de modifs)
cdlt
Alain
Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm & ".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " & strForm, _
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le message
news: eW7dBd5dDHA.560@tk2msftngp13.phx.gbl...
Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom de
mon
formulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
plein
de modifs)
cdlt
Alain
Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm & ".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " & strForm, _
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom de
monformulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
plein
de modifs)
cdlt
Alain
Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:
bjn6ip$k4o$Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm & ".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " & strForm,
_
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom
de
monformulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
pleinde modifs)
cdlt
Alain
Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" <jessy.sempere@prg.sncf.fr> a écrit dans le message de
news:
bjn6ip$k4o$1@muguet.sncf.fr...
Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm & ".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " & strForm,
_
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le message
news: eW7dBd5dDHA.560@tk2msftngp13.phx.gbl...
Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom
de
mon
formulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
plein
de modifs)
cdlt
Alain
Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:
bjn6ip$k4o$Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm & ".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " & strForm,
_
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom
de
monformulaire'
asurez vous que l'objet existe et que vous avez corretement saisi son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
pleinde modifs)
cdlt
Alain
il faut effectivement copier ce code dans un module et ensuite il faut se
placer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news:Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:bjn6ip$k4o$Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,
_vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le
message
news:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom
demonformulaire'
asurez vous que l'objet existe et que vous avez corretement saisi
son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
pleinde modifs)
cdlt
Alain
il faut effectivement copier ce code dans un module et ensuite il faut se
placer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le message
news: uEXyku5dDHA.3992@TK2MSFTNGP11.phx.gbl...
Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" <jessy.sempere@prg.sncf.fr> a écrit dans le message de
news:
bjn6ip$k4o$1@muguet.sncf.fr...
Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,
_
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le
message
news: eW7dBd5dDHA.560@tk2msftngp13.phx.gbl...
Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom
de
mon
formulaire'
asurez vous que l'objet existe et que vous avez corretement saisi
son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
plein
de modifs)
cdlt
Alain
il faut effectivement copier ce code dans un module et ensuite il faut se
placer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news:Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:bjn6ip$k4o$Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm & ".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,
_vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le
message
news:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet 'nom
demonformulaire'
asurez vous que l'objet existe et que vous avez corretement saisi
son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais fait
pleinde modifs)
cdlt
Alain
Ok Jessy
Comme je n'arrivais pas à sauvegarder mon module dans ma base, j'ai crée
une
base dans laquelle j'ai d'abord copié ton
code puis j'ai importé tous mes éléments de ma base vérolée.
Lorque je fait F5 sur ta fonction j'ai le message d'erreur suivant:
'erreur d'execution 2950'
'erreur réservée'
que me conseilles tu de faire ?
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:
bjn7k5$kt4$il faut effectivement copier ce code dans un module et ensuite il faut
se
placer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news:Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:bjn6ip$k4o$Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm &
".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,_vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le
messagenews:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet
'nom
demonformulaire'
asurez vous que l'objet existe et que vous avez corretement saisi
sonnom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais
fait
pleinde modifs)
cdlt
Alain
Ok Jessy
Comme je n'arrivais pas à sauvegarder mon module dans ma base, j'ai crée
une
base dans laquelle j'ai d'abord copié ton
code puis j'ai importé tous mes éléments de ma base vérolée.
Lorque je fait F5 sur ta fonction j'ai le message d'erreur suivant:
'erreur d'execution 2950'
'erreur réservée'
que me conseilles tu de faire ?
cdlt
Alain
"Jessy SEMPERE" <jessy.sempere@prg.sncf.fr> a écrit dans le message de
news:
bjn7k5$kt4$1@muguet.sncf.fr...
il faut effectivement copier ce code dans un module et ensuite il faut
se
placer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le message
news: uEXyku5dDHA.3992@TK2MSFTNGP11.phx.gbl...
Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" <jessy.sempere@prg.sncf.fr> a écrit dans le message de
news:
bjn6ip$k4o$1@muguet.sncf.fr...
Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm &
".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,
_
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le
message
news: eW7dBd5dDHA.560@tk2msftngp13.phx.gbl...
Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet
'nom
de
mon
formulaire'
asurez vous que l'objet existe et que vous avez corretement saisi
son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais
fait
plein
de modifs)
cdlt
Alain
Ok Jessy
Comme je n'arrivais pas à sauvegarder mon module dans ma base, j'ai crée
une
base dans laquelle j'ai d'abord copié ton
code puis j'ai importé tous mes éléments de ma base vérolée.
Lorque je fait F5 sur ta fonction j'ai le message d'erreur suivant:
'erreur d'execution 2950'
'erreur réservée'
que me conseilles tu de faire ?
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:
bjn7k5$kt4$il faut effectivement copier ce code dans un module et ensuite il faut
se
placer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news:Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:bjn6ip$k4o$Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm &
".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,_vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le
messagenews:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet
'nom
demonformulaire'
asurez vous que l'objet existe et que vous avez corretement saisi
sonnom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais
fait
pleinde modifs)
cdlt
Alain
malheureusement pas grand chose, c'étais une solution pour
éviter de réimporter tous les objets dans une nouvelle base,
donc si tu l'as fait, le code que je t'ai donné n'est plus utile.
mais après réimportation, peux-tu ouvrir ton formulaire à pb ???
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news: #FKIN#Ok Jessy
Comme je n'arrivais pas à sauvegarder mon module dans ma base, j'ai crée
unebase dans laquelle j'ai d'abord copié ton
code puis j'ai importé tous mes éléments de ma base vérolée.
Lorque je fait F5 sur ta fonction j'ai le message d'erreur suivant:
'erreur d'execution 2950'
'erreur réservée'
que me conseilles tu de faire ?
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:bjn7k5$kt4$il faut effectivement copier ce code dans un module et ensuite il faut
seplacer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le
message
news:Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message
de
news:bjn6ip$k4o$Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm &
".txt"DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,_vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le
messagenews:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet
'nomdemonformulaire'
asurez vous que l'objet existe et que vous avez corretement
saisi
sonnom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais
faitpleinde modifs)
cdlt
Alain
malheureusement pas grand chose, c'étais une solution pour
éviter de réimporter tous les objets dans une nouvelle base,
donc si tu l'as fait, le code que je t'ai donné n'est plus utile.
mais après réimportation, peux-tu ouvrir ton formulaire à pb ???
@+
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le message
news: #FKIN#5dDHA.568@TK2MSFTNGP11.phx.gbl...
Ok Jessy
Comme je n'arrivais pas à sauvegarder mon module dans ma base, j'ai crée
une
base dans laquelle j'ai d'abord copié ton
code puis j'ai importé tous mes éléments de ma base vérolée.
Lorque je fait F5 sur ta fonction j'ai le message d'erreur suivant:
'erreur d'execution 2950'
'erreur réservée'
que me conseilles tu de faire ?
cdlt
Alain
"Jessy SEMPERE" <jessy.sempere@prg.sncf.fr> a écrit dans le message de
news:
bjn7k5$kt4$1@muguet.sncf.fr...
il faut effectivement copier ce code dans un module et ensuite il faut
se
placer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le
message
news: uEXyku5dDHA.3992@TK2MSFTNGP11.phx.gbl...
Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" <jessy.sempere@prg.sncf.fr> a écrit dans le message
de
news:
bjn6ip$k4o$1@muguet.sncf.fr...
Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm &
".txt"
DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"
Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,
_
vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
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/
------------------------------------
"alain teyssedre" <alain.teyssedre@iae-aix.com> a écrit dans le
message
news: eW7dBd5dDHA.560@tk2msftngp13.phx.gbl...
Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet
'nom
de
mon
formulaire'
asurez vous que l'objet existe et que vous avez corretement
saisi
son
nom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais
fait
plein
de modifs)
cdlt
Alain
malheureusement pas grand chose, c'étais une solution pour
éviter de réimporter tous les objets dans une nouvelle base,
donc si tu l'as fait, le code que je t'ai donné n'est plus utile.
mais après réimportation, peux-tu ouvrir ton formulaire à pb ???
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le message
news: #FKIN#Ok Jessy
Comme je n'arrivais pas à sauvegarder mon module dans ma base, j'ai crée
unebase dans laquelle j'ai d'abord copié ton
code puis j'ai importé tous mes éléments de ma base vérolée.
Lorque je fait F5 sur ta fonction j'ai le message d'erreur suivant:
'erreur d'execution 2950'
'erreur réservée'
que me conseilles tu de faire ?
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message de
news:bjn7k5$kt4$il faut effectivement copier ce code dans un module et ensuite il faut
seplacer sur la fonction restoreExe() et appuiyer sur la touche F5
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le
message
news:Salut Jessy
J'ai compacté la base ==> ça ne change rien
J'ai crée un module ou j'ai inséré ton code mais
le pb c'est que je ne peux pas lancer de compilation
il me met 3 ou 4 messages box identique : Opération annulée
et ça se termine par : "Erreur de compilation - module introuvable"
(dans la fenetre execution j'ecris : call RestoreExe)
merci de me dire si ma manip est ok ou pas
cdlt
Alain
"Jessy SEMPERE" a écrit dans le message
de
news:bjn6ip$k4o$Bonjour
première chose, tu dois compacter la base
ensuite si le problème persiste, tu peux essayer le code qui suit
il m'avait permis de récupérer un formulaire qui avait le même
problème que toi mais rien est garantie...
par contre fait une sauvegarde de ta base avant de le lancer.
Donc tu dois lancer la fonction "RestoreEXE"
**********************************************
Function RestoreEXE()
RestoreFormFailed "TonFormulaire"
End Function
Function RestoreFormFailed(strForm As String)
Application.SaveAsText acForm, strForm, CurDir & strForm &
".txt"DoCmd.DeleteObject acForm, strForm
Application.LoadFromText acForm, strForm, CurDir & strForm &
".txt"Kill CurDir & strForm & ".txt"
If MsgBox("Voulez-vous essayer d'ouvrir le formulaire : " &
strForm,_vbYesNo) = vbYes Then
DoCmd.OpenForm strForm, acNormal
End If
End Function
**********************************************
@+
Jessy Sempere - Access MVP
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"alain teyssedre" a écrit dans le
messagenews:Bonjour
Il ne m'est plus possible d'ouvrir un de mes formulaire.
Lorsque je clique dessus , j'ai un message d'erreur du type:
" le moteur de la base de donnée jet n'a pas pu trouver l'objet
'nomdemonformulaire'
asurez vous que l'objet existe et que vous avez corretement
saisi
sonnom"
Comment récupérer mon formulaire ? (parceque bien sur j'y avais
faitpleinde modifs)
cdlt
Alain
Non même aprés ré-importation je ne peux pas l'ouvrir
Non même aprés ré-importation je ne peux pas l'ouvrir
Non même aprés ré-importation je ne peux pas l'ouvrir
Salut,
"alain teyssedre"Non même aprés ré-importation je ne peux pas l'ouvrir
Reste à essayer un coup de /decompile
http://www.trigeminal.com/usenet/usenet004.asp?1036
--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------
Salut,
"alain teyssedre"
Non même aprés ré-importation je ne peux pas l'ouvrir
Reste à essayer un coup de /decompile
http://www.trigeminal.com/usenet/usenet004.asp?1036
--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------
Salut,
"alain teyssedre"Non même aprés ré-importation je ne peux pas l'ouvrir
Reste à essayer un coup de /decompile
http://www.trigeminal.com/usenet/usenet004.asp?1036
--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------