[VB6] ADO UPDATE ????

Salut... Je ne comprend plus rien du Update dans ADO.... Voici mon problème.... Je fais un ajout dans ma base de données ACCESS et je fais un UPDATE. Jusqu'ici ca fonctionne.... Si je fais une recherche de cette enregistrement et que je veux faire une modification le update ne fonction pas. Il change aucune information. Je suis capable d'Uptader (de midifier) uniquement la première enregistrement (qui se retourve sur la première ligne de ma Base de Données ACCESS). Pourquoi ca fais ca.... J'ai vu sur le forum cette suggestion " il faut faire un update pour mettre à jour la table avec une condition portant le numéro d'identifiant" Qu'est ce que le numéro identifiant (la clée primaire?????) et il y avant un exemple de code... Update Table Set (champ = '" & tavaleur & "'") where condition = '" & tacondition & "'" Est ce que je doit prendre cette ligne de code ?????? Donc si mon recordset est BD le champs est DOSSIER le "Tavaleur" = txtRecherche et je ne sais pas quelle condition je peux mettre... Si quelqu'un peut me donner un exemple de code.. merci d'avance...

Cette ligne : Update Table Set (champ = '" & tavaleur & "'") where condition = '" & tacondition & "'", c'est si tu veux passer par du SQL, mais perso avec Access et ADO, j'utilise des Recordset et ça fonctionne nickel...

Est-ce que tu te places sur le bon enregistrement avant modification ???
rst.Find "Critère" ou rst.Filter = "Critères"

Peut-être me trompe-je, mais l'apostrophe en tant qu'identificateur de texte c'est sous SQL, sous Access c'est le guillemet...
Donc la chaîne à faire passer ne serait pas:
Update MaTable Set MonChamp = 'MaValeur'  Where MonChamp = 'MaCondition'
mais:
Update MaTable Set MonChamp = "MaValeur"  Where MonChamp = "MaCondition"
traduit en VB ça donne:
Dim MaRequete as String
MaRequete = "Update MaTable Set MonChamp = " & """" & "MaValeur" & """" & " Where MonChamp = " & """" & "MaCondition" & """"
(en remplaçant évidemment "MaValeur" et "MaCondition" par les variables adéquates)

Quelqu'un peut me dire si je divague?

en fait ça dépend du moteur utilisé avec Access...
si c'est Jet, normalement tu peux utiliser les " ou les ' mais si c'est MSDE (SQL Server) il n'y a que les '.
et comme JeffC1977 parle de ADO, j'en déduis que c'est du MSDE...

"Réponse acceptée!"

Merci bien ;-)

ça sert à koi "Réponse acceptée" ???

Salut, pour fair l'update d'1 seul enregistrement, tu dois d'abord te positionner sur cet enreg comme dit NeoMettaller (méthode find). Puis :

rst.edit
rst!TonChampAModifier = tanouvellevaleur
rst.update

S'il s'agit d'updater toute la table, pas besoin de recordset :
taconnexion.execute "UPDATE TaTable SET TonChampAModifier = 'toto' WHERE TonChampAModifier = 'titi'"
Avec cet exemple, tu remplaces 'toto' par 'titi' dans tous tes enregs. 
Avec des variables texte ça donne :
taconnexion.execute "UPDATE TaTable SET TonChampAModifier = '" & var1 & "' WHERE TonChampAModifier = '" & var2 & "'"

Avec des variables numériques ça donne :
taconnexion.execute "UPDATE TaTable SET TonChampAModifier = " & var1 & " WHERE TonChampAModifier = " & var2


-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

Ben visiblement (parce que je ne suis pas un grand habitué du forum) quand quelqu'un poste un sujet, sur les réponses des gens y a un bouton "Réponse acceptée" qu'il peut cliquer si la réponse lui convient, ce qui a pour effet de mettre le message en vert comme on peut le voir ici: http://forum.vbfrance.com/forum.v2.aspx?ID=537767#5 Ca permet ensuite aux autres de voir tout de suite que la solution a été trouvée. Le mien était un faux "Réponse acceptée", c'était juste histoire de dire que tu avais répondu à ma question...

ok merci Totroyamada.. je suis pas un grand habitué aussi :)

juste pour info CanisLupus, avec ADO, il n'y a plus besoin de rst.Edit...

Exact NeoMetaller, confusion avec DAO.

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?