2016-03-02 69 views
0

我正在尝试编写一个脚本来选择网页上的值。当元素有一个值时,使用getElementByID(“”)。值。但是页面上还有另一部分我想选择多个。自动选择多个值

的HTML是

<select id = "locationID" multiple="multiple" value="3660"> 

当我手动选择多个值,在所述值标签中的信息不发生改变。我如何在vbs中编写多个值的选择?这是我尝试创建的自动化过程的要点,我想通过select来筛选此列表中的很多值。

回答

0

给一个尝试这种Multi_Select_ListBox.hta

<HTML> 
    <HEAD> 
    <TITLE>Multi-Select</TITLE> 
     <HTA:APPLICATION 
     Application ID = "Multi-Select" 
     APPLICATIONNAME = "Multi-Select" 
     SYSMENU = "yes" 
     WINDOWSTATE = "Normal" 
     /> 
    </HEAD> 
    <SCRIPT LANGUAGE="VBScript"> 
    '<!--#######################[ Multi-Select Listbox Menu ]#######################--> 
     Sub RunMultiList 
     Dim i,strChoices 
      For i = 0 to (MultiListBox.Options.Length - 1) 
       If (MultiListBox.Options(i).Selected) Then 
        strChoices = strChoices & "Option " & MultiListBox.Options(i).Value & vbcrlf 
       End If 
      Next 
      Msgbox "You Selected:" & vbcrlf & strChoices, 64,"Multi-Select ListBox Menu" 
     End Sub 
    </script> 
<body> 
    <!--==--==--==--==--==--==--==-- Multi-Select ListBox --==--==--==--==--==--==--> 
    <CENTER> 
    <FONT SIZE=3><B><I>Use Ctrl to Select Multiple Options:</I></B></FONT><BR><BR> 
    <select size="8" name="MultiListBox" multiple> 
    <option value="1">MultiListBox Option 1</option> 
    <option value="2">MultiListBox Option 2</option> 
    <option value="3">MultiListBox Option 3</option> 
    <option value="4">MultiListBox Option 4</option> 
    <option value="5">MultiListBox Option 5</option> 
    <option value="6">MultiListBox Option 6</option> 
    <option value="7">MultiListBox Option 7</option> 
    <option value="8">MultiListBox Option 8</option> 
    <option value="9">MultiListBox Option 9</option> 
    <option value="10">MultiListBox Option 10</option> 
    </select> 
    <BR> 
    <BR> 
    <input type="button" onClick="RunMultiList" value="Submit"> 
    </CENTER> 
    </BODY> 
    </HTML> 
+0

谢谢大家的帮助,我能得到它的工作使用此代码。 –