zoukankan      html  css  js  c++  java
  • 查看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>

    <body bgcolor="#FFFFFF" text="#000000">

    <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>

  • 相关阅读:
    Daily Coding Problem: Problem #994
    Android 开发绕不过的坑:你的 Bitmap 究竟占多大内存?(转)
    1087.Brace-Expansion (prime)
    Ant Design Vue照片墙a-upload
    echarts多条折线图添加单位
    任意文件下载包含https的图片
    错误:Linux环境jps: command not found
    SqlServer事务
    ADO.NET之连接池
    SqlServer全文索引在项目中的实际应用
  • 原文地址:https://www.cnblogs.com/MyFavorite/p/268592.html
Copyright © 2011-2022 走看看