"ConnectObject": Catching events from inside a class impossible?

Forums

My Profile

Inbox

Address Book

My Subscription

My Forums

"ConnectObject": Catching events from inside a class impossible?

Logged in as: Guest

arrSession:exec spGetSession 2,2,46908

	Active Users: There are 0 members and 0 guests.
	Users viewing this topic: none

Printable Version

All Forums >> [Scripting] >> WSH & Client Side VBScript >> "ConnectObject": Catching events from inside a class impossible?
Do you like VisualBasicScript.com? Link to us and help spread the word about our forum. Thanks!

Page: [1]

Message

<< Older Topic Newer Topic >>

"ConnectObject": Catching events from inside ... - 5/9/2007 5:02:21 PM

Founder

Posts: 20
Score: 0
Joined: 9/28/2006
Status: offline

Hello everybody...

is it possible that the ConnectObject-Method only works for methods which are not written inside a class? Because when I tried to catch an event with a method inside a class there was no reaction, but when I modiefied the code resettling the code outside the class it worked.

This one is working:

And this one is not working:

Dim listener : Set listener = new SocketServer

Class SocketServer
           private socket, port, newData
           '--------------------------------            
           Private Sub Class_Initialize()
               port = 12349 : newData = ""
               Set socket = CreateObject("OSWINSCK.Winsock")
               WScript.ConnectObject socket, "socket_"
               socket.LocalPort = port
               socket.Listen
               End Sub
           '--------------------------------
           Private Sub socket_OnConnectionRequest(requestID)
               socket.CloseWinsock
               socket.Accept Clng(requestID)
               End Sub
           '--------------------------------
           Private Sub socket_OnDataArrival(ByVal bytesTotal)
               socket.GetData newData
               msgBox newData
               End Sub
           '--------------------------------            
           Private Sub Class_Terminate()
               End Sub
           End Class

Nice Greetings,

Founder.

Post #: 1

RE: "ConnectObject": Catching events from ins... - 5/15/2007 10:10:33 PM

Founder

Posts: 20
Score: 0
Joined: 9/28/2006
Status: offline

Hello again,

perhaps the code example with the strange object has confused some of you. I'd be happy to know generally if procedures in the inner part of a class can catch events or not.

Thanks,

Founder.

(in reply to Founder)

Post #: 2

If you found our site useful please link to us <a href="http://www.visualbasicscript.com">VisualBasicScript.com</a>.

All Forums >> [Scripting] >> WSH & Client Side VBScript >> "ConnectObject": Catching events from inside a class impossible?

Page: [1]

Jump to:

New Messages	No New Messages
Hot Topic w/ New Messages	Hot Topic w/o New Messages
Locked w/ New Messages	Locked w/o New Messages

Post New Thread

Reply to Message

Post New Poll

Submit Vote

Delete My Own Post

Delete My Own Thread

Rate Posts