Winsock problemer

Din server har en connection_request procedure. Der er et vigtigt, at den accepterer alle requets, og giver hver klient et winsock index.

Private Sub usersck_ConnectionRequest(Index As Integer, ByVal requestID As Long)

  winsock(LedigWinsock).accept requestID

End Sub

FØRST herefter tolkes tekst sendt med senddata. husk at ledigWinsock er en integer variabel, som IKKE må være 0, da dette index er reserveret til at lytte efter connections.

mvh
martin

Det er ikke aktuelt med flere ledigWinsock variablen, da jeg kun arbejder med én klient.

ok, men så laver du jo bare to winsocks. En til lytning for connections og en til data.

Private Sub WinsockListen_ConnectionRequest(Index As Integer, ByVal requestID As Long)

  WinsockClient.accept requestID

End Sub

Det er også det jeg har gjort, men det virker ikke :-(

så vil jeg foreslå, at du laver noget debugging:

Private Sub WinsockListen_ConnectionRequest(Index As Integer, ByVal requestID As Long)

  debug.print \"Connections modtages fra \" & requestID
  WinsockClient.accept requestID

End Sub

Private Sub WinsockClient_DataArrival(Index As Integer)

  debug.print \"data modtages fra \" & index

End Sub


eller send lige lidt kode herud, så er det lidt lettere at finde eventuelle fejl jo... :)

Mvh
martin

Har du en e-mail adresse jeg kan sende sourcen til?

frost@mobil.dk

closed...

man får ikke meget ud af det her open source når alle sender sourcen til hinanden så vi andre ikke kan se..