Hvordan finne og liste opp hostnavn?

[zliN]

holder på å lage en liten net send prog, så lurte jeg på om det går ann å få vb til å liste opp alle hostnavnene i en bestemt arbeidsgruppe? det hadde virkelig gjort programme mitt supert..

 

ps: er litt grønn når det gjelder vb!

[Vortexsurfer]

Brukte denne funksjonen til noe lignende for en stund tilbake, kanskje den kan hjelpe deg litt på vei.

 

Private Sub btnGetComputers_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles btnGetComputers.Click

 

Dim objAddr As System.Net.IPAddress

txtComputer = New TextBox()

Try

With System.Net.Dns.GetHostByName(txtSite.Text)

objAddr = New System.Net.IPAddress(.AddressList(0).Address)

strIP = objAddr.ToString

strCompName = (.HostName).ToString

ycoord += 20

 

txtComputer.Name = i

txtComputer.Location = New System.Drawing.Point(0, ycoord)

txtComputer.Size = New Size(288, 20)

txtComputer.Text = strIP + " - " + strCompName + " " txtComputer.Name

Me.Controls.Add(txtComputer)

 

 

AddHandler txtComputer.Click, AddressOf Browse

End With

Catch except As Exception

'Host finnes ikke

MessageBox.Show(except.Message)

End Try

i += 1

End Sub