Bonjour !
Le problème c'est que ça génère une exception qui serait capturée par try...catch... dans les autres langages !
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
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)
Partager