Por razones que no es posible discutir, me he visto obligado a usar ASP. Tengo el siguiente código:
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?