html - 过滤其他下拉列表的 HTA vbscript 下拉列表

标签 html windows vbscript hta

我对创建 HTA 还很陌生,如何创建一个下拉列表来过滤其他下拉列表的结果?我有一个包含站点名称和州的数据库,我想要的是在选择州后仅使用与所选州匹配的那些记录填充站点下拉列表。

最佳答案

这是一个非常简单的 HTA,它根据另一个下拉列表的选择填充一个下拉列表。应该很容易适应从您的数据库中读取。

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

<script language="VBScript">

    Sub Window_OnLoad
        Populatedropdown1
    End Sub

    Sub Populatedropdown1
            For i = 0 To 5
                Set opt = document.createElement("option")
                opt.Value = i
                opt.Text = "Option " & CStr(i)
                dropdown1.add opt
            Next    
    End Sub

    Sub Populatedropdown2
            For Each opt in dropdown2.Options
                opt.RemoveNode
            Next 
            For i = dropdown1.value To 10
                Set opt = document.createElement("option")
                opt.Value = i
                opt.Text = "Option " & CStr(i)
                dropdown2.add opt
            Next    
    End Sub
</script>

<body bgcolor="white">

    <p>Select 1: <select name="dropdown1" id="dropdown1" onchange="Populatedropdown2"></select></p>
    <p>Select 2: <select name="dropdown2" id="dropdown2" ></select></p>

</body></html>

这有帮助吗?

关于html - 过滤其他下拉列表的 HTA vbscript 下拉列表,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/6114733/

相关文章:

javascript - jQuery 选择器找不到我的 <select> 标签

windows - 使用 'IsBadCodePtr' 来区分给定的资源类型好吗?

c# - 创建 C# 应用程序以配置打印机页面设置

windows - java.io.IOException : Not in GZIP format Exception

python - 如何将 VBscript 转换为 Python 代码?

javascript - HTML/PHP 页面中的 VBScript

vbscript - 遍历注册表子文件夹

javascript - 使用 javascript 进行火复制

c# - 将名字中的第一个和第三个字母大写,例如 McArthur 或 McMinn

javascript - jqBootstrap 验证表单错误