Address Mac Depuis IP / Ordi en vb.netRésolu

Question

Bonjour,

je gal&#232;re pour retrouver l'adresse mac d'une carte r&#233;seau d'un poste distant &#224; partir de son nom ou bien de son adresse ip (Je sais trouver l'ip depuis le nom).

Ma fonctions en vb6 tourne tres bien (appel de sendarp via api.) Mais en Net je ne trouve pas la solution sachant que via WMI cela ne m'interresse pas puisque si le poste est &#233;quip&#233; de xp sp2 ben sa marche plus ! (le firewall bloque l'acces wmi).

COlive.
Deux intellectuels assis iront moins loin qu'un con qui marche. Pensez-y !

cs_CanisLupus · Accepted Answer

Tu as raison ! VB.NET ne supporte pas les string de longueur fixe (string * x).

Il serait conseill&#233; de remplacer un
Dim s as string * 10 
par
dim s as string
s=string$(10," ")

D'autre part, dans les fonctions (api ou autres), il ne faut plus utiliser les "as Any" et les remplacer par as String ou as Long, suivant le type attendu. De m&#234;me, le as optional devient as optional = 0.

J'ai trouv&#233; une adresse qui &#233;num&#232;re un certain nombre de diff&#233;rences en vb6 et vb.net, &#231;a peut t'&#234;tre utile :

http://lassalle.free.fr/pc/themes.html

COlive · Answer

Personne ???

COlive.
Deux intellectuels assis iront moins loin qu'un con qui marche. Pensez-y !

cs_CanisLupus · Answer

Salut,

Tu ne peux pas r&#233;utiliser ta fonction VB6 dans .NET ?

Cordialement, CanisLupus

COlive · Answer

ben malheureusement non, les apis ne fonctionnent pas sous .net. Je ne comprend pas pourquoi.



COlive.
Deux intellectuels assis iront moins loin qu'un con qui marche. Pensez-y !

cs_CanisLupus · Answer

Je ne suis pas encore tr&#232;s fortiche en .NET mais je pense qu'on peut faire fonctionner des API.
J'ai trouv&#233; un tit exemple qui pourrait t'inspirer :

http://www.dotnet247.com/247reference/msgs/44/221057.aspx

Cordialement, CanisLupus

COlive · Answer

Je connais bien la dll puisque je l'utilise sous vb6, mais mon probl&#232;me est que justement sous vb.net elle ne me retourne que des 00

Je ne dois pas l'appeler comme il faut et la source du lien ci dessus n'est pas du vb.net et je n'arrive pas &#224; la convertir en vb.net avec succ&#233;s (afin de faire fonctionner correctement cette dll)

COlive.
Deux intellectuels assis iront moins loin qu'un con qui marche. Pensez-y !

cs_CanisLupus · Answer

Oups, l'&#233;tourdi, je ne t'ai pas copi&#233; la bonne adresse.

Celle-l&#224; donne un exemple de d&#233;claration et d'appel d'une API en VB.NET

http://www.freevbcode.com/ShowCode.asp?ID=2707

Cordialement, CanisLupus

COlive · Answer

ben en fait j'ai pas vraiment de soucis pour utiliser les APIs (voir mes codes), j'ai des soucis pour utiliser cette dll l&#224; en particulier et aussi celle de wininet.dll.
Les autres, elles fonctionnent tr&#232;s bien (voir mes sources)

COlive.
Deux intellectuels assis iront moins loin qu'un con qui marche. Pensez-y !

cs_CanisLupus · Answer

Alors l&#224;, je s&#232;che.

Comme j'ai dit, je d&#233;bute en VB.NET et les essais que j'ai fait avec des api ont fonctionn&#233; jusqu'&#224; maintenant. Pour wininet.dll, je n'ai pas encore vu. J'essaierai &#231;a demain.

Au fait, je dis peut &#234;tre une c....... mais ca ne pourrait pas &#234;tre un prob d'inscription en registry ?

Cordialement, CanisLupus

cs_CanisLupus · Answer

J'ai trouv&#233; cette adresse, mais pas test&#233;, regarde si &#231;a te convient. Parait que &#231;a peut fonctionner en vbnet. Je ne pourrai tester que demain.

http://vbnet.mvps.org/index.html?code/network/macaddressremote.htm

Cordialement, CanisLupus

COlive · Answer

Et bien en fait j'avais d&#233;j&#224; trouv&#233; cette source qui correspond &#224; 99% &#224; celle que j'ai en vb6.
Et en .net cela ne tourne pas.
Je pense que mon probl&#232;me ne vient pas dans la d&#233;claration des apis / dll mais plutot dans celle de la d&#233;claration des variables string en mode buffer (je sais pas si je suis clair).
En fait en vb6 il est facile de d&#233;clarer une string et de lui donner une longueur pr&#233;cise :

sOrgPath = String(MAX_PATH, 0)

sOrgPath aura alors la longueur MAX_PATH et sera rempli de 0.

Et j'avoue que j'ai pas trouv&#233; comment faire &#231;a en .net.

COlive.
Deux intellectuels assis iront moins loin qu'un con qui marche. Pensez-y !

COlive · Answer

J'ai pas trouv&#233; de solution mais une petite parade pour pouvoir faire fonctionner ma source.
En fait j'ai cr&#233;er une dll sous vb6 que j'utilise sous vb.net puisque l'api contenant sendarp ne veut pas tourner.
Voir ma source WinAdmin cat&#233;gorie vb.net pour une am&#233;lioration future entierement .net.

Merci de votre aide quand m&#234;me, vos liens mon apporter de nombreuses informations.

COlive.
Deux intellectuels assis iront moins loin qu'un con qui marche. Pensez-y !

Pensez &#224; cliquer sur r&#233;ponse accept&#233;es quand votre probl&#232;me est solutionn&#233;.

elguevel · Answer

J'arive un peu tard, mais çà pourra servir à d'autre ... Imports System.Net Imports System.Net.Sockets Declare Function SendARP Lib "iphlpapi.dll" (ByVal DestIP As Integer, ByVal SrcIP As Integer, ByVal pMacAddr As Byte(), ByRef PhyAddrLen As Integer) As Integer Private Function SendArp(ByVal IP As String) As String Dim addr As IPAddress = IPAddress.Parse(IP) Dim mac() As Byte = {0, 0, 0, 0, 0, 0} Dim len As Integer = mac.Length Dim ipadd As Integer = CType(addr.Address, Integer) SendArp(ipadd, 0, mac, len) Dim macAddress As String = BitConverter.ToString(mac, 0, len) Return macAddress End Function /\_/\ ( o.o ) ~ ElGuevel ~ > ^ <

Address Mac Depuis IP / Ordi en vb.net

13 réponses

Discussions similaires