sono tornato a guastarvi le feste...ma dopotutto a cosa serve un forum se non a condividere scoperte e problemi?
Mi sono messo in testa di realizzare un'applicazione Visual Basic 6 per controllare alcuni stati del mio impianto e che da buon cultore dell'opensource avrei postato qui nel forum; lo so, lo so, VB6 è un pò vecchiotto ma permettetemi di giocare con gli strumenti che conosco...sono un dev vecchio e un pò arrugginito!
Ho realizzato una banale form che attraverso il controllo OCX Winsock dovrebbe ascoltare la centrale sulla porta 215:
Codice: Seleziona tutto
Private Sub cmdConnect_Click()
sockMain.RemoteHost = txtHost.Text 'qui inserisco l'ip della centrale
sockMain.RemotePort = txtPort.Text ' qui la porta 215
sockMain.Connect
End Sub
Private Sub sockMain_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
sockMain.GetData strData, vbString
txtStatus.Text = txtStatus.Text & _
strData & vbCrLf
End Sub
L'evento "DataArrival" si dovrebbe scatenare non appena arriva qualche messaggio ma...niente.
Qualcuno saprebbe darmi un aiutino?
Grazie 1000
MrSeo