Access VBA Recordset.eof Fermé

Question

Bonjour,

J'ai codé une application access 2007 qui marchait très bien à un instant x et qui à un instant y s'est mise à dysfonctionner. 

J'ai localisé l'erreur qui est qu'une des tables de ma base de donnée me renvoie un mauvais "end of file".

En fait lorsque j'ouvre ma base de données (en DAO) et que je fais table.movelast je récupère l'identifiant de la 78eme ligne de la table qui en comporte 99 !
De la même façon un code du type :

While table.eof=false do

         table.movenext

wend

msgbox table!identifiant

Me renvoie à la 78eme ligne (donc ce n'est pas un problème de movelast).

L'ironie c'est qu'à force de bidouiller pour arriver à réparer l'erreur, en retapant le même code à la lettre près la table s'est "débloqué" et me renvoie à présent le bon identifiant pour un table.movelast.
Le problème c'est que cette erreur s'est produite 2 fois, que l'application en question est destinée à une entreprise et que je ne pourrai pas venir fixer l'erreur indéfiniment tout les 2-3 mois quand ca se produit.

Quelqu'un aurait il une idée d'où pourrait venir l'erreur?

Je vous remercie d'avance pour le temps que vous m'accorderez.

blux · Answer

Salut,

en l'absence de critère spécifique, les données sont renvoyées dans un ordre indéfini lors du parcours d'un recordset (comme dans tout sgbd, d'ailleurs).

Cet ordre est celui qui préside au stockage. Les données ne sont pas classées et renvoyées dans l'ordre de la clé primaire (ou alors par le plus grand des hasards).

Si tu veux faire un movelast sur ta clé primaire, tu dois faire comme suit :

nom_du_rs.index = "PrimaryKey"
nom_du_rs.movelast

ultwee · Answer

"Cet ordre est celui qui préside au stockage."

Si je comprend bien ce que vous voulez dire c'est que l'ordre des enregistrements c'est l'ordre dans lequel ils ont été enregistrés. Si c'est bien ce que vous avez voulu m'expliquer c'est comme ça que j'ai raisonné pour faire l'application et c'est bien comme ca que ca marche jusqu'à ce qu'un évènement dont j'ignore le pourquoi du comment intervienne et "bloque" la fin de la table à une valeur quelconque.

Dans tout les cas ma clé primaire est en "num auto" donc s'incrémente dans un ordre croissant automatiquement à chaque enregistrement et donc mon enregistrement id=99 est donc forcement après mon enregistrement id=78 puisque l'enregistrement a eu lieu après.

Ce qui me trouble le plus c'est que mon code marche très bien à un instant x puis a un instant y se met a dysfonctionner indéfiniment (jusqu'à ce que je fix l'erreur).

ultwee · Answer

J'essaye ça la semaine prochaine en espérant que ça marche.

Merci beaucoup du temps que vous m'avez accordé :)

blux · Answer

Sans oublier que les données de la base, le code, les formulaires sont stockés dans un fichier unique (à défaut de tables attachées)

La taille de la base ne croit pas linéairement avec le volume de données que l'on y stocke, mais croit par incréments : access stocke donc les données selon des critères particuliers...

Le fait de changer du code (suppression, re-création...) a sans doute provoqué dans access un 'retassement' des données (plus ou moins équivalent à la commande compresser une base, qui supprime physiquement les données effacées, en lieu et place du marquage logique d'effacement)...

Access VBA Recordset.eof

4 réponses

Discussions similaires