锘?!--#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
%>
主站蜘蛛池模板:
日本亲子薍伦在线观看
|
免费毛片大全
|
加勒比东京热无码国产AV
|
久久久久久a
|
免费A级毛片无码鲁大师
|
日韩不卡一二三
|
毛片a片|
国产精品xxxx欧美综合
|
国产精品一二三区
|
精品国产一区二区AV麻豆不卡
|
亚洲综合网在线观看
|
国产亚洲日韩一区二区三区
|
福利社一区二区
|
欧美肥老太牲交视频
|
日本无码一区二区三区在线
|
91国偷自产一区二区三区老熟女
|
国产亚洲免费观看
|
狠狠色狠色综合曰曰
|
国产美女精品AⅤ在线播放
亚洲国产精品成人精品无码区
|
日韩欧美高清视频
|
神马视频在线观看
|
国产高清精品亚洲一区二区三区
|
97精品依人久久久大香线蕉97
|
国产极品粉嫩福利在线观看
|
91se在线看片国产免费观看
|
中文字幕在线免费视频
|
日韩新片王网
|
亚洲精品久久久久久久久久
|
18禁止午夜福利体验区
|
国久久久久久
|
中国xxxx真实自拍
|
亚洲精品久久国产高清情趣图文
|
视频色黄色毛片
|
别揉我奶头~嗯~啊~一区二区三区
|
91在线国产观看视频
|
内射女校花一区二区三区
|
天天操天天插
|
99久久精品国产免费看不卡
|
国产精品国产免费
|
放荡少妇深喉吞浓精
|
AV片亚洲国产男人的天堂
|