Bonjour !


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Set tempRs = cn.OpenSchema(adSchemaColumns,Array(Empty, Empty, "MaTable1")
 
While Not tempRs.EOF
   Debug.Print tempRs!COLUMN_NAME
   tempRs.MoveNext
Wend
Le problème c'est que ça génère une exception qui serait capturée par try...catch... dans les autres langages !
Je me demande si OpenSchema(adSchemaColumns) ne marche pas pour Oracle; dans l'aide MSDN, rien ne mentionne Oracle, seulement Ole Db, vsam, db/2, etc.

En fait, que dois contenir l'array du 2è argument ?

REM : si je mets Empty comme 3è élément du critère, pas d'exception mais le recordset est vide (rs.EOF = true)