Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Salve, il mio problema riguarda un'applicazione client\server:
dal client clicco un comando, in questo caso "Reset",che tramite winsock si connette al server e mi attiva il reset di quest'ultimo...il problema č che il reset mi funziona sola alla prima chiamata, dopo viene completamente ignorata una mia ulteriore chiamata...
posto il codice
Codice sorgente - presumibilmente Plain Text
CLIENT
Private Sub cmdReset_Click()
Dim resetta As String
resetta = "Resetta"
If Winsock7.State = sckConnected Then
Winsock7.SendData resetta
End If
End Sub
SERVER
Private Sub Winsock7_DataArrival(ByVal bytesTotal As Long)
'LEGGE I DATI IN ARRIVO E LI VISUALIZZA
Dim resetta As String
Winsock7.GetData resetta
If resetta = "Resetta" Then
Call cmdReset_Click
End If
Winsock7.Close
End Sub
quando il server ricevete un dato, poi chiude la connessione
Codice sorgente - presumibilmente Plain Text
Winsock7.close
dopo per poter ricomunicare hai bisogno che il server si rimetta in Listen, quindi devi ristabilire la connessione.
La funzione cmdReset_Click() del server č uguale a quella del client?