ASP数组赋值出错

a=Array(1,2,3,4,5,6,8,9,7,5,5,5,2,4,5,2,5,8,2,5,)
for i=0 to ubound(a)
response.write a(i)&"
"
next

这样的话会出错
那我想实现类似的赋值方法，该怎么修改呢？
谢谢

---

语法错误
Array(以迟卜猛旁逗点分隔的码知穗数组元素)

a=Array(1,2,3,4,5,6,8,9,7,5,5,5,2,4,5,2,5,8,2,5,) 最后多了个,

---