dim pt() as string
rs.open "select * from 职工信息",cn,1,1
response.Write rs.recordcount
n=cint(rs.recordcount)
redim pt(n)
response.Write pt.ubound
rs.close
怎么运行错误，把定义数组的语句去掉就能显示

什么错误信息
是不是重复定义

语法错误，应该是response.Write ubound(pt)