Windows 8.1��Windows 8.1 Update�́A���i�����o�[�W�����ԍ����r���h�ԍ��������B�X�^�[�g��ʂ�^�X�N�o�[�ŊȒP�Ɏ��ʂł��܂����A�v���O�����I�Ɏ��ʂ��������Ƃ�����ł��傤�B�̏������X�N���v�g���C�����āA����Ă݂܂����B
�@������Windows PC���Ǘ��������Ƃ�����l�Ȃ�AWindows�̃o�[�W���������ʂ���o�b�`�t�@�C���i.bat��.cmd�j��X�N���v�g�i.vbs��.ps1�j����x�͏��������Ƃ�����Ǝv���܂��B
�@Windows 95��Windows 98�AWindows NT���S����90�N��㔼�Ȃ�A�ȉ��́uNTOR9X.BAT�v�̂悤�ȊȒP�ȕ���ŁAWindows 9x�Ŏ��s�������R�}���h��Windows NT�Ŏ��s�������R�}���h����̃o�b�`�t�@�C���ɋL�q���A���O�I���X�N���v�g�ȂǂɎd����ł����̂ł͂Ȃ��ł��傤���i���1�j�B
@ECHO OFF IF "%OS%" == "Windows_NT" GOTO WINNT :WIN9X REM �i������ Windows 95�^98�^Me �����̃o�b�`���L�q�j ECHO ���̃R���s���[�^�[�� Windows 9x �n�ł��B GOTO END :WINNT REM �i������ Windows NT �����̃o�b�`���L�q�j ECHO ���̃R���s���[�^�[�� Windows NT �n�ł��B :END
�@���̃o�b�`�t�@�C���́A�ŐV��Windows 8.1�ł����Ȃ��@�\���܂��B�������AWindows 9x�n��2000�N��Windows Millennium Edition�iMe�j���Ō�ɊJ�����I�����A���ł�Windows NT�n�������݂��Ȃ��̂ŁA���̂悤�ȕ���͉��̈Ӗ�������܂���B
�@2000�N��Windows 2000�AWindows Me�̓o��ŁA���ʂ�����Windows�̃o�[�W�����������܂����B�������Ȃ���A�V�X�e���Ǘ��̂��߂́uWMI�v�iWindows Management Instrumentation�j�C���^�[�t�F�[�X�ƁA�X�N���v�g�G���W���uWSH�v�iWindows Script Host�j���V����Windows�ɂ͕W�����ڂ��ꂽ���ƂŁAWSH�X�N���v�g����g���āAWindows�̃o�[�W���������łȂ��A�G�f�B�V������T�[�r�X�p�b�N�iService Pack�j�̃��x���܂ŏڍׂɎ��ʂł���悤�ɂȂ�܂����B
�@WMI�����WSH�́AWindows 95�^98��Windows NT�ɂ��_�E�����[�h���ꂽ�̂ŁA�Â�Windows�ł����ʂ��邱�Ƃ��ł��܂����B
�@�Ⴆ�A�������2�̃X�N���v�g�uOSINFO.VBS�v�́A�Ƃ���G��������2006�N���߂ɏ������AWindows�̃o�[�W�����ƃG�f�B�V���������ʂ���X�N���v�g�ł��B
�@���̃X�N���v�g�ł́AWMI��Win32_OperatingSystem�N���X��OSType�AOSProductSuite�ACaption�ACSDVersion�Ƃ������v���p�e�B���Q�Ƃ��āAWindows 95����Windows Me�܂ł̃o�[�W�����A�����Windows NT 4.0�AWindows 2000�AWindows XP�AWindows Server 2003�AWindows Server 2003 R2�܂ł̃o�[�W�����ƃG�f�B�V���������ʂ���悤�ɋL�q���Ă��܂��B
�@�����Ȃ�̂ŃR�[�h�̌f�ڂ͏ȗ����܂����A�v���Ԃ�ɃR�[�h�����Ă݂�ƁuWindows NT Server 4.0,Terminal Server Edition�v�����ʂ��邽�߂̗�O�������L�q���Ă��܂����B
�@���̌Â��X�N���v�g��Windows 8.1�̍ŐV���Ŏ��s���Ă݂��Ƃ���A���Ȃ�����������\�����܂����BWindows�̃o�[�W������G�f�B�V���������ʂ�����@�͍H�v����ł��܂��܂ł����A���̃X�N���v�g�ł͎��ʂ̂��߂ɓ��ʂȏ����i������̕ҏW�Ȃǁj���K�v�Ȃ����̂ɂ��ẮACaption�i���i���j�v���p�e�B��CSDVersion�i�T�[�r�X�p�b�N�j�v���p�e�B�����̂܂g�p�����̂��K�������悤�ł��B
�@Windows Vista���o�ꂵ���Ƃ��́A�G�f�B�V�����̑����Ɍ˘f�������̂ł��BWindows Vista�́AStarter�i���{�s��ł͒Ȃ��j�AHome Basic�AHome Premium�ABusiness�AEnterprise�AUltimate�̑S6�G�f�B�V���������C���A�b�v����܂����BWindows Server 2008�̃G�f�B�V�������܂߂�ƁA���̂Ƃ��ɐV���ɒ��ԓ��肵��Windows�̐��͂���ɑ����܂��B
�@���̏ɑΉ����Ă��ǂ����͕�����܂��AWindows Vista�����Windows Server 2008����́AWin32_OperatingSystem�N���X��OperatingSystemSKU�v���p�e�B�ɃZ�b�g�����SKU�iStock Keeping Unit�j�ԍ������p�ł���悤�ɂȂ�܂����B
�@SKU�ԍ��͐��i�̃G�f�B�V�������ƂɈقȂ邽�߁A�G�f�B�V�����𐳊m�Ɏ��ʂ��邱�Ƃ��ł��܂��BWindows Vista�ȍ~��SKU�ԍ��́A�ȉ��̃h�L�������g�Ŋm�F�ł��܂��B�h�L�������g�ɂ�16�i���ŋL�q����Ă��邱�Ƃɗ��ӂ��Ă��������BOperatingSystemSKU�v���p�e�B�ɂ́A10�i���̒l���Z�b�g����Ă��܂��B
�@SKU�ԍ��͕�����ł͂Ȃ������Ȃ̂ŁA�X�N���v�g�ł̎g�p�ɂ��K���Ă���ƍl���A���̌�A�M�҂��쐬����Windows���ʃX�N���v�g�ł�OperatingSystemSKU�v���p�e�B��p����悤�ɂȂ�܂����BOperatingSystemSKU��Version�iWindows�̃o�[�W�����ԍ��j�v���p�e�B��g�ݍ��킹��A���ʂł��Ȃ��o�[�W������G�f�B�V�����͂Ȃ��ƍl�����̂ł��B
�@���̉��3�̃X�N���v�g�uGETOSSKU.VBS�v�́A���̂悤�ȍl���̂��ƁAWindows Vista����Windows 8�܂ł̃o�[�W��������уG�f�B�V�����A�����Windows Thin PC�i��ƌ����ɖ��������V���N���C�A���g�p�y��OS�AWindows SA���T�̈�j�𐳊m�Ɏ��ʂ���悤�ɏ������X�N���v�g�ł��B
�@��������R�[�h�̌f�ڂ͏ȗ����܂����A��ŏC���ł̃R�[�h���Љ�܂��B���̃X�N���v�g�͐��m�������߁AVersion�v���p�e�B���g�p�������Ƃ������ƂȂ�܂����B�����A�܂������[�X����Ă��Ȃ�Windows 8.1�̐��m�ȃo�[�W�����ԍ��ȂǕ�����͂����Ȃ��̂ŁAWindows 8.1�𐳂������ʂł��Ȃ��̂ł��B
�@�X�N���v�g�uGETOSSKU.VBS�v�̂悤�ɁA���m���A�ׂ�����Nj�����ƁA�V����Windows�̃o�[�W�������o�ꂷ�邽�тɁA�X�N���v�g�̏C�����K�v�ɂȂ�܂��B���ł́AWindows 8.1�̃o�[�W�����ԍ����u6.3.9600�v�ƕ������Ă���̂ŏC���͊ȒP�ł��B
�@�������A�ׂ������M���̕M�҂́AWindows 8.1 Update�̑��݂��ǂ����Ă��C�ɂȂ�܂��BWindows 8.1 Update���K�p����Ă��邩�ۂ��ŁAWindows 8.1�̃��[�U�[�C���^�[�t�F�[�X�iUI�j�͑傫���قȂ�܂����A�d�l���ς���Ă��镔��������܂��B�������Ȃ���AWindows 8.1 Update�Ő��i���A�o�[�W�����ԍ��A�r���h�ԍ����ς�邱�Ƃ͂���܂���B�T�[�r�X�p�b�N�ł��Ȃ��̂ŁACSDVersion�v���p�e�B��ServicePackMajorVersion�v���p�e�B���g���܂���B
�@�ȉ���Windows�̃w���v�y�[�W�ł́AWindows 8.1 Update�ɍX�V�ς݂ł��邩�ǂ������m�F������@�Ƃ��āA�X�^�[�g��ʂ̉E����̃A�J�E���g�摜�̉��Ɂu�����v�{�^�����\������Ă��邩�ǂ����Ɛ������Ă��܂��i���4�j�B�X�N���v�g���炱�́u�����v�{�^���̗L�����m�F���邱�Ƃ͔��ɓ���ł��傤�B���Ȃ��Ƃ��A�M�҂͊m�F������@���v���t���܂���ł����B
�@�M�҂̃A�C�f�A�͂����ł��BWin32_QuickFixEngineering�N���X��HotfixID�v���p�e�B���������AWindows 8.1 Update�̍X�V�v���O�����������uKB2919355�v�����݂��邩�ǂ����Ŕ��f����̂ł��B
�@�ȉ��̃X�N���v�g�uGETOSSKUV2.VBS�v�́A��肪�������Â��X�N���v�g�uGETOSSKU.VBS�v���C�����āAWindows 8.1�����Windows 8.1 Update�ɑΉ��������̂ł��i���5�j�B����ɁA���ł�32bit�ł�64bit�ł��̏����lj����Ă݂܂����B�Q�l�܂łɑS�R�[�h���f�ڂ��܂��B�Ȃ��AWindows Server�̃o�[�W�����ƃG�f�B�V�����̎��ʂ̓R�[�h�������Ȃ邽�߁A�������܂����B
strComputer = "." Set objWMIService = GetObject("winmgmts:����" & strComputer & "��root��cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_OperatingSystem") '����������lj� Set colItems2 = objWMIService.ExecQuery("Select * from Win32_QuickFixEngineering") '�������܂Œlj� For Each objItem in colItems Select Case objItem.ProductType Case 1 'Workstation strVersion = "Windows Unkown Version" strEdition = " (Unkown Edition)" strServicePack = " (Unkonwn Service Pack)" If objItem.ServicePackMajorVersion = 0 Then strServicePack = " (RTM)" Else strServicePack = " (Service Pack " & objItem.ServicePackMajorVersion & ")" End If If InStr(objItem.Version, "6.0.") Then strVersion = "Windows Vista" Select Case objItem.OperatingSystemSKU Case 1 strEdition = " Ultimate" Case 2 strEdition = " Home Basic" Case 3 strEdition = " Home Premium" Case 4 strEdition = " Enterprise" Case 6 strEdition = " Business" End Select ElseIf InStr(objItem.Version, "6.1.") Then strVersion = "Windows 7" Select Case objItem.OperatingSystemSKU Case 1 strEdition = " Ultimate" Case 3 strEdition = " Home Premium" Case 4 strEdition = " Enterprise" Case 11 strEdition = " Starter" Case 65 strVersion = "Windows Thin PC" strEdition = "" End Select ElseIf InStr(objItem.Version, "6.2.") Then strVersion = "Windows 8" Select Case objItem.OperatingSystemSKU Case 4 strEdition = " Enterprise" Case 48 strEdition = " Pro" Case 72 strEdition = " Enterprise Evalution" Case 101 strEdition = "" '���� Case 103 strEdition = " Pro with Media Center" End Select '����������lj� ElseIf InStr(objItem.Version, "6.3.") Then strVersion = "Windows 8.1" Select Case objItem.OperatingSystemSKU Case 4 strEdition = " Enterprise" Case 48 strEdition = " Pro" Case 72 strEdition = " Enterprise Evalution" Case 101 strEdition = "" '���� Case 103 strEdition = " Pro with Media Center" End Select For Each objItem2 in colItems2 If objItem2.HotfixID = "KB2919355" Then If strServicePack = " (RTM)" Then strServicePack = " (Update 1)" End If End If If objItem2.HotfixID = "KBxxxxxxx" Then '���̑傫�ȍX�V���o���Ƃ��ɁA��������ʂ�����������KB�ԍ��������ɁI strServicePack = " (" & objItem2.HotfixID & " �K�p�ς�)" End If Next End If '�������܂Œlj�����������C�� WScript.Echo strVersion & strEdition & strServicePack & " " & objItem.OSArchitecture '�������܂ŏC�� Case 2 'Domain Controller WScript.Echo "Windows Server (Domain Controller)" Case 3 'Server WScript.Echo "Windows Server" End Select Next
�@���āA���܂��ł͎��̑傫�ȍX�V�ł���uWindows 8.1 Update 2�v��AWindows�̎��̃o�[�W�����ł���J���R�[�h���uThreshold�v�iWindows 9�Ƃ������̂ɂȂ�̂��ǂ����͕s���j�̃E�\���z���g���悭������Ȃ����킳���������Ă���悤�ɂȂ�܂����B����炪�o�ꂵ���Ƃ��A�X�N���v�g�uGETOSSKUV2.VBS�v�͑Ή��̂��߂̏C�����K�v�ɂȂ�܂��B��Ȃ������_�ł͑Ή����悤������܂��A�ꉞ�A���ʂ������悤�Ȏ��̑傫�ȍX�V��Windows 8.1 Update 1�Ɠ����悤�ɒʏ�̍X�V�v���O�����Ƃ��Ē����Ɨ\�z���āA�R�[�h�Ɋ܂߂Ă����܂����B
��Windows 8.1 Update 2��8���ɂ������Ƃ̂��킳������܂������A�}�C�N���\�t�g��Update 2�����v��͂Ȃ��悤�ł��B
�R�s �ǁi��܂��� ��傤�j
��茧�Ԋ��s�ݏZ�BMicrosoft MVP�FHyper-V�iOct 2008 - Sep 2014�j�BSIer�AIT�o�ŎЁA������Ƃ̃V�X�e���Ǘ��҂��o�āA�t���[�̃e�N�j�J�����C�^�[�ɁB�}�C�N���\�t�g���i�A�e�N�m���W�𒆐S�ɁAIT�G���AWeb�T�C�g�ւ̋L���̊�e�A�h�L�������g�쐬�A�����ނȂǂ��肪����B�l�u���O�́w�R�s�ǂ̂��ʂȂ�Ƃ���[����x�B
Copyright © ITmedia, Inc. All Rights Reserved.