Reti e LAN - Applicazione client visual basic 2010 per connettersi ad un server da WAN usando Dyndns.org

Forum - Reti e LAN - Applicazione client visual basic 2010 per connettersi ad un server da WAN usando Dyndns.org

p7389m (Normal User)
Newbie

Messaggi: 6
Iscritto: 13/02/2011

Postato alle 16:04
Domenica, 05/05/2013

Buongiorno, ho una applicazione che in rete locale si connette ad un server Siteplayer con System.Net.Sockets.
usando " cliente.Connect(ipadress, 47080)", indirizzo 192.168.x.x tutto bene. Da esterno (WAN) devo utilizzare Dyndns.org, http://xxxxxxx.dyndns.org:47080 . Il modem/router ha il portfoworwarding corretto. Non so che metodo vb.net utilizzare per ricavare da Dyndns l'indirizzo fisico del router ed inserirlo nel comando di connessione
dell'applicazione. Ho fatto diversi tentativi con metodi diversi ma senza risultato ( es.WebClient.DownloadData Method (String) ) ma senza risultato. Potete darmi consigli ? grazie.

GN (Member)
Guru

Messaggi: 772
Iscritto: 30/04/2011

Postato alle 18:47
Domenica, 05/05/2013

Scusa non vorrei dire un'assurdità, ma non basta che fai

Codice sorgente - presumibilmente Plain Text

cliente.Connect("xxxxxxx.dyndns.org", 47080)

p7389m (Normal User)
Newbie

Messaggi: 6
Iscritto: 13/02/2011

Postato alle 14:50
Lunedì, 06/05/2013

Grazie del consiglio, vorrei avere la scelta tra indirizzo LAN e quello WAN (DNS) :
ho usato 2 radiobutton, il primo ovviamente funziona, il secondo devo ancora provarlo, non so se funzionera', ma devo comunque usare ipadress con i valori per LAN e WAN . E' valido quello che ho scritto per il button2 ?
Se no puoi suggerirmi come fare? Grazie.

'-------------- scelta della connessione lan oppure wan --------------------------------------------------------

    Private Sub RadioButton1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles RadioButton1.CheckedChanged
        ipadress = "192.168.1.9"
    End Sub

    Private Sub RadioButton2_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles RadioButton2.CheckedChanged
        Dim hostInfo As IPHostEntry = Dns.GetHostEntry("www.xxxxxxxx.dyndns.org")
        ipadress = hostInfo.ToString
    End Sub

p7389m (Normal User)
Newbie

Messaggi: 6
Iscritto: 13/02/2011

Postato alle 16:01
Martedì, 07/05/2013

Risolto, grazie di nuovo del consiglio, mi stavo complicando la vita :
cliente.Connect("xxxxxxxx.dyndns.org", 47080)
Dim ipAddress As IPAddress = Dns.GetHostEntry("xxxxxxxxx.dyndns.org").AddressList(0)
TextBox2.Text = ipAddress.ToString
In questo modo verifico nella TexBox l'indirizzo fisico del router, ovviamente lo stesso che ricavo vedendo la da remoto la pagina HTML del router relativa al suo indirizzo esterno.

GN (Member)
Guru

Messaggi: 772
Iscritto: 30/04/2011

Postato alle 19:06
Martedì, 07/05/2013

Ok bene