|
|
|
|
【用户】
吴卫东 |
|
文章系统加强修改(增加预览,去掉"js"链接)
副标题：
作者：cnworm 文章来源：joekoe 点击数：243 更新时间：2004-11-22
一、增加内容预览功能（如下图）
权限不足时的提示：
需要乔币时的提示：
扣除乔币时的提示：
计时用户的提示：
乔币不足时的提示：
二、去掉了（javascript:;）链接这样有利于搜索引擎收录
三、修改方法如下：
article_view.asp文件中有三处修改
第一处：
找到：page_power=power
改成：page_power=""
第二处：
找到：call emoney_notes(power,emoney,n_sort,id,1,"article_list.asp?c_id="&cid&"&s_id="&sid)
改成：
'----修改开始----------------------------------------------------------
page_power=power
dim dim_tmp,word1,word2,alt_mouse,art_num
art_num=100 '预览字数
word2=""
word1=""
alt_mouse=""
if int(login_is_abate)>0 then
alt_mouse="href='article_view.asp?id="&id&"&action=emoney' onclick=""nojavascript...return click_return('您是未过期的计时用户将不扣除！',1);"""
elseif int(login_emoney)0 then
session("huzhu_art"&id)=true
else
session("huzhu_art"&id)=emoney_note(power,emoney,n_sort,id)
end if
end if
if page_power<>"" and instr("."&page_power&".","."&login_modep&".")<1 then
word1="文章内容预览"
word=left(word,art_num)&"…………"
word2="
本文浏览权限："
for i=0 to ubound(dim_user)
dim_tmp=split(dim_user(i),":")
if instr(page_power,i+1)>0 then word2=word2&dim_tmp(1)&" "
next
word2=word2&"
"
elseif int(emoney)>0 then
if session("huzhu_art"&id)=false then
word1="文章内容预览"
word=left(word,art_num)&"…………"
word2="
浏览本文需要支付（"&emoney&"）"&joekoe_cms.web_unit&""
word2=word2&"，您现有（"&login_emoney&"）"&joekoe_cms.web_unit&"〖浏览全文〗"
word2=word2&"
"
end if
end if
'----修改结束----------------------------------------------------------
第三处：
找到：response.write ""&word&""
改成：response.write ""&word1&word&word2&""
con_article.asp文件中修改一处
找到：format_article_topic_type="| "&b_jt&""&joekoe_cms.code_html(b_topic,1,n_c_num)&""&n_img&tim_type&" | "
改成： format_article_topic_type="| "&b_jt&""&joekoe_cms.code_html(b_topic,1,n_c_num)&""&n_img&tim_type&" | "
|
| |
|
|
|
|
|
|
会员区*发表文章
主题： 
：2005/1/15 23:47:01
返回列表