新闻栏目的首页调用显示“栏目+标题”实际上只是把这一句插入即可(效果见本站):
<a href=news_list.asp?c_id="&rs("c_id")&" alt='栏目名: "&joekoe_cms.code_html(rs
把index2.asp的第三行设为:
dim id,topic,voteid
就可以了。
在forum_view.asp中找到
call forum_first()
call web_head(0,0,h_var3,0,0)
call forum_load(1,0,1,1)
response.write joekoe_cms.js_put("style/data_ads_txt_forum.js",0)
response.write joekoe_cms.js_put("style/ads_txt_function.js",0)
替换为
ftit="浏览主题 - "&joekoe_cms.code_html(fir_topic,1,20)&""
call forum_first()
call web_head(0,0,h_var3,0,0)
call forum_load(1,0,1,1)
response.write joekoe_cms.js_put("style/data_ads_txt_forum.js",0)
response.write joekoe_cms.js_put("style/ads_txt_function.js",0)
cname="新闻浏览"
sname=""
if cint(cid)>0 then
if cint(sid)>0 then
sql="select top 1 jk_class.c_name,jk_sort.s_name from jk_sort inner join jk_class on jk_sort.c_id=jk_class.c_id where jk_sort.c_id="&cid&" and jk_sort.s_id="&sid
else
sql="select top 1 c_name from jk_class where c_id="&cid
end if
set rs=joekoe_cms.exec(sql,1)
if not rs.eof then
cname=rs("c_name")
tit=tit&" - "&cname
if sid>0 then
sname=rs("s_name")
tit=tit&" - "&sname&":"&topic
end if
tit=tit&""
end if
rs.close
end if
tit="软件浏览"
......
if not rs.eof then
cname=rs("c_name")
tit=tit&" - "&cname
if sid>0 then
sname=rs("s_name")
tit=tit&" - "&sname&":"&d_name
end if
tit=tit&""
end if
rs.close
end if
评论: 8 | 引用: 0 | 查看次数: 484