锘?!--#include file="../lib/base.asp"-->
<%
''' SDCMS Rss
''' ==================================================================
''' 鐗堟潈鎵鏈?http://www.sdcms.cn
''' ------------------------------------------------------------------
''' 榪欎笉鏄竴涓嚜鐢辮蔣浠訛紒鎮ㄥ彧鑳藉湪涓嶇敤浜庡晢涓氱洰鐨勭殑鍓嶆彁涓嬪紼嬪簭浠g爜榪涜淇敼鍜屼嬌鐢紱
''' 鏈粡鎺堟潈涓嶅厑璁稿紼嬪簭浠g爜浠ヤ換浣曞艦寮忎換浣曠洰鐨勭殑鍐嶅彂甯冦?
''' ==================================================================
''' 緙栧啓: IT騫蟲皯
''' 淇敼錛欼T騫蟲皯 in 2014.07
dim id:id=sdcms.getint(sdcms.fget("id",0),0)
if id=0 then
sdcms.show theme_rss,""
else
dim rss_01,rss_02,rss_03
rss_01=""&vbcrlf
rss_01=rss_01&""&vbcrlf
rss_01=rss_01&""&vbcrlf
rss_01=rss_01&"亚洲精品偷拍自拍,av免费影院,久久精品天堂"&vbcrlf
rss_01=rss_01&"{classurl}"&vbcrlf
rss_01=rss_01&""&vbcrlf
rss_01=rss_01&"zh-cn"&vbcrlf
rss_01=rss_01&"Rss Generator By "&sdcms_version&""&vbcrlf
rss_02="- "&vbcrlf
rss_02=rss_02&" {title}"&vbcrlf
rss_02=rss_02&" {link}"&vbcrlf
rss_02=rss_02&" "&vbcrlf
rss_02=rss_02&" "&vbcrlf
rss_02=rss_02&" "&vbcrlf
rss_02=rss_02&"
"&vbcrlf
rss_03=""&vbcrlf
rss_03=rss_03&""
dim t1:t1=sdcms.getclassdb(id)
if not isarray(t1) then
else
dim classname:classname=t1(1)
dim classurl:classurl=sdcms.get_cateurl(id,t1(2),t1(10),t1(9))
dim classdesc:classdesc=t1(18)
dim sonid:sonid=t1(5)
dim str
rss_01=replace(rss_01,"{classname}",classname)
rss_01=replace(rss_01,"{classurl}",weburl&classurl)
if sdcms.strlen(classdesc)>0 then
rss_01=replace(rss_01,"{classdesc}",classdesc)
else
rss_01=replace(rss_01,"{classdesc}","")
end if
str=rss_01
dim data,content
data=sdcms.db.dbload(20,"id,isurl,url,catedir,title,createdate,catename,intro,classid","sd_content left join sd_category on sd_content.classid=sd_category.cateid","sd_content.islock=1 and classid in("&sonid&")","ontop desc,id desc")
if ubound(data)>=0 then
dim i,s
for i=0 to ubound(data,2)
s=rss_02
s=replace(s,"{title}",data(4,i))
if data(1,i)=0 then
s=replace(s,"{link}",weburl&sdcms.geturl(data(0,i),data(8,i),data(1,i),data(2,i)))
else
s=replace(s,"{link}",data(2,i))
end if
s=replace(s,"{date}",data(5,i))
s=replace(s,"{catename}",data(6,i))
content=data(7,i)
if sdcms.strlen(content)>0 then
content=sdcms.dehtml(content)
s=replace(s,"{desc}",content)
else
s=replace(s,"{desc}","")
end if
str=str&s
next
end if
str=str&rss_03
sdcms.echo str
end if
end if
%>
主站蜘蛛池模板:
农村黄性色生活片
|
亚洲欧美乱日韩乱国产
|
无码高潮喷水在线观看
|
久久WWW成人看片免费不卡
|
ww3344国产精品四虎
|
精品国内自产拍在线播放观看
|
国产精品午夜福利片不卡
|
欧美一区免费在线观看
|
中国一及毛片
|
小视频免费在线观看
|
婷婷四虎东京热无码群交双飞视频
|
日产精品自产拍高潮在线观看
|
欧美人与动人物XXXX9296
|
久草首页在线
|
国产亚洲精AA在线观看SEE
|
成人做爰视频WWW网站
|
欧美一级片久久
|
亚洲精品a在线观看
|
欧美精品入口
|
色偷偷久久一区二区三区
|
亚洲AV无码乱码麻豆精品国产
|
高清偷自拍第1页
|
久久911|
小明看欧美日韩免费视频
|
在线观看美女av
|
风间由美一区二区播放合集
|
亚洲AV伊人久久综合密臀性色
|
一级片免费在线看
|
av在观线观看男人的天堂
|
A片无码午夜久久久涩涩
|
欧美性生活视频网站
|
日韩av无码精品色午夜
|
a级黄色毛片免费观看
|
天天操天天谢
|
国产福利精品一区
|
中文av字幕一区
|
97午夜理论片影院在线播放
|
热久精品|
爱啪导航一精品导航站
|
精品一区二区三区久久
|
精品日产卡一卡二卡麻豆
|