[AccessD] Memory leak

> Function TestFWMemLeak()
>    While 1
>        DoEvents
>        FWInit CurrentProject.Connection
>    Wend
> End Function
> Public Function FWInit(lCodeProjConn As ADODB.Connection)
> End Function

This may be way off target, but you don't seem to want to use either 
SET or NEW, as in Set adoConnection = New ADODB.Connection
Maybe it's doing for you and causing the leak?