Objetos como parámetro en ASP

[Ñuño Martínez]

Por razones que no es posible discutir, me he visto obligado a usar ASP. Tengo el siguiente código:

' Objeto global conexión.
  DIM ConexionBD



' ConectaBD:
'   Conecta con la base de datos.
' TODO: Comprobar conexión y devolver error.
SUB ConectaBD (Origen, Usuario, Clave)
' Creamos el objeto de conexión.
  SET ConexionBD = Server.CreateObject ("ADODB.Connection")
' Conectamos
  ConexionBD.Open Origen, Usuario, Clave
END SUB

Yo quisiera que, en lugar de usar objetos globales, esta SUB fuera una FUNCTION que devolviera el objeto creado y que otras funciones o subs lo recibieran como parámetro, sin embargo todos mis intentos han sido en vano.

Encontré en internet este artículo sobre serialización que parece ser el origen y la solución del problema, pero es muy complicado o eso me lo parece.

¿No se pueden devolver objetos ni pasar referencias a objetos entre subrutinas como en cualquier otro lenguaje?