Shoutbox

ok i need to set the object of a variable to the oMessenger object passed to Initialize

here is what im using

code:

---

in a module
Option Explicit
Global MSN As Object
___________________

in the class module
Public Function Initialize(ByVal nVersion As Long, ByVal sUserEmail As String, ByVal oMessenger As Object) As Boolean
Set MSN = Nothing
Set MSN = oMessenger
Initialize = True

End Function

---

its in vb
ive also tried

code:

---

Set MSN = New oMessenger

---

thanks for any help in advance


edit: Dempsey suggested i add the Windows Messenger API, but in the last version of my proggie i didnt need to.