Ok, hice algunos arreglos por aqui y por allá y funciono perfecto:
1º cree el recordset antes de llamar a la funcion
2º la funcion ahora es un procedimiento al que le paso el nombre del recordset por referencia, asi que el codigo queda así:
--------------------------------------------------------------------------
sub bddSelect( columnas, from, where, order, group, byref objRset, rsConn, rsCursortype, rsLockType )
...
...
objRset.Source = strSelect
objRset.CursorType = rsCursorType
objRset.LockType = rsLockType
objRset.ActiveConnection = rsConn
objRset.Open
--------------------------------------------------------------------------
3º invoco al procedimiento con lo siguiente y listo!!!
--------------------------------------------------------------------------
set objRset = server.createobject("ADODB.RecordSet")
cols = "id_accion_sistema, nombre_accion_sistema"
from = "accion_sistema"
where = empty
order = "id_accion_sistema ASC"
group = empty
bddSelect cols, from, where, order, group, objRset, conn, 2, 2
--------------------------------------------------------------------------
Eso es, espero que le sirva a alguien más que a mi mismo, salu2, rodrigo
