Visual Basic 6 - Sorgente Invia e Riceve dato

Ciao Pape, difatti, dicono che in rete ci siano sorgenti o guide per lavorare con un solo winsock, ma al momento non ne ho vista neppure una. Pensavo qualcuno di voi, avesse un qualche sorgente o qualche guida in merito.

N.B. Ripeto voglio usare solo un winsock

avere qualche winsock in più fa male?(magari una matrice)

ripeto, non mi interessa una matrice. Vorrei capire in che modo lavorare con un solo Winsock. se ti è difficile spiegarmelo cortesemente o postarmi qualche link per qualche semplice guida. Del resto non ho visto in giro nè sorgenti né guide, che lavorino ad un solo winsock per piu operazioni.

grazie

l'unico vero problema è gestire la connessione perchè a connessione avvenuta l'uno o l'altro è uguale.
ho improvvisato questo metodo

Option Explicit
Dim datiricevuti As String

Private Sub Command1_Click()
If Wsk.State = sckConnected Then Wsk.SendData (Text3.Text)
End Sub

Private Sub Form_Load()
Wsk.RemoteHost = "127.0.0.1"
Wsk.RemotePort = 322
Wsk.Connect
End Sub

Private Sub Timer1_Timer()
Select Case Wsk.State
Case sckClosing
Wsk.Close
Wsk.LocalPort = 322
Wsk.Listen
Case sckError
Wsk.Close
Wsk.LocalPort = 322
Wsk.Listen
End Select
End Sub

Private Sub wsk_DataArrival(ByVal bytesTotal As Long)
Wsk.GetData datiricevuti
Text2.Text = datiricevuti
End Sub

Private Sub wsk_ConnectionRequest(ByVal requestID As Long)
If Wsk.State <> sckClosed Then Wsk.Close
Wsk.Accept requestID
End Sub

all'avvio se non riesce a stabilire la connessione vuol dire che è il primo e quindi va automaticamente in listen mentre il secondo all'avvio parte con la connessione.
l'unica raccomandazione è l'attenzione.
il wsk non può spedire e ricevere contemporaneamente.

cercherò ci capirci qualcosa. grazie.

immaginavo infatti la questione di poter inviare o ricevere, un passo alla volta.

anche se ora, osservando il tuo esempio, dovrei capire in che modo.

---___--- io che avevo detto

scusami! Ma se non hai capito, quello che ho in mente, non capisco il perchè questo che non serve.

Non ce l'avevo con te tranqui