獲取機器名 <script   language=javascript>  
  var   WshShell   =new   ActiveXObject("WScript.Shell");  
  alert("計算機名   =   "+   WshShell.ExpandEnvironmentStrings("%COMPUTERNAME%"));  
  alert("登入使用者名稱   =   "+   WshShell.ExpandEnvironmentStrings("%USERNAME%"));  
  </script>   =========================================================== 程式碼如下:
<script language=javascript>
var WshShell =new ActiveXObject("WScript.Shell");
alert("計算機名 = "+ WshShell.ExpandEnvironmentStrings("%COMPUTERNAME%"));
alert("登入使用者名稱 = "+ WshShell.ExpandEnvironmentStrings("%USERNAME%"));
</script> <script language=javascript>
var wshNetwork = new ActiveXObject("WScript.Network");
alert("域名       = "+ wshNetwork.UserDomain);
alert("計算機名   = "+ wshNetwork.ComputerName);
alert("登入使用者名稱 = "+ wshNetwork.UserName);
</script> 千萬要注意下面的設定，否則會出錯誤的。 要執行上述指令碼，需要放寬IE的許可權
需要下面選項內容
工具>Internet選項>安全>Internet>自定義級別>ActiveX控制元件和外掛>對沒有標記為安全的ActiveX控制元件進行初始化和指令碼執行,
設定為啟動。

-----------------------------------------------------------------------------------------------------------------------------

獲取IP

<script language="JavaScript">
function GetLocalIPAddr(){
var oSetting = null;
var ip = null;
try{
oSetting = new ActiveXObject("rcbdyctl.Setting");
ip = oSetting.GetIPAddress;
alert(ip);
if (ip.length == 0){
return "沒有連線到Internet";
}
oSetting = null;
}catch(e){
return ip;
}
return ip;
}
alert(GetLocalIPAddr())
</script>