Ok, het lijkt er echt op dat ADODB verwacht dat een query-instructie daadwerkelijk begint met select
.Daarom zou een oplossing voor het probleem kunnen zijn om de instructie in te sluiten in een select * from ( .... )
zoals zo:
Dim sql As String
sql = "with w as (select 'foo' x from dual) select x from w"
' enclose the statement:
sql = "select * from (" & sql & ")"
rs.Open sql, cn