我想获取在VBA中运行的HTA的document.elements值_Vba

我想获取在VBA中运行的HTA的document.elements值

vba

我想获取在VBA中运行的HTA的document.elements值,vba,Vba,测试源 <head> <title>HTA Test</title> <HTA:APPLICATION `enter code here` APPLICATIONNAME="HTA Test" SCROLL="yes" SINGLEINSTANCE="yes" WINDOWSTATE="maximize"> </head> <script language="VBScript">

测试源

<head>
<title>HTA Test</title>
<HTA:APPLICATION `enter code here`
     APPLICATIONNAME="HTA Test"
     SCROLL="yes"
     SINGLEINSTANCE="yes"
     WINDOWSTATE="maximize">
</head>

<script language="VBScript">
    Sub TestSub
        Msgbox "Testing 1-2-3."
    End Sub
</script>

<body>
<input type="button" value="Run Script" name="run_button" onClick="TestSub"> 
</body>


HTA试验
子测试子
Msgbox“测试1-2-3”
端接头

比如说

在运行的html应用程序中（标题：HTA测试）

（

name=“run\u按钮”

）的值使用VBA获取（

document.getelementsby

）

我想问一下这是否可行。

HTA文件中的命名元素可以通过它们的名称来引用

运行按钮

当超过1个元素共享同一名称时，该名称将返回元素集合

运行按钮（1）。值

当我编写HTA或VBS文件时，我分别使用HTAEdit和Vbsedit。你可以在这里买到

您可以将HTA作为文本文件打开并搜索它

<input type="button" value="Run Script" name="run_buttons" onClick="TestSub">

<head>
<title>HTA Test</title>
<HTA:APPLICATION `enter code here`
     APPLICATIONNAME="HTA Test"
     SCROLL="yes"
     SINGLEINSTANCE="yes"
     WINDOWSTATE="maximize">
</head>

<script language="VBScript">
    Sub TestSub
        Msgbox run_button.value
    End Sub
</script>

<body>
<input type="button" value="Run Script" name="run_button" onClick="TestSub"> 
</body>

<head>
<title>HTA Test</title>
<HTA:APPLICATION `enter code here`
     APPLICATIONNAME="HTA Test"
     SCROLL="yes"
     SINGLEINSTANCE="yes"
     WINDOWSTATE="maximize">
</head>

<script language="VBScript">
    Sub TestSub(ele)
        Msgbox ele.value
    End Sub
</script>

<body>
<input type="button" value="Run Script" name="run_buttons" onClick="TestSub(Me)"> 

</body>