Ya vi...yo te recomiendo que si ya estás utilizando el objeto command, crees tus parámetros, para que no te confundas con las instrucciones
Código:
Set param = oCom.CreateParameter("nombre_parametro_1", *adInteger, adParamInput, *4, valor)
oCom.Parameters.Append(param)
Set param = oCom.CreateParameter("nombre_parametro_2", *adInteger, adParamInput, *4, valor)
oCom.Parameters.Append(param)
Y después solo lo tienes que ejecutar:
oCmd.Execute
Ahora, realmente no te debe regresar un recordset, lo que te regresa es el error en caso de haber uno asi que no necesitas tener un Set rs = con solo ejecutar el Command y capturar el valor del parámetro de salida es suficiente.
Saludos