。。。。。。你的问题还真多啊!
首先第一个 你自己在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文件即可