账号通
    

注册

找回密码

账号  

密码  

话题
互动
会员
服务
<<返回列表上一个主题 下一个主题 打印本帖 复制本帖地址

3191

查看

7

回复
主题：再次编辑SQL标签报错了 [收藏主题] 转到：  
aliangok 当前离线

199

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1743 分
登录次数:188 次
注册时间:2009/2/5
最后登录:2012/12/5
aliangok 发表于：2009/5/3 11:58:00   | 显示全部帖子 查看该作者主题 楼主 
做在线知识付费 选科汛云开店
做考试题库 就用#科汛在线考试系统!
以下是引用keyi在2009-3-11 0:18:00的发言：

改下ks_cls/kesion.label.commoncls.asp,绝对有用


 


找到


'分页样式
 Public Function ReturnPageStyle(PageStyle)
  ReturnPageStyle = "         分页样式"
  ReturnPageStyle = ReturnPageStyle & "         <select name=""PageStyle"" style=""width:70%;"" class=""textbox"">"
  ReturnPageStyle = ReturnPageStyle & "          <option value=1"
  If PageStyle=1 Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">①首页 上一页 下一页 尾页</option>"
  ReturnPageStyle = ReturnPageStyle & "          <option value=2"
  If PageStyle=2 Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">②共N页/N篇 [1] [2] [3]</option>"
  ReturnPageStyle = ReturnPageStyle & "          <option value=3"
  If PageStyle=3 Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">③<< <  > >></option>"
  ReturnPageStyle = ReturnPageStyle & "         </select>"
 End Function


 


改成


 


'分页样式
 Public Function ReturnPageStyle(PageStyle)
  ReturnPageStyle = "         分页样式"
  ReturnPageStyle = ReturnPageStyle & "         <select name=""PageStyle"" style=""width:70%;"" class=""textbox"">"
  ReturnPageStyle = ReturnPageStyle & "          <option value=1"
  If PageStyle="1" Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">①首页 上一页 下一页 尾页</option>"
  ReturnPageStyle = ReturnPageStyle & "          <option value=2"
  If PageStyle="2" Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">②共N页/N篇 [1] [2] [3]</option>"
  ReturnPageStyle = ReturnPageStyle & "          <option value=3"
  If PageStyle="3" Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">③<< <  > >></option>"
  ReturnPageStyle = ReturnPageStyle & "         </select>"
 End Function


 


 


发现这个方法很好用,到现在还没发现问题,谢谢啊
 
一分钟快速开通线上知识店铺
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
aliangok 当前离线

199

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1743 分
登录次数:188 次
注册时间:2009/2/5
最后登录:2012/12/5
aliangok 发表于：2009/3/11 1:30:00   | 显示全部帖子 查看该作者主题 沙发 
科汛智能建站系统
做考试题库 就用#科汛在线考试系统!
以下是引用keyi在2009-3-11 0:18:00的发言：

改下ks_cls/kesion.label.commoncls.asp,绝对有用


 


找到


'分页样式
 Public Function ReturnPageStyle(PageStyle)
  ReturnPageStyle = "         分页样式"
  ReturnPageStyle = ReturnPageStyle & "         <select name=""PageStyle"" style=""width:70%;"" class=""textbox"">"
  ReturnPageStyle = ReturnPageStyle & "          <option value=1"
  If PageStyle=1 Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">①首页 上一页 下一页 尾页</option>"
  ReturnPageStyle = ReturnPageStyle & "          <option value=2"
  If PageStyle=2 Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">②共N页/N篇 [1] [2] [3]</option>"
  ReturnPageStyle = ReturnPageStyle & "          <option value=3"
  If PageStyle=3 Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">③<< <  > >></option>"
  ReturnPageStyle = ReturnPageStyle & "         </select>"
 End Function


 


改成


 


'分页样式
 Public Function ReturnPageStyle(PageStyle)
  ReturnPageStyle = "         分页样式"
  ReturnPageStyle = ReturnPageStyle & "         <select name=""PageStyle"" style=""width:70%;"" class=""textbox"">"
  ReturnPageStyle = ReturnPageStyle & "          <option value=1"
  If PageStyle="1" Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">①首页 上一页 下一页 尾页</option>"
  ReturnPageStyle = ReturnPageStyle & "          <option value=2"
  If PageStyle="2" Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">②共N页/N篇 [1] [2] [3]</option>"
  ReturnPageStyle = ReturnPageStyle & "          <option value=3"
  If PageStyle="3" Then ReturnPageStyle = ReturnPageStyle & " Selected"
  ReturnPageStyle = ReturnPageStyle & ">③<< <  > >></option>"
  ReturnPageStyle = ReturnPageStyle & "         </select>"
 End Function


 


按照你的方法在赋值上加了“""”可以编辑了，但是这是为什么阿，会不会又在其他地方出问题呢。。。。
 
一分钟快速开通线上知识店铺
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
aliangok 当前离线

199

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1743 分
登录次数:188 次
注册时间:2009/2/5
最后登录:2012/12/5
aliangok 发表于：2009/3/10 22:25:00   | 显示全部帖子 查看该作者主题 藤椅 
科汛在线网校系统
一分钟快速开通线上知识店铺
5.51版本的
 
科汛商学院助您快速入门
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
aliangok 当前离线

199

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1743 分
登录次数:188 次
注册时间:2009/2/5
最后登录:2012/12/5
aliangok 发表于：2009/3/10 22:24:00   | 显示全部帖子 查看该作者主题 板凳 
科汛在线网校系统
有生源 找课程 就上科汛课堂街!
......
 
做考试题库 就用#科汛在线考试系统!
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
aliangok 当前离线

199

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1743 分
登录次数:188 次
注册时间:2009/2/5
最后登录:2012/12/5
aliangok 发表于：2009/3/10 22:21:00   | 显示全部帖子 查看该作者主题 报纸 
做官网 就用科汛智能建站系统!

我也是:

无法显示网页

试图访问的网页出现问题，无法显示。

请尝试执行下列操作：

  • 单击刷新按钮，或稍后重试。
  • 打开 localhost 主页，然后查找与所需信息相关的链接。

HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务

技术信息（用于支持人员）

  • 错误类型：
    Microsoft VBScript 运行时错误 (0x800A000D)
    类型不匹配: 'PageStyle'
    \ADMIN\INCLUDE\../../KS_Cls/Kesion.CommonCls.asp, 第 1896 行

  • 浏览器类型：
    Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; TencentTraveler 4.0; .NET CLR 2.0.50727; CIBA)

  • 网页：
    GET /admin/Include/LabelFunctionAdd.asp

 
一分钟快速开通线上知识店铺
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
＜上一主题 | 下一主题 ＞
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.14063秒 powered by KesionCMS 9.0