[VB.NET] Connessione socket

[carant]

Ciao a tutti,
sto cercando di usare i socket per connettere due computer e trasferire un file.
Mi sono bloccato al punto in cui il secondo computer deve accettare la connessione, non so come si fa.
Devo usare un timer?

[oregon]

Un timer per accettare una connessione?

Perchè non mostri cosa hai scritto e spieghi, più in dettaglio, cosa vorresti realizzare ...?

[carant]

al tick del timer se c'è una connessione in attesa la accetta.
mi dice che la risposta del computer che deve accettare la connessione è sbagliata.
ho usato: if listener.pending then
socket.accept()

[oregon]

No ... devi usare il metodo

AcceptTcpClient

per attendere una connessione all'interno di un thread dedicato.

[carant]

L'errore me lo da sulla riga socket.connect... mi dice che non risponde o la risposta è sbagliata.
Riporto il codice:
METODO CONNETTI DEL MODULO1:
Public Sub Connetti()
socket.Connect(New IPAddress("127.0.0.1"), 25)
End Sub
(Qui potrebbe essere sbagliata la porta)
METODO ACCETTA DEL MODULO1:
Public Sub Accetta()
Listener.Start()
If Listener.Pending Then
Form10.Timer1.Stop()
Listener.AcceptTcpClient()
End If
End Sub
e poi al tick del timer, nell'altro form esegue accetta()
Non ho capito cosa vuole dire perchè dovrebbe essere tutto giusto. Tu cosa faresti per connettere due socket??
Grazie per le risposte...

[oregon]

Originariamente inviato da carant
Tu cosa faresti per connettere due socket??

Mi pare di avertelo detto prima ...

Ma, per capirci, che tipo di oggetti sono

socket

e

listener

?

Mostra TUTTO il codice ...

[carant]

Uno è un socket e l'altro un tcp listener
tutti e due dichiarati all'inizio del modulo con public.

[oregon]

Perche' non usi il TcpClient ?

E il TcpListener su che porta "ascolta" ?

Dai un'occhiata agli esempi di MSDN ...

http://msdn.microsoft.com/it-it/libr...ts.tcplistener(VS.80).aspx

[carant]

Ho capito...
Ho trovato questo: totem.altervista.org/guida/versione2/C16.php
Potresti postare il codice che useresti tu?? e poi se eseguo sullo stesso pc su che Porta devo usare??

[carant]

Ho risolto il problema della risposta.
Adesso mi dà un errore diverso:
"Indirizzo richiesto non valido nel proprio contesto" su Listener.Listen()
Riporto il codice per accettare la connessione, che si attiva al tick del timer.

Public Sub Accetta()        
    Listener = New TcpListener(New IPAddress("127.0.0.1"), 25)     
    Listener.Start()       
    If Listener.Pending Then    
         Client = Listener.AcceptTcpClient        
    End If    
End Sub

Qualcuno sa dirmi come risolvere??
Grazie.