查看OCX的属性和方法的脚本

/----查看OCX组件的属性
<html>
<head>
<title>OCX</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript">
var flag=true
function showall(){
alist = new Array();
newocx();
list1.value = "";
list2.value = "";
list1.value = ocxtype.outerHTML;
j = 0;
for (i in ocxtype)
{
  alist[j] = i;
  j++;
}
for (i = 0; i < alist.length; i++)
  for (j = (alist.length-1); j > 0; j--)
  {
   if (alist[j] < alist[j-1])
   {
    temps = alist[j];
    alist[j] = alist[j-1];
    alist[j-1] = temps;
   }
  }
for (i = 0; i < alist.length; i++)
  list2.value += alist[i] + "\n";
alert("共有 "+alist.length+" 个属性方法")
}
function newocx()
{
ocxfield.innerHTML = "<OBJECT ID='ocxtype' WIDTH='0px' HEIGHT='0px'" +
    "CLASSID='CLSID:" + ocxid.value + "'></OBJECT>";
}
</script>
</head>

<div align="center">
<p>classid
    <input type="text" id="ocxid" style="400" value="F3A614DC-ABE0-11d2-A441-00C04F795683" onchange="jscript:flag=true">
    <input type="button" id="look" value="查看" onclick="showall()">
</p>
<table width="75%" border="1">
    <tr>
      <td height="24">
        <div align="center">html中的写法</div>
      </td>
      <td height="24">
        <div align="center">OCX中的属性事件</div>
      </td>
    </tr>
    <tr>
      <td>
        <textarea id="list1" style=" 500px; height: 400px;" readonly></textarea>
      </td>
      <td>
        <textarea id="list2" style="250px; height:400px;" readonly></textarea>
      </td>
    </tr>
</table>
</div>
<div id="ocxfield">
</div>
</body>
</html>