账号通
    

账号  

密码  

4086

查看

3

回复
主题:[原创]★★★手把手教你去掉科汛的版权!!★★ [收藏主题] 转到:  
573579912 当前离线

8

主题

0

广播

0

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

用户积分:292 分
登录次数:20 次
注册时间:2006/9/1
最后登录:2007/1/11
573579912 发表于:2006/9/3 21:22:00   | 显示全部帖子 查看该作者主题 楼主 
科汛在线商城系统(NET)

我首先审明一下,

我发这个贴子别无它意,

请科汛网站系统的开发组注意一下,

首先我表扬一下科汛 感谢科汛 你们的CMS是我见过中的,最棒的一个,但是你们的这个系统中有一个最大的缺点,,且是致命的,

那就是你们的系统在生成页面时在每个页面的第一行代码中加入了你们的版权,这个我也明白,你们的用意,可是你们有没有想过,这样带来的后果是,搜索引擎不收录这个的网页,或着收的很少很少,,这样下来,这个网站就已经失去了从在的意义

我在这里希望你们在后面的版本中请去掉这个代码,或着把你们的版权加在每个页面的最后一行,这样就不影响了,或着在每个新闻的显视页面中不要加,就加在频道页面中就行了,

下面我把开始教大家如何去掉这个,或着改成你自己的,

首先打开文件,KS_RefreshCls.asp

路径是:SysCls/KS_RefreshCls.asp   并找到第2061行

  Function Published()
   On Error Resume Next
   If Application("SysVer") = 0 Then 
    Published = "<!-- published at " & Now() & " by Kesion CMS  V2.2 Powered By Kesion.Com  -->" & vbCrLf
   Else
    Dim PublishInfo
     PublishInfo = KSCMS.GetConfig("PublishInfo")
    If PublishInfo <> "0" Then
     Published = "<!-- published at " & Now() & " " & PublishInfo & " -->" & vbCrLf
    Else
     Published = ""
    End If
   End If
  End Function

(下面的图片)


此主题相关图片如下:

并改成

  Function Published()
   On Error Resume Next
   If Application("SysVer") = 0 Then 
    Published = "<!-- published at " & Now() & " by Kesion CMS  V2.2 Powered By Kesion.Com  -->" & vbCrLf
   Else
    Dim PublishInfo
     PublishInfo = KSCMS.GetConfig("PublishInfo")
     Published = ""
   End If
  End Function

 (这样就OK了以后的面页中就不会在这版权了,这样你的网站就能被搜索引擎收录了,并且是很多,很多)


此主题相关图片如下:

最后,我再次希望科汛在以后的版本中,请将你们的版权加入到最后一行,或着只加在频道中就行了,感谢 我是简直汛的FANS  呵呵,千万不要骂我呀,我是好心的,

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.07813秒 powered by KesionCMS 9.0