C# / VB.NET - [VB.NET] Programma che da un hostname dia il suo ip ?

Forum - C# / VB.NET - [VB.NET] Programma che da un hostname dia il suo ip ? - Pagina 2

Pagine: [ 1 2 ]

theprogrammer (Normal User)
Guru^2

Messaggi: 2509
Iscritto: 28/01/2009

Postato alle 21:15
Domenica, 08/03/2009

Ma che senso ha il Return all'interno di un ciclo?

Il ciclo serve per restituire tutti gli eventuali IP.

Se l'Ip che deve restituire e' solo il primo, allora

Codice sorgente - presumibilmente VB.NET

Public Function rehost(ByVal nHost) As String
        Dim hosts As System.Net.IPHostEntry
        hosts = Dns.GetHostEntry(nHost)
        Return hosts.AddressList(0).ToString()
    End Function
 
    Sub Main()
        Console.WriteLine(rehost("ultimal2.no-ip.info"))
    End Sub

Ultima modifica effettuata da theprogrammer il 08/03/2009 alle 21:22

Reiwarmir (Normal User)
Newbie

Messaggi: 6
Iscritto: 07/03/2009

Postato alle 1:21
Lunedì, 09/03/2009

Grazie, non sapevo dell'esistenza di quell'istanza... Sono ignorante ma almeno imparo quando mi viene spiegato

Ti rompo per un'ultima cosa, quando uso una stringa di questo tipo

Codice sorgente - presumibilmente Plain Text

...
            FileOpen(fd2, Environ$("WINDIR") & "/system32/drivers/etc/hosts", OpenMode.Output)
            ip = rehost(Label2.Text)
            hole = ip & " l2.authd.lineage2.com"
            WriteLine(fd2, hole)
...

nel file mi scrive la stringa preceduta e seguita da doppi apici, come faccio ad evitarlo e stampare solo il contenuto ?

theprogrammer (Normal User)
Guru^2

Messaggi: 2509
Iscritto: 28/01/2009

Postato alle 13:25
Lunedì, 09/03/2009

Testo quotato

Postato originariamente da Reiwarmir:
Sono ignorante ma almeno imparo quando mi viene spiegato

Ritengo che uno debba prima STUDIARE sui libri e SOLO se qualcosa non viene capito, allora ci si rivolge a chi te lo spiega ...

Se una cosa NON si cerca perche' c'e' uno in un forum che te lo dice senza fatica, si impara poco ...

Usa la Print al posto della Write (lo avresti trovato in un qualsiasi libro, se solo l'avessi cercato ...)

Print(fd2, hole)

Il Totem (Admin)
Guru^2

Messaggi: 3635
Iscritto: 24/01/2006

Postato alle 19:03
Lunedì, 09/03/2009

Testo quotato

Postato originariamente da Reiwarmir:

Grazie, non sapevo dell'esistenza di quell'istanza... Sono ignorante ma almeno imparo quando mi viene spiegato

Ti rompo per un'ultima cosa, quando uso una stringa di questo tipo

Codice sorgente - presumibilmente Plain Text

...
            FileOpen(fd2, Environ$("WINDIR") & "/system32/drivers/etc/hosts", OpenMode.Output)
            ip = rehost(Label2.Text)
            hole = ip & " l2.authd.lineage2.com"
            WriteLine(fd2, hole)
...

nel file mi scrive la stringa preceduta e seguita da doppi apici, come faccio ad evitarlo e stampare solo il contenuto ?

Questo non mi sembra vb.net... e poi WriteLine (di streamwriter, ma in generale) non dovrebbe scrivere gli apici quando si tratta di una stringa, perchè quello è solo il modo in cui viene indicata nel sorgente.

Codice sorgente - presumibilmente VB.NET

Dim W As New IO.StreamWriter(Environment.GetEnvironmentVariable("WINDIR") & "/system32/drivers/etc/hosts", True)
Dim ip As String = rehost(Label2.Text)
W.WriteLine(ip & " l2.authd.lineage2.com")
W.Close()

theprogrammer (Normal User)
Guru^2

Messaggi: 2509
Iscritto: 28/01/2009

Postato alle 20:14
Lunedì, 09/03/2009

Queste sono istruzioni riconosciute perche' e' attivo il namespace

Microsoft.VisualBasic

per la compatibilità con il VB6.

Dato che viene (purtroppo) automaticamente aggiunto quando un nuovo progetto viene creato, si possono usare quelle istruzioni.

Bisognerebbe eliminarlo.

Pagine: [ 1 2 ]