Fatal编程技术网
  • vbscript/
  • Vbscript 当使用单击按钮而不是单选按钮时，是否有对应的.checked

Vbscript 当使用单击按钮而不是单选按钮时，是否有对应的.checked

vbscript

Vbscript 当使用单击按钮而不是单选按钮时，是否有对应的.checked,vbscript,hta,Vbscript,Hta,我有一个功能正常的HTA，它使用单选按钮，并且我能够使用。选中以查找单击的按钮。我正在尝试重新编写我的HTA以使用普通按钮，但我无法想出一个等效的命令来工作 这是我的单选按钮逻辑，工作正常： For Each objButton in document.Uber.RadioOption If objButton.Checked Then strFilexl = fpath & cname & "_" & "PC_" & objButton.Value

我有一个功能正常的HTA，它使用单选按钮，并且我能够使用
。选中
以查找单击的按钮。我正在尝试重新编写我的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



常规按钮没有状态，因此需要额外的元素来存储状态。这种类型的东西通常使用隐藏的输入元素


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




测验
子开关
FooClicked.Value=未FooClicked.Value
端接头