廊坊香河品牌论网络公司主要业务有香河网站建设、三河网站制作、大厂网页设计、网络推广!!

伪静态科汛CMS网站源代码教程的

2018-09-15

这里是tags.asp源代码:
%;选项显式% gt gt;
<;-- #包括文件= ";.. \ \/ conn.asp ";,& gt;
<;-- #包括文件= ";.. \ \/ \ \/ ks_cls科汛。commoncls。ASP ";,& gt;
<;-- #包括文件= ";.. \ \/ \ \/ ks_cls科汛。标签。commoncls。ASP ";,& gt;
LT;%
昏暗的空中
设置空中=新标签
TCls . Kesion()
设置空中=没有
Const MaxPerPage = 20和#每页的行数的39;
const maxtags = 500和# 39;默认显示的标签数量
类标签
私人的,KS,KMR,f_c,loopcontent SearchResult,photourl,
私人的,channelid,classid,searchtype,tagsname,SearchForm
私人的,我,totalput,currentpage,RS

私人的,子,class_initialize()
设置新的publiccls KS =
集KMR =新的刷新
如果KS。S(";页面";)<;>;";";然后
currentpage = Cint(请求(";页面";))
其他的
currentpage = 1
最后如果
端子
私人的,子,class_terminate()
closeconn
设置=无
集KMR =没有
端子

子,科汛()
昏暗,RS,TagsNameA,K
f_c = kmr.loadtemplate(ks.setting(3)&;KS。设置(90)&;";普通\/标签。HTML ";)
如果修剪(f_c)= ";";然后f_c = ";模板不存在,”;

fcls.refreshtype = ";标签";与# 39;设置刷新式获取当前位置,导航,等等。
fcls.refreshfolderid = ";0 ";与# 39;设置当前刷新目录ID ";0 ";获得通用标签

tagsname = ks.checkxss(KS。S(";N ";))
如果tagsname = ";";然后
称,TagsMain()
其他的
如果IsNumeric(tagsname)然后
集= conn.execute(";选择keytext从ks_keywords id是;";&;tagsname)
如果不是,RS. Eof,然后,tagsnamea = rs.getrows(- 1)
关闭:集=没有
如果IsArray(tagsnamea)然后
,K = 0,UBound(tagsnamea,2)
tagsname = tagsnamea(0,k)
下一个
最后如果
最后如果
称,TagsList()
最后如果

f_c = kmr.kslabelreplaceall(f_c)
调用标签

联系我们
CONTACT US

电话:17326913295

扣扣:1042551829

邮箱:1042551829@qq.com

地址:廊坊香河新华大街兴业家园

'); })();