<% ''' SDCMS 栏目页 ''' ================================================================== ''' 版权所有 http://www.sdcms.cn ''' ------------------------------------------------------------------ ''' 这不是一个自由软件!您只能在不用于商业目的的前提下对程序代码进行修改和使用; ''' 未经授权不允许对程序代码以任何形式任何目的的再发布。 ''' ================================================================== ''' 编写: IT平民 ''' 修改:IT平民 in 2012.07 dim temproot:temproot="" dim classid:classid=sdcms.getint(sdcms.fget("classid",0),0) dim root:root=sdcms.enhtml(sdcms.fget("root",0)) dim data:data=sdcms.categorydata if classid=0 and root<>"" and not isnull(root) then if sdcms.checkstr(root,"file") then classid=sdcms.getcateid(data,root) else classid=0 end if end if dim gcate:gcate=sdcms.getcate(data,classid) if gcate=-1 then sdcms.echo "栏目不存在或已被删除" else dim sonid,parentid,followid,catedir,modeid,cateurl dim classname,catepic,seotitle,seokey,seodesc,pagenum dim htmlrule classname=data(1,gcate) catedir=data(2,gcate)&"/" followid=data(3,gcate) sonid=data(5,gcate) parentid=data(6,gcate) cateurl=data(9,gcate) modeid=data(10,gcate) catepic=data(15,gcate) seotitle=data(16,gcate) seokey=data(17,gcate) seodesc=data(18,gcate) pagenum=data(19,gcate) htmlrule="?classid="&classid&"" select case modeid case "-1" temproot=sdcms.iif(len(data(21,gcate))=0,(theme_page),(data(21,gcate))) case "-2" sdcms.go data(9,gcate) case else temproot=sdcms.iif(len(data(20,gcate))=0,(data(23,gcate)),(data(20,gcate))) end select if webmode=2 then htmlrule="list_"&classid&"_[page].html" if webmode=3 then sdcms.go webroot&htmldir&catedir sdcms.db.dbclose sdcms.die else sdcms.show temproot,classid end if end if sdcms.db.dbclose %>
友情链接:台湾uu聊天室 - 台湾uu - 台湾uu直播  1  4  5  6  7  8  9  10  11  12  13  14  15  16  17  18  19  20  21  22  23  24  25  26  27  28  29  32  33  34  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50  51  52  53  54  55  56  57  58  59  60  61  62  63  64  65  66  67  68  69  70  71  72  73  74  75  76  77  78  1  4  5  6  7  8  9  10  11  12  13  14  15  16  17  18  19  20  21  22  23  24  25  26  27  28  29  32  33  34  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50  51  52  53  54  55  56  57  58  59  60  61  62  63  64  65  66  67  68  69  70  71  72  73  74  75  76  77  78  79  80  81  82  83  84  85  86  87  88  89  90  91  92  93  94  95  96  97  98  99  100  102  103  104  105  106  107  108  109  110  111  112  113  114  115  116  117  118  119  120  121  122  123  124  125  126  127  128  129  130  131  132  133  134  135  136  137  138  139  140  141  142  143  144  145  146  147  148  149  150  151  152  153  154  155  156  157