HTA VBScript循环复选框

Question

我有一个问题，我做了一个循环来创建html中的复选框。我试着给复选框的ID，名称为“我”但是当我按下按钮，然后它说：“对象（一）需要”

For i = 0 To UBound(arrDrives) 

strHTML = strHTML & "<input type='checkbox' name='"& i &"' id='"& i &"'>" 

Next 

Sub Start_Button() 
For i = 0 To UBound(arrDrives) 
If i.checked Then DataA.InnerHTML = "Det dur" 
Next 
End Sub 

Answer 1

你需要得到复选框使用GetElementById他们的ID第一画（Javascript函数在链接中描述，但它与VBScript兼容）

For i = 0 To UBound(arrDrives) 
    strHTML = strHTML & "<input type='checkbox' name='"& i &"' id='"& i &"'>" 
Next 

' ...  

Sub Start_Button() 
    For i = 0 To UBound(arrDrives) 
     If document.GetElementById(i).checked Then 
      DataA.InnerHTML = "Det dur" 
     End If 
    Next 
End Sub