denciso respondió:
Adapta la siguiente función: Function LlenaLista(rctlControl As Control, rsSQLTemp As String) As Integer rctlControl.Clear Set grs_Recordset = Nothing If cnx.gf_AbreRecordset(gcx_Conexion, grs_Recordset, rsSQLTemp) Then Do Until grs_Recordset.EOF If...