combobox

[a18327]

Lo puedes hacer desde la consulta, es decir cambiando

Código:

Set rs = oconn.Execute("select all id_empleado from Actividad_program")

por

Código:

Set rs = oconn.Execute("select distinct id_empleado from Actividad_program")