Sto facendo uno script che mi dice il mac e l'ip del computer... solo che non mi riesce a trovare il mac...

ecco il codice

codice:
strComputer = "."
On Error Resume Next
Set objergebnis = objWMI.InstancesOf("Win32_NetworkAdapterConfiguration")
For Each objinstance In objergebnis
			ip = Join(objinstance.IPAddress, "")
			MAC = objinstance.MACAddress

Next

dim fso, f1
set fso = createobject("scripting.filesystemobject")
set f1 = fso.createtextfile("c:\Data\nic.txt", true)
f1.writeline "--- NIC Information ---"
f1.writeline "IP: " & IP
f1.writeline "MAC: " & MAC
f1.close
mi dite dove sbaglio?
grazie mille