How can I pass the @@IDENTITY in my SQL statement into a VB 6.0 variable in my ActiveX.DLL component?