Discussion :

[fredonouille]

Bonjour,

J'ai repris une application VB6 avec un DB Access dont la version est antérieure à Access 2000.

J'ai un message d'erreur sur une seule ligne d'une seule table. Ma requête est assez simple. Il s'agit d'un simple select * from <table> where <condition unique>

Le message d'erreur suivant apparaît lorsque j'utilise la fonction UpdateRecord

Erreur:
Erreur réservée (-1601); aucun message n'est assigné à cette erreur.

Quelqu'un aurait une idée de pourquoi l'erreur ?

[bertiny]

Bonjour
Ne penses-tu pas qu'il sera mieux qu'on voit le code ?
La requêtes produit-elle quelque chose?

[fredonouille]

Bonjour,

Merci pour la réponse et l'intérêt de mon problème.

Voici le code où pour le moment, ça plante.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub cmdRessources_Click()
   Data1.UpdateRecord
    frmClientRessources.Show vbModal
End Sub

L'erreur apparaît à la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Data1.UpdateRecord

Qu'entends-tu par

La requêtes produit-elle quelque chose?

?

[bertiny]

Bonsoir
Jette un coup d'oeil ici

[fredonouille]

Bonjour,

Je vous remercie pour le lien.

J'ai lu le lien envoyé et essayé de mettre en place cette solution. Malheureusement ma variable Data1 et de type Data. Ce qui rend impossible l'utilisation de la fonction Update (Elle n'existe pas dans ce type d'objet).

Quand j'utilise la fonction UpdateRecord, elle fonctionne pour toutes les données sauf une.

Et c'est pour ce cas, que j'essaie comprendre ce qui ne va pas.

Je ne sais pas si je suis clair.