웹페이지에서 CPU 정보, MAC Address(맥어드레스) 구하는 컨트롤

Method
----------------------------------------------------------------
function GetDriveLetter(): string;
function GetDiskVolume(const cDisk: string): string;
function FileExists(const FileName: string): WordBool;
function DirectoryExists(const path: string): WordBool;
function GetWindowsDirectory(): string;
function GetSystemDirectory(): string;
function GetBootDirectory(): string;
function GetTempDirectory(): string;
function GetProgramFilesDirectory(): string;
function GetFileSize(const FileName: string): Integer;
function GetWSHVersion(): string;
function GetFileVersion(const FileName: string): string;
procedure About();
function GetWindowsVersion(): string;


Property
----------------------------------------------------------------
property CPUID: string;
property CPUVendor: string;
property CPUType: string;
property CPUFamily: string;
property CPUModel: string;
property CPUStepping: string;
property MacAddress: string;
property ComputerName: string;
property WorkGroup: string;
property ActiveMacAddress: string;
property IP: string;
property HDDID: string;


Event
----------------------------------------------------------------
procedure OnLoaded;

맥어드레스 구하기

"인증처리기" 설치 여부를 묻는 인증 창이 나타나면 "예"를 누르면 데모를 볼 수 있습니다.
이 후 삭제는 C:\WINNT\Downloaded Program Files에서 “맥어드레스 인증 컨트롤”을 제거하면 됩니다.

소스입니다.

<SCRIPT LANGUAGE="JavaScript">
<!--
	// 맥어드레스 인증 컨트롤의 설치 여부 확인
	function installed()
	{
	  if (typeof(document.all(""))!="undefined" && document.all("").object!=null) 
		return true;
	  else 
		return false;
	}
//-->
</SCRIPT>

<SCRIPT language=JavaScript for=auth event=OnError(ErrMsg)>
   alert("에러 발생:" +  ErrMsg);
</SCRIPT>

<OBJECT id="" classid="clsid:7C159314-7E2C-4E6E-B580-5DF25610F581" codebase="./AuthByMAC.cab#Version=1,1,9,0">
	<PARAM name=copyright value="http://isulnara.com">
	<div style="position:absolute;top:276;left:320;width:300;height:68;border:solid 1 #99B3A0;background:#D8D7C4;overflow:hidden;z-index:1;visibility:visible;">
		<FONT style='font-family: "굴림", "Verdana"; font-size: 9pt; ont-style: normal;'>
		<BR>  인증 컴포넌트가 설치되지 않았습니다.  
		<BR>  <a href="./AuthByMAC.EXE"><font color=red>이곳</font></a>을 클릭하여 수동으로 설치하시기 바랍니다.  </FONT>
	</div>
</OBJECT>
<SCRIPT LANGUAGE="JavaScript">
<!--
	if (installed)
	{
		alert("맥어드레스:\n" + .MAC);
		alert("컴퓨터 이름:\n" + .ComputerName);
		alert("작업그룹:\n" + .WorkGroup);
	}
	else
		alert("맥어드레스 인증 컨트롤이 설치 되지 않았습니다.");
//-->

컨트롤 설치가 안되었습니다.