Question

我有一个功能强大的HTA使用单选按钮，我可以使用.checked查找单击的按钮。我正在重新编写我的HTA以使用普通按钮，但我无法提出一个有效的命令。

这是我的单选按钮逻辑，工作正常：

For Each objButton in document.Uber.RadioOption
  If objButton.Checked Then
    strFilexl = fpath & cname & "_" & "PC_" & objButton.Value & ".xlsx"
  end if
Next

这是我希望使用的，但是我无法在代码中找到一个等效的命令来进行按钮检查：

set ColButton = document.GetElementsByTagName("input")
For Each strButton In colButton
  if strButton.xxxxxx then
      strFilexl = fpath & cname & "_" & "PC_" & strButton.Value & ".xlsx"   
  End If
  strButton.Disabled = True
Next

Answer 1

常规按钮没有状态，因此您需要一个额外的元素来存储状态。隐藏的输入元素通常用于此类事物。

<html>
<head>
<title>Test</title>
<HTA:APPLICATION
     ID="objTest"
     APPLICATIONNAME="Test"
>
</head>

<script language="VBScript">
Sub ToggleFoo
  FooClicked.Value = Not FooClicked.Value
End Sub
</script>

<body>
<p>
<input type="hidden" id="FooClicked" value="0">
<input type="submit" value="Foo" OnClick="ToggleFoo">
</p>
</body>
</html>

使用单击按钮而不是单选按钮时，是否存在等效的.checked

1 个答案: