Timer or Winsock (WithEvents) inside a Class

Hi... I'm trying to make a simple IRC client which will be able to connect to several networks, and reconenct when it gets disconnected.

I have made a forum with an array of timers and and array of winsock

I have defined a class: clsNetwork with parameters like server, network name port, winsock etc.

I then tell it that mWinsock = frmmain.winsock(ID)
(where ID is the number inside the array).

Since the mWinsock and the Timer were without any events then I wrote all the timer and winsock events at the frmMain which is not smart.

I then decided to create the timer and winsock inside the class to be WithEvents (so I can move the evets to the clsNetwork):

Public mNetworkName              As String
Public mWinsockID                As Long
Public WithEvents mConnection    As Winsock
Public mServer                   As String
Public mPort                     As Long
Public mChannels                 As Collection
Public WithEvents mTimer         As Timer



Now when I try to set the timer or the winsock then I get an error.


If I do:
mWinsock = frmMain.Winsock(mWinsockID )
Then I get error 91 (Object variable or with block variable not set)

If I try to do:
set mWinsock = frmMain.Winsock(mWinsockID )
(which is what I used before I added the Withevents)
Then I get error 495 (Object or class does not support the set of events)

So how do I set the timer or winsock inside the class so they will also be with events ??
(I'm sure that I'm missing something..._

ThanksStart Free Trial