2013-05-10 1 views
3

필자가 작성한 Excel (Windows 용) 응용 프로그램에 몇 가지 기본 보호 수준을 적용하려고합니다. 나는 기계의 MAC 주소를 사용하여 라이센스 파일을 생성 할 생각을하고있었습니다. 내 질문은 : 어떻게 VBScript를 사용하여 Mac 주소를 얻을 수 있습니까?VBScript를 사용하여 Mac 주소 가져 오기

답변

5
dim WMI: set WMI = GetObject("winmgmts:\\.\root\cimv2") 
dim Nads: set Nads = WMI.ExecQuery("Select * from Win32_NetworkAdapter where physicaladapter=true") 
dim nad 
for each Nad in Nads 
    if not isnull(Nad.MACAddress) then Wscript.Echo Nad.description, Nad.MACAddress 
next 

그러나 MAC은 좋지 않습니다. What's a good way to uniquely identify a computer?.

이 모든 물리적 어댑터를 반환하지만 나를 위해 나는 또한 내 Cisco Systems VPN Adapter for 64-bit Windows하는 내가 물리적으로 설명 할 것를 참조하십시오.

+0

답해 주셔서 감사합니다. 그것은 올바르게 작동했습니다. 그 선택에 대한 귀하의 의견에 관해서는 동의합니다. 그러나 도구의 부적절한 사용을 방지하기위한 간단하고 빠른 방법이 필요합니다. 단지 몇 권의 사본 만 배포되기 때문에 이것이 충분할 것이라고 생각합니다 (당분간). – carlossierra

+0

@Alex,하지만 "활성"네트워크의 MAC 주소 만 얻는 방법? 이 늦기 @SahilMittal 아니다 –

+0

호프 활성 하나는 [MSDN에서의 Win32_NetworkAdapter (https://msdn.microsoft.com/en-us/library/aa394216 (V = VS에 다른 특성을 검사함으로써 결정될 수있다. 85)에서 .aspx)을 찾아 ** NetConnectionStatus = 2 ** + ** 속도 null는 아니고, 모두 유선, 무선 랜 접속, 모바일 네트워크가 연결된 경우> 0 **, 당신은에 따라 하나를 선택해야합니다 ** AdapterType * *. – PatricK

관련 문제