Problema con DAO 3.6

[rufusino]

Ciao a tutti,
sto sviluppando un programma in vb che si connette ad un db oracle tramite DAO 3.6
Il problema è il seguente: dopo aver effettuato la connessione, la prima query di selezione che eseguo mi da il seguente errore

"Sequenza di ordinamento selezionata non supportata dal sistema operativo"
Il numero dell'errore è 3228.
Ciò si verifica soltanto con la prima query, se gli e la faccio ripetere, tutto funziona a meraviglia.
Funziona tutto anche se chiudo il programma e la restarto subito; se invece lo restarto dopo mezz'ora, si verifica di nuovo lo stesso errore.

Dim qd As QueryDef

On Error GoTo Err_h

Set qd = Db_main.CreateQueryDef("")
qd.Connect = Db_main.Connect
qd.ReturnsRecords = True
qd.sql = s_select

(W) Set rs = qd.OpenRecordset(dbOpenSnapshot)

DB_OpenRS = True
qd.Close

Exit Function

Err_h:

DB_OpenRS = False
MsgBox Err.Description & Err.Number


questa è la funzione incriminata e (W) indica l'istruzione che genera l'errore.
L'ho notato anche in altri programmi vb che usano le DAO
ma non ho trovato ancora soluzione :wall:
Grazie per l'interessamento

Rufus