showspecial.asp

来自「个人网站比较简短」· ASP 代码 · 共 31 行

<!--#include file="CommonCode.asp"-->
<%
'**************************************************************
' Software name: PowerEasy SiteWeaver
' Web: http://www.powereasy.net
' Copyright (C) 2005－2008 佛山市动易网络科技有限公司 版权所有
'**************************************************************

SpecialID = PE_CLng(Trim(Request("SpecialID")))
If SpecialID = 0 Then
    FoundErr = True
    ErrMsg = ErrMsg & "<li>请指定SpecialID！</li>"
Else
    Call GetSpecial
End If
If FoundErr = True Then
    Call WriteErrMsg(ErrMsg, ComeUrl)
    Response.End
End If

MaxPerPage = MaxPerPage_Special
strFileName = ChannelUrl_ASPFile & "/ShowSpecial.asp?ClassID=" & ClassID & "&SpecialID=" & SpecialID
PageTitle = ""
strHtml = GetTemplate(ChannelID, 4, TemplateID)
Call PE_Content.GetHtml_Special

Response.Write strHtml
Set PE_Content = Nothing
Call CloseConn
%>