sockets

[darknuke]

        Dim ipaddress As Net.IPAddress
       Dim localAddr As Net.IPAddress = ipaddress.Parse("127.0.0.1")
       Dim port As Int32 = 13000
       Dim server As New TcpListener(localAddr, port)
       server.Start()
       Console.Write(">>>>>>>" & Chr(10))
       Dim tSocket As Net.Sockets.Socket = server.AcceptSocket
       Dim timeDate As String = Now()
       Console.Write("[" & timeDate & "]" & Chr(10) & " Server started (type help for more information)" & Chr(10))

 

The console stops as soon as I declare tSocket and doesn't do a thing. What's wrong?

Edited October 5, 2003 by darknuke

[PlausiblyDamp]

It's waiting for an incomming connection.

[darknuke]

<<<< :p dumbass

[darknuke]

I'm trying to port the console to vb, but am running into problems.

 

This line is causing the program to freeze:

 

Dim tSocket As Net.Sockets.Socket = server.AcceptSocket

 

If I remove it, all of the code works. If I leave it in, not even the code before it works...

 

Is it my system or am I making yet another n00b error?

Edited October 5, 2003 by darknuke

[PlausiblyDamp]

Probably need to look at using threads to prevent blocking.

If you look in the samples that ship with .Net there is a chat program that shows the use of sockets.

[darknuke]

That would help but... how come in my console app it worked fine but in a normal vb project it doesn't? Edited October 5, 2003 by darknuke

[PlausiblyDamp]

What language was the console app written in?

[darknuke]

VB