HTA中的VBScript

我是HTA的新手，我想使用VBScript。HTA中的VBScript

我有一些HTML，我想产生一个表内的计算机名（作为一个例子）

我运行到最大的问题是如何从我的函数检索值，并把它里面HTML？

<body style="font:12 pt arial; color:white; filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=0, StartColorStr='#0080FF', EndColorStr='#00FFFF')" onresize="RestoreWindowSize()"> 

<div align="Center"> 

<span id="Update">&nbsp;</span> 

<table border="0"> 
<tr> 
    <td>Computer name</td> 
    <td><div>Data I would like to generate</div></td> 
    <td></td> 
    <td></td> 
    <td></td> 
    <td></td> 
</tr> 
</table> 

</div> 

</body> 
</html>

我知道我的HTML有点草率，我打算把它清理干净。我怎样才能得到一个名为计算机名函数数据，我的标记中出现

来源

2011-11-09 Cocoa Dev

您可以通过遍历DOM做到这一点，就像JavaScript的：

<html> 
    <body style="font:12 pt arial; color:white; filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=0, StartColorStr='#0080FF', EndColorStr='#00FFFF')" onresize="RestoreWindowSize()"> 

    <div align="Center"> 

    <span id="Update">&nbsp;</span> 

    <table border="0"> 
     <tr> 
      <td>Computer name</td> 
      <td><div id="computername">Data I would like to generate</div></td> 
      <td></td> 
      <td></td> 
      <td></td> 
      <td></td> 
     </tr> 
    </table> 

    </div> 
    <script type="text/vbscript"> 

     dim c: set c = document.getElementById("computername") 
     c.InnerText = GetComputerName() 

     function GetComputerName() 
      ' do your computername lookup here 
      GetComputerName = "Geoff" 
     end function 

    </script> 
    </body> 
</html>

这里我添加了一个ID，<div/>您定位的目标，并使用它在设置其属性InnerText之前获取该元素的引用。

来源

2011-11-10 08:49:40

回答

相关问题