Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Mémoire libre insuffisante ....

12 réponses
Avatar
Isabelle
Bonjour

Je travaille actuellement sur une base de données
J'essaye grâce aux conseils et astuces données ici d'améliorer ma base
Or depuis cinq minutes, je ne plus rien faire
Microsoft Access => Mémoire libre insuffisante pour mettre à jour
l'affichage. Fermez les programmes qui ne sont pas indispensables, puis
réessayez

A noter, je travaille sur ma base sur un autre micro que celui-ci et
rien d'autre n'est ouvert

Une idée ?

Merci

2 réponses

1 2
Avatar
Thierry (ze Titi)
et justement, j'étais entrain de voir si je ne pouvais pas mettre le code à
l'ouverture du formulaire frm_calculette_pourcentage
Pas certain que ça soit une bonne idée... Et si tu dois utiliser cette calculatrice à partir d'un autre formulaire ? Tu recréeras un formulaire identique mais destiné à un autre formulaire ? Bof...


Le code qui suit est à mettre dans un module quelconque (à ne pas nommer isLoaded, bien entendu...) :

Function isLoaded(strForm As String) As Boolean
Dim frm As Form
isLoaded = False
For Each frm In Forms
If frm.Name = strForm Then isLoaded = True
Next
End Function

Et toujours au même endroit:

Dim rs As DAO.RecordSet
If Not isLoaded("frm_calculette_pourcentage") Then DoCmd.OpenForm "frm_calculette_pourcentage"
set rs=Me.RecordsetClone
rs.MoveLast
Forms!frm_calculette_pourcentage!textbox_ancien_loyer=rs!leChampAdequat
Set rs=Nothing


En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
et justement, j'étais entrain de voir si je ne pouvais pas mettre le code à
l'ouverture du formulaire frm_calculette_pourcentage

Dim rs As DAO.RecordSet
Set rs =????
Forms!suivi!REVISION_DU =rs!txbox_ancien_loyer
Set rs=Nothing

P.S. je vais avoir plusieurs calculettes(calcul différent) et j'aimerais à
l'ouverture de l'un de ces formulaires, afficher dans la zone correspondante
le dernier montant indiqué dans la zone REVISION_DU du formulaire suivi




Il faut que le formulaire soit ouvert pour que ça fonctionne. Est-ce le cas
?

En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
C'est encore moi

j'ai remplacé le code comme ci-dessous mais
erreur d'exécution 2450
Impossible de trouver le formulaire
"frm_calculette_pourcentage" auquel il fait référence dans une autre macro


Forms("frm_calculette_pourcentage").Controls("textbox_ancien_loyer")=rs!leNomDuChamp



En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
bon, tu avais raison j'avais un espace dans le champ REVISION_DU
suite à la modif dans ma table
Bref, j'ai réparé, regardé tout et revu mes requêtes

mais pour le code

Dim rs As DAO.RecordSet
set rs=Me.RecordsetClone
rs.MoveLast
Forms!frm_calculette_pourcentage!textbox_ancien_loyer=rs!REVISION_DU
Set rs=Nothing

A l'ouverture du formulaire j'ai une autre erreur
Impossible de trouver le formulaire
"frm_calculette_pourcentage" auquel il fait référence dans une autre
macro

pourtant j'ai bien regardé et c'est bien le nom du formulaire

Je vais pleurer !!



On en revient à ce que je disais, il te faut vérifier que le champ
REVISION_DU fait bien partie des champs de la source du formulaire.

En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
non pas d'autres problèmes

je viens de ressaisir le code en faisant attention, je n'ai plus de
problème de mémoire (j'avais sans doute fait une erreur de frappe)

Par contre, cela ne marche pô :-(

il n'aime pas la ligne suivante
Forms!calculette_pourcentage!txbox_ancien_loyer=rs!REVISION_DU



Cela ne viendrait pas de la dernière ligne d'un code que tu m'as
donné que j'ai peut-être mal saisi ?
Set rs=Nothing
Ca me surprendrait beaucoup puisque c'est la procédure classique pour

libérer une variable de ce type.
Tu n'as pas de problèmes ailleurs dans la base ? Pas de plantages
innopinés ou de messages d'erreurs curieux ?

En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
Tu crois?

Cela ne viendrait pas de la dernière ligne d'un code que tu m'as
donné que j'ai peut-être mal saisi ?
Set rs=Nothing

car depuis que j'ai supprimé tout le code, enregistrer et fermer
Access puis ouverture de la base, je n'ai plu de soucis de mémoire



Bonjour Isabelle !

Ce doit être un problème de corruption. Pour le résoudre, ouvre une
nouvelle base et importes-y tous les objets de ta base existante.

Message du lundi 05/11/2007

Bonjour

Je travaille actuellement sur une base de données
J'essaye grâce aux conseils et astuces données ici d'améliorer ma
base
Or depuis cinq minutes, je ne plus rien faire
Microsoft Access => Mémoire libre insuffisante pour mettre à jour
l'affichage. Fermez les programmes qui ne sont pas indispensables,
puis réessayez

A noter, je travaille sur ma base sur un autre micro que celui-ci
et rien d'autre n'est ouvert

Une idée ?

Merci














--
Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info











Avatar
Isabelle
J'en ai marre !

Pourtant ce n'est pas que tu m'aides pas

Bon j'ai fait tout comme tu m'as dit

A l'ouverture du formulaire, je sélectionne dans ma liste pour
visualiser un enregistrement , s'affiche l'enregistrement plus le
formulaire Calculette avec un montant qui correspond à je ne sais quoi

et toujours le même montant peu importe l'enregistrement que je choisi

L'idée de mettre un code à l'ouverture de la calculette serait peut-être
mieux
sachant qu'il y a plusieurs calculettes soit avec % soit avec autre calcul

Donc en fonction de l'enregistrement, l'utilisateur choisit la
calculette correspondante et à l'ouverture de cette calculette s'affiche
le dernier montant saisi dans le formulaire suivi

C'est pas compliqué quand même ! ;-)




et justement, j'étais entrain de voir si je ne pouvais pas mettre le code à
l'ouverture du formulaire frm_calculette_pourcentage
Pas certain que ça soit une bonne idée... Et si tu dois utiliser cette calculatrice à partir d'un autre formulaire ? Tu recréeras un formulaire identique mais destiné à un autre formulaire ? Bof...


Le code qui suit est à mettre dans un module quelconque (à ne pas nommer isLoaded, bien entendu...) :

Function isLoaded(strForm As String) As Boolean
Dim frm As Form
isLoaded = False
For Each frm In Forms
If frm.Name = strForm Then isLoaded = True
Next
End Function

Et toujours au même endroit:

Dim rs As DAO.RecordSet
If Not isLoaded("frm_calculette_pourcentage") Then DoCmd.OpenForm "frm_calculette_pourcentage"
set rs=Me.RecordsetClone
rs.MoveLast
Forms!frm_calculette_pourcentage!textbox_ancien_loyer=rs!leChampAdequat
Set rs=Nothing


En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
et justement, j'étais entrain de voir si je ne pouvais pas mettre le code à
l'ouverture du formulaire frm_calculette_pourcentage

Dim rs As DAO.RecordSet
Set rs =????
Forms!suivi!REVISION_DU =rs!txbox_ancien_loyer
Set rs=Nothing

P.S. je vais avoir plusieurs calculettes(calcul différent) et j'aimerais à
l'ouverture de l'un de ces formulaires, afficher dans la zone correspondante
le dernier montant indiqué dans la zone REVISION_DU du formulaire suivi




Il faut que le formulaire soit ouvert pour que ça fonctionne. Est-ce le cas
?

En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
C'est encore moi

j'ai remplacé le code comme ci-dessous mais
erreur d'exécution 2450
Impossible de trouver le formulaire
"frm_calculette_pourcentage" auquel il fait référence dans une autre macro


Forms("frm_calculette_pourcentage").Controls("textbox_ancien_loyer")=rs!leNomDuChamp



En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
bon, tu avais raison j'avais un espace dans le champ REVISION_DU
suite à la modif dans ma table
Bref, j'ai réparé, regardé tout et revu mes requêtes

mais pour le code

Dim rs As DAO.RecordSet
set rs=Me.RecordsetClone
rs.MoveLast
Forms!frm_calculette_pourcentage!textbox_ancien_loyer=rs!REVISION_DU
Set rs=Nothing

A l'ouverture du formulaire j'ai une autre erreur
Impossible de trouver le formulaire
"frm_calculette_pourcentage" auquel il fait référence dans une autre
macro

pourtant j'ai bien regardé et c'est bien le nom du formulaire

Je vais pleurer !!



On en revient à ce que je disais, il te faut vérifier que le champ
REVISION_DU fait bien partie des champs de la source du formulaire.

En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
non pas d'autres problèmes

je viens de ressaisir le code en faisant attention, je n'ai plus de
problème de mémoire (j'avais sans doute fait une erreur de frappe)

Par contre, cela ne marche pô :-(

il n'aime pas la ligne suivante
Forms!calculette_pourcentage!txbox_ancien_loyer=rs!REVISION_DU



Cela ne viendrait pas de la dernière ligne d'un code que tu m'as
donné que j'ai peut-être mal saisi ?
Set rs=Nothing
Ca me surprendrait beaucoup puisque c'est la procédure classique pour

libérer une variable de ce type.
Tu n'as pas de problèmes ailleurs dans la base ? Pas de plantages
innopinés ou de messages d'erreurs curieux ?

En ce jour mémorable du lundi 05/11/2007, tu as émis l'idée suivante:
Tu crois?

Cela ne viendrait pas de la dernière ligne d'un code que tu m'as
donné que j'ai peut-être mal saisi ?
Set rs=Nothing

car depuis que j'ai supprimé tout le code, enregistrer et fermer
Access puis ouverture de la base, je n'ai plu de soucis de mémoire



Bonjour Isabelle !

Ce doit être un problème de corruption. Pour le résoudre, ouvre une
nouvelle base et importes-y tous les objets de ta base existante.

Message du lundi 05/11/2007

Bonjour

Je travaille actuellement sur une base de données
J'essaye grâce aux conseils et astuces données ici d'améliorer ma
base
Or depuis cinq minutes, je ne plus rien faire
Microsoft Access => Mémoire libre insuffisante pour mettre à jour
l'affichage. Fermez les programmes qui ne sont pas indispensables,
puis réessayez

A noter, je travaille sur ma base sur un autre micro que celui-ci
et rien d'autre n'est ouvert

Une idée ?

Merci

























1 2