将 VBScript 变量存储在 hta html 标记中答案

【问题标题】：Store VBScript variable in hta html tag将 VBScript 变量存储在 hta html 标记中
【发布时间】：2013-11-13 00:56:52
【问题描述】：

~~这更像是一个信息性帖子，而不是一个问题。但我会留下一个开放式问题；如果您可以改进这个想法，请分享。~~ ~EDIT

有没有更好的方法将变量存储在 HTA 中？我想出了这个方法并且它有效，但我不确定这是否是最好的方法；

前言：我是编码新手。

我一直在开发一个由 VBScript 支持的 GUI（封装在 HTA 中）。我正在寻找一种动态存储变量的方法，我可以轻松地独立调用其他子/函数。这就是我想出的；

伪代码：

Function StoreVar()
    If somecondition = "someexpectation" Then
      source.InnerHTML = "<a name='myVar' value='var1'></a>"
    Else 
      source.InnerHTML = "<a name='myVar' value='var2'></a>"
    End If
End Function

标记；

<div id="source"></div>
<input type="button" name="Show Variable" onclick="CallVar()" />

调用存储的变量；

Function CallVar()
   MsgBox myVar.value
End Function

相当直截了当，但使用了一些技巧，因为您永远看不到实际存储的变量，因为它要进入的 div 没有出现在 GUI 中。它可能对 GUI 产生的唯一影响是 div 在 html 中的实际位置。我通常将这些 div 放在我的 html 正文的末尾。

不管怎样，我才正式加入。自从我开始编码（时间不长）以来，我一直在使用这个网站，但我想我会开始贡献。

【问题讨论】：

里面有实际问题吗？
欢迎使用 Stackoverflow s3d83d。看起来您想讨论对命名 HTMLElements 的直接引用的使用。实际上 SO 不是一个讨论论坛。我们期望确切的问题可以有准确的答案，而不仅仅是谈论这个和那个，即使主题是关于编码的。请改写您的帖子，以便我们找到真正的问题并回答。
感谢您的回复，虽然我承认这里没有直接的问题，但我确实提出了一个相当“松散”的问题；我找到了我使用的这个选项，有更好的方法吗？我搜索了类似的东西，但实际上找不到任何关于我的“问题”的东西，所以我想我会发布它可能对其他人有用的情况，看看是否有人可能有更清洁的注射方式并调用这样的变量。根据您的评论，我已经编辑了我的开头并提出了一个更直接的“问题”。

标签： html variables dynamic vbscript hta

【解决方案1】：

使用 VB 脚本，您可以定义一个全局变量，然后您可以在代码中的任何位置调用它并更改它，即使在 Javascript 中，如果您将它添加到 hta 中也是如此。

<script language="VBScript" type="text/vbscript">
Dim MyValue

Sub storeValue(theValue)
    If theCondition Then
        MyValue = theValue
    Else
        MyValue = "Something Else"
    End If
End Sub

Sub retrieveValue
    MsgBox MyValue
End Sub 
</script>

<script language="javascript" type="text/javascript">
    function clearValue() {
        MyValue = ""
    }
</script>

编辑：我想编辑说，我实际上正在做你提到的在 HTA 中使用的一些变量，除了我将 InnerHTML 的值存储为“值”并且我的 div 设置为“显示：无。”

<div id=theDiv style="display:none"></div>
然后
theDiv.InnerHTML = MyValue或MyValue = theDiv.InnerHTML等

【讨论】：

我喜欢这种方法，并且绝对可以看到它的用例。谢谢！