Originariamente inviato da ladyBlu
che strano, a me funziona tutto alla perfezione...:master:
hai provato a mettere un MoveFirst dopo l'apertura del recordset?
Già fatto non cambia nulla


@Darkettino




il codice eccolo qui...

al click del menu richiamo la stored

Dim com As New ADODB.Command
com.ActiveConnection = cnn
com.CommandText = "SP_ElencoUI_Sfitte"
com.CommandType = adCmdStoredProc
com.Parameters.Append com.CreateParameter("@PI_id_soc", adDouble, adParamInput, 4, 42)
com.Parameters.Append com.CreateParameter("@PI_id_stab", adDouble, adParamInput, 4, 15)
com.Parameters.Append com.CreateParameter("@msg", adVarChar, adParamOutput, 100, Null)
Set rcs = com.Execute
Set DRElencoUISfitte.DataSource = rcs
DRElencoUISfitte.Show


la select della stored è questa

procedure Sp_ElencoUI_Sfitte

@PI_id_soc numeric,
@PI_id_stabile numeric,
@PO_Elenco_UI nvarchar (100) output
as
if @PI_id_stabile is null

select id_immobile,id_inquilino,indirizzo, n_civico, piano, scala, interno, tipo_immobile
from Unità_Immobiliari
where id_soc = @PI_id_soc and affittato=0 order by indirizzo, n_civico,scala, piano, interno
else

select u.id_immobile, u.id_inquilino, s.indirizzo, s.n_civico, u.piano, u.scala, u.interno, u.tipo_immobile
from Unità_Immobiliari as u, Stabili as s
where u.id_stabile = s.id_stabile and u.id_stabile = @PI_id_stabile and affittato =0 order by s.indirizzo,s.n_civico,u.scala, u.piano, u.interno


contento??:zamm: