ठीक है, यह वास्तव में ऐसा लगता है जैसे ADODB एक क्वेरी स्टेटमेंट की अपेक्षा करता है जो वास्तव में select
. से शुरू होता है .इसलिए, समस्या का समाधान यह हो सकता है कि स्टेटमेंट को select * from ( .... )
में जोड़ा जाए। इस तरह:
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