Your server is listening on a different port.

VB Code:
  1. Server:
  2. Winsock.LocalPort = 6000
  3.  
  4. Client:
  5. Winsock.RemotePort = 15151

If that's not the problem, i'm not sure what is...

-Sir Loin