Funzioni, passaggio di parametri e riferimenti

[marco_c]

Ho 2 file, il primo con le 2 funzioni

Function OpenConnection(str, path)
	Dim ConnectionString
	ConnectionString = str & Server.MapPath(path)
	set Connection = Server.CreateObject("ADODB.Connection")
	Connection.Open ConnectionString
	OpenConnection = Connection	
End Function

Sub CloseConnection(conn)
	conn.Close 
	set conn = Nothing	
End Sub

e il file "main" dal quale chiamo

connection = OpenConnection(STRINGA, PATH)
Call CloseConnection(connection)

ovviamente quando vado a eseguire CloseConnection mi dice che si aspetta un oggetto "conn"...
In sostanza, come si fa in ASP/VB a passare un riferimento a una funzione? Io voglio passare il riferimento alla connessione già aperta.
Grazie
Ciao