<% dim page page=filterPara(getForm("page","get")) if isnul(page) or not isnum(page) then page=1 echo tags(cint(page)) Function tags(Byval page) dim templateFile dim templateobj,TemplatePath : set templateobj=new TemplateClass dim rsObj,rsObjSmalltype,rsObjBigtype,channelTemplateName,tempStr,tempArr,pageStr,sql,sperStr,sperStrs,content,contentLink templatePath=sitePath&"/"&"templates/"&setting.defaultTemplate&"/"&setting.htmlFilePath&"/tags.html" 'die templatePath if not CheckTemplateFile(templatePath) then echo templateFile&err_16 : exit function '_ʼ˺ templateObj.load(templatePath) templateObj.parseHtml() templateObj.parseList 0,page,"taglist","","tags" templateObj.parseCommon tags=templateObj.content set templateobj=nothing End Function %>日本试看60秒做受小视频,熟女乱亚洲图,ZOOSLOOK欧美另类怪物,黄色下载安装