Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - Connessione mediante socket
Forum - Visual Basic 6 - Connessione mediante socket

Pagine: [ 1 2 3 ] Precedente | Prossimo
Avatar
8jack (Normal User)
Newbie


Messaggi: 15
Iscritto: 10/07/2008

Segnala al moderatore
Postato alle 15:04
Giovedì, 10/07/2008
Ciao a tutti, ho un problema con una connesione mediante socket.
Allora mi spiego.

In una Form ho messo un oggetto di tipo Winsock chiamato WinsockRead e nelle proprietà gli ho inserito RemoteHost: 192.168.100.102 e come RemotePort 2001.

Ora come faccio a fare la connessione vera e propria?

Ho utilizzato il comando:
WinsonkRead.Connect

Ma la connessione mi rimane in Stato 6 quindi sckConnecting, come faccio a portarmi nello Stato 7 e quindi sckConnected?

Spero di essermi spiegato perchè sono alle prime armi con VB6 e non penso di avervi fatto capire il problema...

Grazie a tutti

PM Quote
Avatar
gantonio (Normal User)
Guru^2


Messaggi: 1532
Iscritto: 09/09/2007

Segnala al moderatore
Postato alle 15:14
Giovedì, 10/07/2008
Perche' non segui un libro introduttivo su VB6?

E perche' inizi dalla programmazione di rete se non hai gia' esperienza con il linguaggio e con i socket (in particolare winsock)?

Scusa, ma chiedere come mettere le tegole ad una casa senza nemmeno avere costruito le fondamenta, non puo' avere una risposta sensata ...

PM Quote
Avatar
8jack (Normal User)
Newbie


Messaggi: 15
Iscritto: 10/07/2008

Segnala al moderatore
Postato alle 15:35
Giovedì, 10/07/2008
Hai ragione, ma purtroppo per lavoro mi hanno cacciato in questa situazione e non ho ne manuali ne niente, solo un esempio di un programma già fatto e ora mi trovo in questa situazione...

L'unica cosa che volevo sapere è come mai quando faccio la connessione mediante winsock.Connect mi metto nello stato 6 e non riesco a portarmi nello stato 7


Ultima modifica effettuata da 8jack il 10/07/2008 alle 16:56
PM Quote
Avatar
gantonio (Normal User)
Guru^2


Messaggi: 1532
Iscritto: 09/09/2007

Segnala al moderatore
Postato alle 23:30
Giovedì, 10/07/2008
Lascia perdere lo stato ... posta il codice che hai scritto ...

PM Quote
Avatar
8jack (Normal User)
Newbie


Messaggi: 15
Iscritto: 10/07/2008

Segnala al moderatore
Postato alle 8:49
Venerdì, 11/07/2008
Dim Var_App As String
Dim Cod_Pos_Baia1(100) As String
Dim BufferTrackBaia1() As Byte

WinsockRead.RemoteHost = "192.168.100.102"
WinsockRead.RemotePort = 2001
WinsockRead.Connect

ReDim BufferTrackBaia1(0 To 19)

i = 0
For i = 0 To 19
Call LeggiDati(WinsockRead, 50, (i * 20), 20, BufferTrackBaia1, Risultato)
        
If Risultato Then
  Trk_Baia1(i) = Chr(BufferTrackBaia1(0)) + Chr(BufferTrackBaia1(1)) + Chr(BufferTrackBaia1(2)))
End If
Next i

La funzione LeggiDati non dovrebbe aver problemi visto che in altre parti del programma funzione, molto probabilmente c'è sbagliato il modo in cui apro la connessione.

Ciao Grazie

Ultima modifica effettuata da 8jack il 11/07/2008 alle 8:57
PM Quote
Avatar
gantonio (Normal User)
Guru^2


Messaggi: 1532
Iscritto: 09/09/2007

Segnala al moderatore
Postato alle 9:22
Venerdì, 11/07/2008
Dopo la

WinsockRead.Connect

Do While WinsockRead.State <> sckConnected
   DoEvents
Loop

PM Quote
Avatar
8jack (Normal User)
Newbie


Messaggi: 15
Iscritto: 10/07/2008

Segnala al moderatore
Postato alle 9:37
Venerdì, 11/07/2008
Purtroppo anche inserendo il Do While rimando sempre nel loop perchè la connessione mi rimane sempre in sckConnecting e non mi va in sckConnected.

PM Quote
Avatar
gantonio (Normal User)
Guru^2


Messaggi: 1532
Iscritto: 09/09/2007

Segnala al moderatore
Postato alle 9:57
Venerdì, 11/07/2008
Allora hai un problema con il server ...

Quale codice usi per il server?

Hai provato a connetterti con il server con TELNET ?

PM Quote
Avatar
8jack (Normal User)
Newbie


Messaggi: 15
Iscritto: 10/07/2008

Segnala al moderatore
Postato alle 10:06
Venerdì, 11/07/2008
Quello che non capisco è perchè in un altro punto del programma lo stesso codice funziona.

A questo punto sposto la connessione dove funziona, la appesantirò parecchio ma è l'unico modo che mi viene in mente.

PM Quote
Pagine: [ 1 2 3 ] Precedente | Prossimo