ho scritto questo codice:

Dim Sql As String, objRS As ADODB.Recordset

Set objRS = New ADODB.Recordset
Sql = "SELECT CodAttivita as [Codice Attivita], NomeAttivita as [Nome Attivita], Param as "
Sql = Sql & " [Parametro] FROM Attivita"
objRS.Open Sql, objConn, adOpenForwardOnly, adLockPessimistic, adCmdText
Form_Attivita.Elenco.RowSourceType = "Tabella/Query"
Form_Attivita.Elenco.RowSource = objRS
objRS.Close
Set objRS = Nothing


ma non va, ho visto nell'help e se metto

Form_Attivita.Elenco.RowSource = "objRS"

non dà errori, ma non visualizza i dati corretti che tiro fuori con la sql che vedi sopra.

AITUO GRAZIE