Bonjour,
Alors voilà, je vous explique mon problème.
En fait les données que je veux enregistrer sont stocké dans une FlexGrid.
Chaque ligne de la FlexGrid correspond à un champ de la table.
La 1ère colonne c'est le nom du champ, la 2nd est la valeur de celui-ci.
Voici comment est initialisé la FlexGrid à l'ouverture du formulaire :
Code :
- For Each champ In req.Fields
- If champ.Name <> "Code Article" And champ.Name <> "code ancien" And champ.Name <> "Désignation" And champ.Name <> "ancienne désignation" And champ.Name <> "n°Plan" And champ.Name <> "Img Plan" Then
- i = i + 1
- FlexInfo.Rows = i + 1
- FlexInfo.TextMatrix(i, 0) = champ.Name
- End If
- Next
|
Bon, pour ça, y'a aucun soucis ça marche !
Ensuite, une fois que j'ai renseigné les valeurs que je veux, ça bloque à l'enregistrement.
Voici mon code :
Code :
- pieces.Open "pieces", CurrentProject.Connection, adOpenDynamic, adLockOptimistic
- pieces.AddNew
- pieces![Code Article] = [txtCodeArt]
- pieces![code ancien] = [txtOldArt]
- pieces![Désignation] = [txtDesign]
- pieces![ancienne désignation] = [txtOldDesign]
- pieces![n°Plan] = [txtNumPlan]
- pieces![Img Plan] = [txtImgPlan]
- For i = 0 To FlexInfo.Rows - 1
- texte = FlexInfo.TextMatrix(i, 0)
- pieces![texte] = FlexInfo.TextMatrix(i, 1)
- Next i
- pieces.Update
- pieces.Close
|
Ca bloque sur le "pieces![texte]" ligne 11...
J'ai le droit au message : "Impossible de trouver l'objet dans la collection correspondant au nom ou à la référence ordinale demandé... Et je ne vois pas trop comment résoudre le problème...
Donc si il y en a un qui est voit mieux que moi, qu'il n'hésite pas à se faire remarquer
Merci d'avance de votre aide précieuse.
Message édité par SkamakS le 17-01-2008 à 15:55:17