Servidor DNS

[FabioCarpi 2]

Olá. Eu sabia mexer no VB6 mas sou novo no VB2013.

Estou tentando me atualizar. Estava resistindo até agora porque achei que a linguagem antes era melhor.

Bem, vamos lá...

 

Estou querendo fazer um servidor de DNS.

Eis meu código:

Public Class Form1
  Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Dim Server As New System.Net.Sockets.UdpClient(53)
    Dim Ip As New System.Net.IPEndPoint(System.Net.IPAddress.Any, 0)
    Dim Dados As [Byte]() = Server.Receive(Ip)
    Dim Dado As String = System.Text.Encoding.ASCII.GetString(Dados)
    MsgBox("Recebido: " & Dado)
  End Sub
End Class

Quando debugo o código, o conteúdo de dado é

"??        wwwgooglecom   "

E o msgbox mostra so ??

 

 

O que está faltando?

[KhaosDoctor 242]

Os espaços entre o www e o resto da palavra podem ser o problema. Para fazer um teste unitário use a função Trim() na sua string.

[FabioCarpi 2]

o problema nem e esse

queria saber algumas coisas

1) o que significa essas chaves no [byte]?

2) no debug, o conteúdo do array passado são vários números. q números são esses e como converte-los em texto?

http://s1.uploads.im/om1j3.jpg

http://s1.uploads.im/KmHA7.jpg

[KhaosDoctor 242]

Nunca vi a sintaxe [byte], já vi Byte[] mas no caso do VB um array de bytes é passado apenas como Byte().

 

O array são números porque correspondem a bytes e não a valores de texto, como você está passando um endereço de IP então é sensato que ele venha vários números. Para converter os numeros em texto basta usar o ToString()

 

http://msdn.microsoft.com/pt-br/library/e2ayt412.aspx