错误提示已经说得很清楚了,下标越界了,说明你的m_setUserEditor数组元素少于14个.先判断一下就可以了.<%If UBound(m_setUserEditor)>=14 Then%><%If m_setUserEditor(14) = 0 Then Response.Write (" checked") : End If%>> 否
第二种简单点,直接修改代码,将d_time_arr = Split(d_time_text,"-")改成d_time_arr = Split(d_time_text,"/") 以上,成功解决了“Microsoft VBScript 运行时错误 '800a0009' 下标越界: '[number: 1]' ”的问题。
原因一：你程序写得不完整，只是简单情况下可以用，如果提交字符串非正常就会出错。需要修改程序，自己改。原因二：你“剩女保镖”这个文章里或它的下一篇文章里的内容肯定用到了一些特殊字符之类。 自己检查。
原因是Agent的最大下标是0，所以Agent(1)就下标越界了。造成这种情况的原因肯定是Agent在分割的时候分割符没有搞对（按常理应该是一个分号再加一个空格）。所以实际出错的代码肯定是在第9行之前。
tempstr是数组，如果tempstr的长度小于i，则出现“数组下标越界”的错误 如果tempstr(i)按“|”拆分的数组长度小于2，则也会出现“数组下标越界”的错误
)中的数据至少有二个/组成,这样才能通过SPLIT函数分解成至少有3个元素的数组.如果不能得到3个元素的数组,那么就会报错,下标越界.记住,下标是从0开始的.你现在改了后正常,说明原来只产生了两个元素,也就是filename_arrly(0)和filename_arrly(1).而原代码错误地引用了filename_arrly(2)了....
检查inc/Brower.asp文件的代码，是否存在超出定义数据越界的问题，比如定义的数组为10个，那么下标最小为0，最大为9，超出这个范围就会提示下标越界。
所以第9行出现了下标越界的错误，表示Agent这个阵列并没有Agent(1)这个元素，也就是只有Agent(0)这个元素，也就表示第五行读取到的Agent字符串要嘛是空字符串，要嘛是不包含";"的字符串。要避免错误，只需要在第9行的判断式前，加上一个判别式：if UBound(Agent) > 0 then if Instr(Agent(1),...
你代码读取了空数组，（if Ubound（数组名）=-1 则为空数组）。所谓空数组不能用 ：数组名（i）来调用。否则出现下标越界！！
id=Split(Request.QueryString,".")(0)中的Request.QueryString语法也错误，也就是没有值，无法分割！所以越界了