DISTINCT e odbc, perchè non va?

[Jeyne]

Come dicevo ho un problema utilizzando la funzione distinct...

Io faccio questa query:
strsql = "SELECT DENOMINAZIONE FROM MNV.V_GRAFO_CORPORATE "
sFiltro = " upper(NOMEVIA) LIKE upper('" & p_nome & "')"
sFiltro = sFiltro & " AND CODISTAT='" & p_comune & "'"
sFiltro = sFiltro & " ORDER BY NOMEVIA"

strsql = strsql & "WHERE " & sFiltro

e tutto funziona.
Però trovo n occorrenze per la stessa via che corrispondono ai diversi tronchi di via.

Devo levare le occorrenze doppie quindi metto DISTINCT e diventa così:
strsql = "SELECT DISTINCT DENOMINAZIONE FROM MNV.V_GRAFO_CORPORATE "
sFiltro = " upper(NOMEVIA) LIKE upper('" & p_nome & "')"
sFiltro = sFiltro & " AND CODISTAT='" & p_comune & "'"
sFiltro = sFiltro & " ORDER BY NOMEVIA"

E mi restituisce questo errore:
ADODB.Recordset error '800a0e78'
Operation is not allowed when the object is closed.

Ho pensato fosse la connessione e ho usato prima il driver odbc di oracle
Application("PercorsoDatiAEM") = "DSN=SDEAEM_test;Uid=xxx;Pwd=xxx"

poi la OLE DB...
Application("PercorsoDatiAEM") = "Provider=MSDAORA;Data Source=SDEAEM93;User ID=xxx;Password=xxx;"

Ma il problema resta... avete mai avuto problemi simili??

[optime]

l'errore mostrato non sembra essere di SQL...

posta un po' più di codice

[Jeyne]

'check se eseguire la ricerca sulla tabella delle vie o dei civici
'strsql = "SELECT DISTINCT DENOMINAZIONE FROM MNV.V_GRAFO_CORPORATE "
strsql = "SELECT DENOMINAZIONE FROM MNV.V_GRAFO_CORPORATE "
sFiltro = " upper(NOMEVIA) LIKE upper('" & p_nome & "')"
sFiltro = sFiltro & " AND CODISTAT='" & p_comune & "'"
sFiltro = sFiltro & " ORDER BY NOMEVIA"
nFunzione = "DoVia()"
strsql = strsql & "WHERE " & sFiltro
'Response.write(strsql)

'connetti con il db
call Prendi_Recordset(strConn, strsql)
if not objRs.EOF then
Response.write("<div class='elementTV'>")
Response.write("<select class='ricerca' style='width: 250px;' size=1 name='stVia' onChange='")
Response.write(nFunzione)
Response.write("' ID='Select2'>")
Response.write("<option selected>-Seleziona indirizzo-</option>")
do while not objRs.EOF
curnome1 = objRs("DENOMINAZIONE")
Response.write("<option value=""" & curnome1 & """>" & curnome1 & "</option>")
objRs.MoveNext
loop
'pulisci e chiudi
call Chiudi_Recordset()
Response.write("</select></div>")
else
Response.write("<div class='elementT'>")
Response.write("<span class='testo1'>Indirizzo non trovato<span></div>")
end if

Ecco tutto il pezzo, quando provo l'unica cosa che cambio è attivare la stringa con distinct o quella senza...


Grazie

[Jeyne]

strsql = "SELECT DISTINCT DENOMINAZIONE, NOMEVIA FROM MNV.V_GRAFO_CORPORATE "
sFiltro = " upper(NOMEVIA) LIKE upper('" & p_nome & "')"
sFiltro = sFiltro & " AND CODISTAT='" & p_comune & "'"
sFiltro = sFiltro & " ORDER BY NOMEVIA"


così funziona... credo che fosse per ORDER BY NOMEVIA, ma ora non ho voglia di provare