Html 访问和使用网页上的select元素

我在使用vbscript在网站上使用select元素时遇到问题。整个select元素用于在一个框中生成用户列表，用户单击并选择一个或多个用户，然后按下ADD按钮，以便将这些用户转移到第二个框中。本质上，其中一个是“可用用户”列表，第二个是“正在使用的用户”

这是选择元素列表的结构

<option value="009">
    John Doe
</option>
<option value="278"> … </option>
<option value="556"> … </option>

无名氏
… 
… 

我知道我可以通过

objDivContent.document.GetElementById（“可用的_成员”）.value=009来选择元素，但这里的问题是我不知道这些元素的值。这些值或多或少是静态的，但我无法访问它们-我可以有一个名称列表，即标记之间的内容

我需要我的脚本做的是，向它提供一个名称列表并加载页面，让它选择这些用户，然后为每个用户按“添加”按钮。或者一次完成，因为这是一个多项选择

知道我如何访问这些包含我所做数据的元素吗？
将您的用户列表加载到中，例如：

Set namelist = CreateObject("Scripting.Dictionary")
namelist.CompareMode = vbTextCompare  'case-insensitive

For Each name In WScript.Arguments.Unnamed
  namelist(name) = True
Next

Set memberlist = objDivContent.document.getElementById("available_members")
Set addButton  = objDivContent.document.getElementById("add_button")

For Each opt In memberlist.options
  If namelist.Exists(opt.text) Then
    opt.Selected = True
    addButton.Click()
    opt.Selected = False
  End If
Next

这样，您就可以从下拉列表中添加与条目匹配的名称，如下所示：

Set namelist = CreateObject("Scripting.Dictionary")
namelist.CompareMode = vbTextCompare  'case-insensitive

For Each name In WScript.Arguments.Unnamed
  namelist(name) = True
Next

Set memberlist = objDivContent.document.getElementById("available_members")
Set addButton  = objDivContent.document.getElementById("add_button")

For Each opt In memberlist.options
  If namelist.Exists(opt.text) Then
    opt.Selected = True
    addButton.Click()
    opt.Selected = False
  End If
Next

谢谢！我现在真的不知道如何使用dictionary对象（我将从excel中的列中提取数据，逐列循环过程），并且我没有为WScript.Arguments.Unnamed namelist（name）=True Next中的每个名称获取此位
，但我已经设法克服了这一问题，方法是为每个opt-In objMemberlist.options为每个x-In-Range.Cells设置
，如果InStr（x.value，opt.text）那么