账号通
    

注册

找回密码

账号  

密码  

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

3294

查看

4

回复
主题：BUG修复帖---非官方 [收藏主题] 转到：  
刚刚 当前离线

1852

主题

5

广播

126

粉丝
添加关注
级别:版主

用户积分:7093 分
登录次数:225 次
注册时间:2010/7/6
最后登录:2024/4/15
刚刚 发表于：2013/5/31 14:20:58   | 只看该作者 查看该作者主题 楼主 
做在线知识付费 选科汛云开店
有生源 找课程 就上科汛课堂街!
注：

此帖为自己二次开发系统中遇到小BUG及相应修复办法，开设此帖是方便稍后再遇到同样问题能快速修复，同时也希望能帮到遇到相同问题的朋友。期待官方在稍后版本逐步修复相应Bug


本帖会持续更新


1、当模型投稿录入表单自定义时，会员中心模型信息管理处选中所有无效

修复方法：\user\User_ItemInfo.asp ShowDiyList()过程添加：

  1. Response.Write "<FORM Action=""?ChannelID=" & ChannelID & "&Action=Del"" name=""myform"" method=""post"">"


点击查看原图

Bug版本： V9.05GBK



2、会员中心操作页面退出时，出现了一个死循环：

BUG:

点击查看原图

修复：

系统未整合情况下

    1.     If trim(Request.ServerVariables("http_referer"))="" Then
    2.           Response.Redirect "/"
    3.     elseif instr(Lcase(Request.ServerVariables("HTTP_REFERER")),"index.asp")>0 then
    4. Response.Redirect("../")
    5.   else
    6.       Response.Redirect Request.ServerVariables("http_referer")
    7.   end if

改成

    1.     If trim(Request.ServerVariables("http_referer"))="" Then
    2.           Response.Redirect "/"
    3.     elseif instr(Lcase(Request.ServerVariables("HTTP_REFERER")),"index.asp")>0 then
    4. Response.Redirect("../")
    5.   elseif instr(Lcase(Request.ServerVariables("HTTP_REFERER")),"/user/")>0 then
    6. Response.Redirect("../")
    7.   else
    8.       Response.Redirect Request.ServerVariables("http_referer")
    9.   end if
Bug版本： V9.05GBK

3、当模型投稿录入表单自定义时，自定义字段默认值为now或date时无效


修复：

\ks_cls\UserFunction.asp GetDiyFieldValue函数改成如下：

  1. Function GetDiyFieldValue(FieldXML,FieldName)         Dim V,Xnode:Set Xnode=FieldXML.DocumentElement.selectsinglenode("fielditem[@fieldname='" & FieldName &"']")        If Not Xnode Is Nothing Then                V=Xnode.selectsinglenode("defaultvalue").text                If LCase(Trim(V))="now" Then                        V=now                ElseIf LCase(Trim(V))="date" Then                  V=date          ElseIf Instr(V,"|")<>0 Then                  If Not KS.IsNul(KS.C("UserName")) Then                                V=LFCls.GetSingleFieldValue("Select Top 1 " & Split(V,"|")(1) & " From " & Split(V,"|")(0) & " Where username='" & KSUser.UserName & "'")                         Else                                V=""                        End If          End if        End If        GetDiyFieldValue=VEnd Function

点击查看原图


Bug版本： V9.05GBK
 
专业网站漏洞检测与修复及服务器安全维护、专业程序修改与二次开发及标签制作。QQ：2813239495 详谈
做新职业技能培训平台 就选#科汛网校
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
suncohey 当前离线

477

主题

29

广播

10

粉丝
添加关注
级别:版主

用户积分:1721 分
登录次数:920 次
注册时间:2009/11/23
最后登录:2019/1/11
suncohey 发表于：2013/5/31 21:46:16   | 只看该作者 查看该作者主题 沙发 
科汛在线考试系统(NET)
有课程 找生源 就上科汛课堂街
谢谢分享！亲一亲
 
做新职业技能培训平台 就选#科汛网校
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
伊某某 当前离线

571

主题

0

广播

3

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

用户积分:2896 分
登录次数:425 次
注册时间:2008/8/1
最后登录:2023/10/24
伊某某 发表于：2013/6/1 8:08:51   | 只看该作者 查看该作者主题 藤椅 
科汛在线网校系统
做考试题库 就用#科汛在线考试系统!
谢谢分享！
 
做新职业技能培训平台 就选#科汛网校
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
yelom 当前离线

609

主题

9

广播

3

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

用户积分:1126 分
登录次数:354 次
注册时间:2007/6/15
最后登录:2021/8/30
yelom 发表于：2013/6/3 23:10:26   | 只看该作者 查看该作者主题 板凳 
科汛智能建站系统
做官网 就用科汛智能建站系统!

请官方酌情采纳为盼！
 
做官网 就用科汛智能建站系统!
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
科讯冷雪 当前离线

11

主题

1

广播

0

粉丝
添加关注
级别:学前班

用户积分:44 分
登录次数:34 次
注册时间:2016/4/1
最后登录:2023/10/14
科讯冷雪 发表于：2019/8/22 9:07:42   | 只看该作者 查看该作者主题 报纸 
科汛在线考试系统(NET)
做线上考试培训 就选#科汛网校
您好，我想请问一下，我的是系统自带的字段只要生成自定义表达就不显示文本框了，文章类型里面的文章内容的框，不生成表单就可以显示，一生成就不显示了，我用的是2.0eshop的，能帮忙看看这个是为什么吗
 
有课程 找生源 就上科汛课堂街
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
＜上一主题 | 下一主题 ＞
<< 返回列表
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.13477秒 powered by KesionCMS 9.0