-
Help, help help, that's all I can say.
Well, i'll give you a little more than that.
I want to create a Communications Class which has a self contained Winsock object. To do this, I have created a reference by selecting, Project|References|Browse... and then selected the WSOCK32.OCX from the Windows\System directory. The Communications Class looks like this
Dim WithEvents Socket as Winsock
Private Sub Socket_ConnectionRequest(ByVal requestID As Long)
Socket.Accept requestID
End Sub
Private Sub Class_Initialize()
Set Socket = New Winsock
Socket.LocalPort = 9000
Socket.Listen
End Sub
Then in the declarations part of the FORM
Dim Comm as CommunicationsClass
Private Sub Form_Load()
Set Comm = New CommunicationsClass
End Sub
When you run this, and connect to the server using Windows Telnet (telnet.exe) and connect to the localhost (which can be retrieved by MsgBox Socket.LocalHostName in the Classes Initialize Event (after Set command))
I keep getting this error message (40020) something like operation unavailable at current state. Can you please Send ANY Information to [email protected] since I'm not sure if I can get back to this forum (at Uni, and they like to BAN pages).
The reason I want to do this is so that I don't have to make the Class back reference to a form with the Winsock Control.
Any information would be very helpful, i'm exhausted all my other sources of information, even the Microsoft site wasn't much help)
Cheers all,
Matt
-
I hope they havent banned this site... why would they?
unless you browse this site, during exams....hehehe
OK, onto it:
RULES OF ENGAGEMENT:
1.> A listening winsock CANNOT accept. It is listening, therefore it listens.
2.> You must use another winsock to ACCEPT what the other one has "listened" at. Get it? :)
3.> Or, if you are feeling lazy, you need to .CLOSE the listening winsock first... then make it .ACCEPT the incoming request.
While Socket.State <> sckClosed
Socket.Close
Wend
If Socket.State = sckClosed Then
Socket.Accept requestID
Else
Msgbox "Unknown Error!"
End If
----This all happens on Connection_Request
-
Cheers
Thanks for replying,
I just figured that one out, I presumed that when I first created a reference to the control, that it would be closed. But obviously I was mistaken. Like you have just said all I had to do was socket.close and then accept. Probably me being silly, but thanks anyway!
Sal
