Originariamente inviato da oregon
Vuoi inviare quel qualcosina in VB6 in modo che lo possa testare?
non faccio altro che querare la classe
Win32_NetworkAdapterConfiguration
e ciclarmi tutto il contenuto accodando tutti i macaddress che trovo
nulla di che
cmq il codice vb che ho provato oltre al .net e al c++ è questo:
codice:
Private Sub Form_Load()
Set objWMIService = GetObject("winmgmts:\\localhost\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration")
With List1
For Each objItem In colItems
.AddItem "Nome: " & objItem.Caption
.AddItem "Mac Address: " & objItem.MacAddress
.AddItem ""
Next
End With
End Sub
mi da errore sul getobject avviandolo dal cliente e come ben capisci la cosa è veramente assurda