<% '************************************************************** ' Software name: PowerEasy SiteWeaver ' Web: //www.powereasy.net ' Copyright (C) 2005-2009 佛山市动易网络科技有限公司 版权所有 '************************************************************** ClassID = PE_CLng(Trim(Request("ClassID"))) If ClassID = 0 Then FoundErr = True ErrMsg = ErrMsg & "
  • 请指定栏目ID!
  • " Else Call GetClass End If If FoundErr = True Then Call WriteErrMsg(ErrMsg, ComeUrl) Response.End End If ItemID = 0 If ClassPurview > 1 Then Dim PurviewChecked If UserLogined = False Then PurviewChecked = False Else Call GetUser(UserName) If ParentID > 0 Then PurviewChecked = CheckPurview_Class(arrClass_Browse, ChannelDir & "all," & ParentPath & "," & ClassID) Else PurviewChecked = CheckPurview_Class(arrClass_Browse, ChannelDir & "all," & ClassID) End If End If If PurviewChecked = False Then FoundErr = True ErrMsg = ErrMsg & XmlText("BaseText", "PurviewCheckedErr", "
  • 对不起,您没有浏览此栏目内容的权限!
  • ") Call WriteErrMsg(ErrMsg, ComeUrl) Response.End End If End If ClassShowType = Trim(Request("ShowType")) If ClassShowType = "" Then ClassShowType = 1 Else ClassShowType = PE_CLng(ClassShowType) End If PageTitle = "" If ClassShowType = 2 Then strFileName = ChannelUrl_ASPFile & "/ShowClass.asp?ShowType=2&ClassID=" & ClassID Else strFileName = ChannelUrl_ASPFile & "/ShowClass.asp?ClassID=" & ClassID End If strTemplate = GetTemplate(ChannelID, 2, TemplateID) arrTemplate = Split(strTemplate, "{$$$}") If UBound(arrTemplate) < 1 Then Response.Write "当前栏目使用的页面模板有误,缺少小类模板!" Response.End End If Call PE_Content.GetHtml_Class Response.Write strHtml Set PE_Content = Nothing Call CloseConn %>
  • 点睛之笔在“品牌” 海青特色小镇乡村振兴城乡融合之路 2019-05-14
  • 四两等可来看看[微笑] 2019-05-14
  • 【学习时刻】国家行政学院经济学部副主任董小君:明方向、抓“龙头”、变思路,推动东北经济企稳向好 2019-05-12
  • 豆渣-热门标签-华商生活 2019-05-07
  • 旅游市场再创佳绩端午假期河北接待游客2026.77万 揽金147.79亿 2019-05-07
  • 公婆儿媳争讨房租租客不知给谁 司法所介入调解 2019-05-02
  • 2018国际消费电子产品展 2019-05-02
  • 言而无信似乎成了特朗普政府的特质与标致 2019-05-01
  • 中国科研团队刷新暗物质探测灵敏度 2019-04-30
  • 阿呆,那是你家远祖啊,还不跪拜?[哈哈] 2019-04-30
  • 山东2018年最低工资标准提高5.5% 2019-04-30
  • “拖稿”也自信 美女作家落落来渝聊新书 2019-04-29
  • “晋中”1+10用活综改金字招牌 2019-04-29
  • 置业指南:盘点沙坪坝在售楼盘 2019-04-24
  • 要战胜对手必须了介他学习对手长处改掉自己短处,所以我们要学习美國长处为我所用.曰本在唐朝派遣唐史向中國学习,近代学西方进行明治维新迅速强大成为东方最强國家即证据 2019-04-24