账号通
    

账号  

密码  

2905

查看

8

回复
主题:晕,现在又有很多问题了。 [收藏主题] 转到:  
monfs 当前离线

888

主题

2

广播

1

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

用户积分:4384 分
登录次数:556 次
注册时间:2006/4/8
最后登录:2023/2/25
monfs 发表于:2006/8/14 18:04:00   | 显示全部帖子 查看该作者主题 楼主 
做在线知识付费 选科汛云开店

。。。。。。你的问题还真多啊!

首先第一个  你自己在SysCls/目录下,打开KS_RefreshCls.asp,文件,自己找到

If InStr(FileContent, "{$GetArticleAction}") <> 0 Then
     TempStr = "【<A href=""" & CommonDir & "Comment.asp?ChannelID=1&Classid=" & RefreshRS("Tid") & "&InfoID=" & RefreshRS("NewsID") & """ target=""_blank"">发表评论</A>】【<A href=""" & CommonDir & "SendMail.asp?ArticleID=" & RefreshRS("NewsID") & """ target=""_blank"">告诉好友</A>】【<A href=""" & CommonDir & "Print.asp?ArticleID=" & RefreshRS("NewsID") & """ target=""_blank"">打印此文</A>】【<A href=""" & Domain & "Member/User_Favorite.asp?Action=Add&ChannelID=1&InfoID=" & RefreshRS("NewsID") & """ target=""_blank"">收藏此文</A>】【<A href=""javascript:window.close();"">关闭窗口</A>】"
     FileContent = Replace(FileContent, "{$GetArticleAction}", TempStr)
   End If

替换为

If InStr(FileContent, "{$GetArticleAction}") <> 0 Then
     TempStr = "【<A href=""" & CommonDir & "SendMail.asp?ArticleID=" & RefreshRS("NewsID") & """ target=""_blank"">告诉好友</A>】【<A href=""" & CommonDir & "Print.asp?ArticleID=" & RefreshRS("NewsID") & """ target=""_blank"">打印此文</A>】【<A href=""" & Domain & "Member/User_Favorite.asp?Action=Add&ChannelID=1&InfoID=" & RefreshRS("NewsID") & """ target=""_blank"">收藏此文</A>】【<A href=""javascript:window.close();"">关闭窗口</A>】"
     FileContent = Replace(FileContent, "{$GetArticleAction}", TempStr)
   End If

第二个其实比这个还简单,你只要修改模板Article.htm文件即可

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