1966 查看 3 回复

主题：[已解决]错误 800a0009 请高手指教。 [收藏主题]

转到：

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:pandastudy 性别:男 积分:120分 威望:282 帖子:50 精华:0 广播:0 粉丝:0 登录次数:27 次 注册时间:2010/1/4 21:44:00 最后登录:2011/2/24 13:52:17 pandastudy 当前离线 50 主题 0 广播 0 粉丝 级别:学前班 用户积分:120 分 登录次数:27 次 注册时间:2010/1/4 最后登录:2011/2/24	pandastudy 发表于：2010/12/31 15:52:49   | 只看该作者 查看该作者主题 楼主  做官网 就用科汛智能建站系统! Microsoft VBScript 运行时错误 错误 '800a0009' 下标越界: '[number: 1]' D:\WEB20090405135\NINGJING\WEB\USER\../KS_Cls/Kesion.CommonCls.asp，行 3766 以上是错误提示。代码如下 复制代码         '分页SQL语句生成代码         Function GetPageSQL(tblName,fldName,PageSize,PageIndex,OrderType,strWhere,fieldIds)                         Dim strTemp,strSQL,strOrder                                                  '根据排序方式生成相关代码                         if OrderType=0 then                                 strTemp=">(select max([" & fldName & "])"                                 strOrder=" order by [" & fldName & "] asc"                         else                                 strTemp="<(select min([" & fldName & "])"                                 strOrder=" order by [" & fldName & "] desc"                         end if                                                  '若是第1页则无须复杂的语句                         if PageIndex=1 then【这个是第3766行】                                 strTemp=""                                 if strWhere<>"" then strTemp = " where " + strWhere                                 strSQL = "select top " & PageSize & " " & fieldIds & " from [" & tblName & "]" & strTemp & strOrder                         else '若不是第1页，构造SQL语句                                 strSQL="select top " & PageSize & " " & fieldIds & " from [" & tblName & "] where [" & fldName & "]" & strTemp & _                                 " from (select top " & (PageIndex-1)*PageSize & " [" & fldName & "] from [" & tblName & "]"                                 if strWhere<>"" then                                 strSQL=strSQL & " where " & strWhere                                 end if                                 strSQL=strSQL & strOrder & ") as tblTemp)"                                 if strWhere<>"" then                                 strSQL=strSQL & " And " & strWhere                                 end if                                 strSQL=strSQL & strOrder                         end if                         GetPageSQL=strSQL                 End Function   '====================================================================================== End Class %>
	做新职业技能培训平台 就选#科汛网校
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:任我行 性别:女 积分:46050分 威望:38784 帖子:6496 精华:61 广播:191 粉丝:251 登录次数:4182 次 注册时间:2006/4/26 20:16:00 最后登录:2024/11/21 15:07:49 任我行 当前离线 6496 主题 191 广播 251 粉丝 级别:管理员 用户积分:46050 分 登录次数:4182 次 注册时间:2006/4/26 最后登录:2024/11/21	任我行 发表于：2010/12/31 16:39:01   | 只看该作者 查看该作者主题 沙发  做考试题库 就用#科汛在线考试系统! 后台基本信息设置的过滤选项里，有没有成对出现
	为了您的正当权益，请您通过正规渠道购买正版软件，严厉打击盗版软件! 售前咨询客服QQ:9537636 4000080263科汛官方站:www.kesion.com 一分钟快速开通线上知识店铺
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:pandastudy 性别:男 积分:120分 威望:282 帖子:50 精华:0 广播:0 粉丝:0 登录次数:27 次 注册时间:2010/1/4 21:44:00 最后登录:2011/2/24 13:52:17 pandastudy 当前离线 50 主题 0 广播 0 粉丝 级别:学前班 用户积分:120 分 登录次数:27 次 注册时间:2010/1/4 最后登录:2011/2/24	pandastudy 发表于：2011/1/3 10:45:35   | 只看该作者 查看该作者主题 藤椅  做考试题库 就用#科汛在线考试系统! 恕我愚钝，这个问题”后台基本信息设置的过滤选项里，有没有成对出现“能说想具体的位置吗?我没有找到。我是在后台——设置——基本信息设置——？（找不到过滤选项）
	有课程 找生源 就上科汛课堂街
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:pandastudy 性别:男 积分:120分 威望:282 帖子:50 精华:0 广播:0 粉丝:0 登录次数:27 次 注册时间:2010/1/4 21:44:00 最后登录:2011/2/24 13:52:17 pandastudy 当前离线 50 主题 0 广播 0 粉丝 级别:学前班 用户积分:120 分 登录次数:27 次 注册时间:2010/1/4 最后登录:2011/2/24	pandastudy 发表于：2011/1/3 11:20:10   | 只看该作者 查看该作者主题 板凳  有生源 找课程 就上科汛课堂街! 问题解决了。是因为屏蔽的词语中包含发布的信息。谢谢管理员支持。
	做新职业技能培训平台 就选#科汛网校
	支持(0) | 反对(0) 顶端 底部

＜上一主题 | 下一主题 ＞

<< 返回列表 首 页 1