救急,对象不存在

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim a As Integer
        For a = 1 To 100
            Response.Write("<script language=javascript>document.all.label1.innerHTML='2';</script>")
        Next
    End Sub我想循环的时候,显示循环的数字.
document.all.label1.innerHTML='2' 这个语句在JS下应用正常,可为啥上面语句就提示对象不存在.