How to use WMI with Excel VBA
개요 엑셀의 VBA로 프로그램을 작성할때 WMI를 이용하여 원하는 기능을 도출할 수 있다. 인터프리터 언어의 한계상.. 완벽한 보안은 될 수 없지만 본 내용을 응용하여 심플한 License 코드를 작성할 수 있다. Contents <VBA : Visual Basic for Applications> Get Serial Number of Mainboard 메인보드의 시리얼 번호를 추출하는 소스코드. 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 Private Function SystemSerialNumber () As String Dim mother_boards As Variant Dim board As Variant Dim wmi As Variant Dim serial_numbers As String ' Get the Windows Management Instrumentation object. Set wmi = GetObject( "WinMgmts:" ) ' Get the "base boards" (mother boards). Set mother_boards = wmi.InstancesOf( "Win32_BaseBoard" ) For Each board In mother_boards seria...