Bug VB6 ???Résolu

Question

Bonjour, 



J'ai un controle adodc et un datagrid sur une feuille. J'ai des champs
de saisie qui me permettent d'ajouter des donn&#233;es dans ma base access.
Quand je valide mes changements, le datagrid doit "recharger" les
donn&#233;es.

Pour cela j'utilise adodc1.refresh



J'ai trois types d'action sur la base : ajout/modification/suppression



La mise a jour se fait sans probleme quand je modifie ou supprime un enregistrement, mais pas quand je l'ajoute. 



Ca pourrait venir de mon code, sauf que quand j'execute le code en mode
"pas a pas" ca fonctionne a 100%, mon datagrid affiche bien la nouvelle
donn&#233;e saisie.



Qq un a t-il deja eu ce genre de probleme : marche jamais en execution normale mais marche toujours en pas a pas?



Merci de m'eclairer la dessus...



Cordialement,

Mathieu.

Renfield · Accepted Answer

un DoEvents juste avant le raffraichissement (plus radical, un Sleep avec une durée de quelques millisecondes..)

'# Partie déclaration Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

'# dans le code xxx.Update Sleep 750 '# régler ici la durée en millisecondes xxx.Refresh

Amusez-vous ! Renfield - thomas_reynald@msn.com Admin CodeS-SourceS - MVP Visual Basic

omsylv · Answer

Salut, moi je suis en VBA et quand j'utilise .refresh &#231;a marche au
petit bonheur la chance tandis qu'avec .recalc &#231;a fonctionne &#224; tous les
coups. Regarde si tu dispose de .recalc

AbsolutBeauty · Answer

Non, pas de recalc sous vb6.

Merci quand meme,

Mathieu.

Renfield · Answer

essaies .Reload 

Amusez-vous ! 
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS - MVP Visual Basic

AbsolutBeauty · Answer

Bonjour,

ne prennez pas ca mal, mais donnez une solution si vous pensez qu'elle est bonne lol 

Reload n'existe pas pas non plus. Si c'est pour inventer des mots je peux tr&#233;s bien le faire tout seul 



Si qq un a une vraie reponse, je suis tjrs prenneur.



Cdt,

Mathieu.

Renfield · Answer

Sub ReBind()
    Membre de MSDataGridLib.DataGrid
    R&#233;initialise la grille &#224; partir de la table de source de donn&#233;es

voil&#224;, ca devrait aller.... 

a voir ce qui coince, a savoir : les donn&#233;es ne sont elles pas r&#233;cup&#233;r&#233;es
ou les donn&#233;es ne sont elles pas affich&#233;es.... (auquel cas fais un Grid1.Refresh)

le forum a un bug et enl&#232;ve parfois le msg complet, parfois une phrase. En l'occurence, ma derni&#232;re phrase a &#233;t&#233; ot&#233;e... Elle disais de regarder une fonction qui porterait un nom dans le genre
pour info, et si c'est bien la solution a ton probleme, ca m'a pris cinq minutes en utilisant l'explorateur d'objets (F2). Donc si c'est pour etre d&#233;sagr&#233;able, tu peux te contenter de t'en servir, ca t'eviteras d'aller agacer les gens sur le Forum.

Amusez-vous ! 
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS - MVP Visual Basic

AbsolutBeauty · Answer

Cher Renfield,



j'ai pas &#233;t&#233; desagr&#233;able, y a un "lol" et un gros smiley. Si on peut plus rigoler.... Faut se detendre ;)

Ok, ta phrase a &#233;t&#233; coup&#233;e par un bug, mais j'etais pas cens&#233; le savoir.



Ensuite, tu as mit 5 min a trouver la r&#233;ponse. Y a surement un paquet
de choses que tu ferais plus rapidement que moi, c'est d'ailleurs la
raison pour laquelle je pose des questions sur le forum.



Mais pour un revenir au plus important, ca marche toujours pas "a
vitesse normale" alors que ca fonctionne en pas a pas, donc je comprend
pas.



Merci,



Mathieu.

Renfield · Answer

vraiment &#233;trange...

la mise a jour a peut etre pas le temps d'&#234;tre accomplie alors que tu demande a r&#233;-afficher la chose....


faudrait ajouter un Sleep qq chose pour faire patienter un peu, au moins pour le test.

me suis emport&#233; un tit peu, j'avoues, bref.

Amusez-vous ! 
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS - MVP Visual Basic

AbsolutBeauty · Answer

Re,



C'est bien un probleme de temps : j'ai mit une message box avant le adodc1.refresh, et ca marche.

Donc, au lieu de regler le probleme je le contourne : je vais afficher un joli message "Votre entr&#233;e est ajout&#233;e"

Comme ca le temps que le type clic sur "Ok", la mise a jour a bien le temps de se faire lol



Mais ca serait quand meme bien de trouver une solution plus "pro"



En tout cas merci,



Mathieu.



PS : je met pas "r&#233;ponse accept&#233;e" parce que nous n'avons d&#233;couvert que le probleme, pas la solution

AbsolutBeauty · Answer

Super, ca marche bien. Pour info, a
450 ca passe pas, a 500 ca passe. J'ai pas le temps (et l'envie lol)
d'aller chercher la valeur exacte. Mais ca depend surement de la
machine, dc je vais prendre un peu plus de marge.



En tout cas merci pour la solution.



Mathieu.

Bug VB6 ???

10 réponses

Discussions similaires