"next" />
k=10
dim pic()'pic=array()redim pic(k)
for i=1 to kpic(i)=inext
for i=1 to kresponse.write pic(i)&" "next
"next