Discussion :

[kamouka]

Bonjour,

J'ai une table TABLE1 sur un serveur ORCALE connecté via ODBC (client Oracle 10g) dont la structure est :
id : number(11) alimenté par untrigger, clé primaire
libel : varchar2(250)
lib2 : varchar2(250)

Dans un formulaire Access, j'ai un bouton de commande avec le code ci-après.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub Commande0_Click()
Dim rs As DAO.Recordset


 Set rs = CurrentDb.OpenRecordset("select * from table1 order by libel  asc", dbOpenDynaset, dbSeeChanges + dbConsistent, dbPessimistic)   'dbConsistent dbSeeChanges
 
  
  rs.AddNew
  rs!LIBEL = CStr(Rnd)
  rs!lib2 = Null 
  rs.Update
  rs.Bookmark = rs.LastModified
  Dim idtemp As Long
  idtemp = rs!ID
  Set rs = Nothing

End Sub

Ce code provoque une erreur 3167 sur la ligne :

Code :

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

  idtemp = rs!ID

Si je supprime la ligne

Code :

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

rs!lib2 = Null

. le problème ne se produit pas.

De même si la table est sur la base access locale, avec la ligne

Code :

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

rs!lib2 = Null

. le problème ne se produit pas.

Quelqu'un a-t-il une explication et/ou une solution?

Merci

[marot_r]

Désolo, je n'ai pas d'explication mais une question et un cas vécu.

Le idtemp contient-il la bonne valeur quand tu n'as pas l'erreur ?

Lorsque j'ai essayé cela avec Oracle je ne récupérai rien de bon. Il a fallu que je 'bricole' un index unique (Code user + Date en secondes + RND) avant l'insertion pour ensuite pouvoir récpérer mon ID autoincrémenté avec un select classique.

A+

[kamouka]

Merci pour ta réponse.

Effectivement quand je n'ai pas d'erreur tout se passe bien (merci lapalice) et je récupère la bonne valeur dans idtemp.
je pense qu'il s'agit d'un problème lié au driver odbc Oracle (j'ai essayé plusieurs versions avec la même conclusion). En effet les mêmes essais fait sur SQL server (même structure de table, même acces via odbc, même code VBA) fonctionnent correctement dans tous les cas (affectation d'une chaine vide, affectation de NULL, pas de mise à jour du champs du recordset).
Je continue à chercher. Le code concerné doit fonctionner avec une base Access ou une base Oracle. je n'ai pas envie de gérer du code spécifique pour chaque base (il parait qu'ODBC est fait pour éviter çà justement..).