javascript读取客户端的U盘序列号问题

[code=JScript]<script type="text/javascript" >
     function GetDIVORPIV(DIV)
       {
            var str;
            var arrayDIV=new Array();
            
            if(DIV.indexOf("_")>0)
            {
                arrayDIV=DIV.split("_");
                str=arrayDIV[1];
             }
            else 
            {
                str="";
            }
            return str;
       }
       //读取U盘的DIV和PIV
       function GetDIVandPIV(DIVPIV)
       {
            var strDIVandPIV;
            var strDIVPIV=DIVPIV;
            
            var arrayDIVPIV=new Array();
            
            if(strDIVPIV.indexOf("&")>0)
            {
                arrayDIVPIV=strDIVPIV.split("&");
                
                strDIVandPIV=GetDIVORPIV(arrayDIVPIV[0])+GetDIVORPIV(arrayDIVPIV[1]);
            }
            else
            {
                strDIVandPIV="";
            }
            return strDIVandPIV;
            
       }
       function GetUsbSN(DIVPIVSN)
       {
            var UsbSN;
            
            var strSN=DIVPIVSN ;
            var arraySN=new Array();
            
            if(strSN.indexOf("&")>0)
            {
                arraySN=strSN.split("\\");
                
                if(arraySN.length>2)
                {
                    UsbSN=GetDIVandPIV(arraySN[1])+arraySN[2];
                }
                else
                {
                    UsbSN="";
                }
            }
            else
            {
                UsbSN="";
            }
            return UsbSN;
            
       }
       //判断是否有U盘
       function CheckUsb()
       {
            var e,x;   
            var ForReading   =   1,RorWriting   =   2; 
            var fso   =   new   ActiveXObject("Scripting.FileSystemObject");
            var bfResult=false  ; 
             
            e     =   new   Enumerator(fso.Drives)    
            for(;!e.atEnd();e.moveNext())   
            {   
                x=e.item(); 
                if(x.DriveType==1)   
                {   
                    if(x.Path!="A:")   
                    {   
                        bfResult=true ;      
                    }   
                }    
             }
             return bfResult;
       }
       function ReadUsbSN() 
     {            var bfUsb;
            bfUsb=CheckUsb();
            if(bfUsb==true)
            {
            var locator = new ActiveXObject ("WbemScripting.SWbemLocator");
            var service = locator.ConnectServer(".");
            var properties = service.ExecQuery("SELECT * FROM Win32_USBHub");
            var e = new Enumerator (properties);
            
            var arrayUsbSN=new Array();//存放系列号
            var intCount=0;
             debugger;        //说明：在VS2008中添加该句，并且取消浏览器中禁用脚本调试选项（浏览器高级设置里）               //并在VS2008里运行该代码时，程序会停止在该行（该语句主要用于调试用）
            for (;!e.atEnd();e.moveNext ())
            {
           var p = e.item ();
                    var strSN;
           var sn=p.DeviceID    //                debugger;
                    if(sn.indexOf("VID")>0)
           {
                        strSN=GetUsbSN(sn);
                        arrayUsbSN[intCount]=strSN;
                        intCount=intCount+1;
                        alert("你的U盘系列号为："+strSN);
           }  
            } 
           }
           else
           {
               alert("请插入U盘");
           }
 }</code>这段代码是在网上找到的，ActiveXObject 会出现错误。本人理解是不许访问客户端的。配合ActiveX组件使用。有知道这个组件的事知道问题所在的请指示。有组件请发到[email protected]里