depuis quelque temps je galère avec une application au niveau serveur qui detecte les adresse OP des pda connecté en protocole DHCP , bref mon application une fois sur le serveur je clique sur le boutton c est la liste des IP des PDA qui s affiche sur ma console
le code que j ai utlisé et ça marche pas du tout est
Public Class Form1
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim Root As New DirectoryEntry("WinNT:")
Dim Parent As DirectoryServices.DirectoryEntries
Parent = Root.Children
Dim d As DirectoryEntries = Parent
For Each CompList As DirectoryEntry In Parent
For Each c As DirectoryEntry In CompList.Children
If (c.Name <> "Schema") Then
Dim MachineIPList As IPHostEntry = System.Net.Dns.GetHostEntry(c.Name)
Dim MachineIPAddr() As IPAddress = MachineIPList.AddressList
If MachineIPAddr.GetUpperBound(0) = 3 Then ' IPV4
MessageBox.Show(c.Name & " : " & MachineIPAddr(3).ToString)
Else
MessageBox.Show(c.Name & " : " & MachineIPAddr(0).ToString)
End If
End If
Next
Next
End Sub
End Class
si vous avez une proposition n 'hesitez pas SVP , je dois rendre ce travail a la fin de cette semaine .
A voir également:
Application vb.net detectant l IP des PDA connecté sur le serveur
j ai fais appel au System.directoryServices apres de l avoir apporté , mon application fonctionne mais quand j execute c est tjrs mon adresse Ip qui est affiché , j ai ajouté une boucle if hostname="le nom de machine des PDA" mais ça marche tjrs pas ,quand je dis ça marche pas c pas que ça s excute pas du tout , mais c pas les IP des PDA qui s'affiche , j arrive pas a avoir le resultat que j attendais , autres questions Me cMarcotte??
Ben enfin je sais d'ou viens le soucie , moi j utilise System.Net.Dns.GetHostEntry(c.Name) mais c est avec le protocole DHCP que les PDA sont connecté donc ce DNS ça fonctionne pas et c est plus grave que je comprend pas grand chose en reseau