ok allora sto provando cosi
strSQL3= "SELECT * FROM contabilita_vociquery WHERE condominio Like '%" & Request.Querystring("condominio") & "%' and esercizio Like '%" & Request.Querystring("esercizio") & "%' and rifarticolo like '" & Request.Querystring("cod") & "' "
Set rec3 = Server.CreateObject("ADODB.Recordset")
rec3.cursorlocation = 3
rec3.Open strSQL3, conn
Dim sListOfCode : sListOfCode = ""
While rec3.EOF
sListOfCode = sListOfCode & ", ' " & rec3("id_voce") & " ' "
rec3.MoveNext
Wend
rec3.Close()
If sListOfCode<>"" Then
Session("RICERCA_IMMOBILI")=Mid(sListOfCode,2)
End If
rec3.Open strSQL3, conn
%>
ma il risultato è identico sempre il primo record elimina gli altri nn li vede per niente
dove sbaglio .....