<%@ CODEPAGE=65001 %> <% '/////////////////////////////////////////////////////////////////////////////// '// Z-Blog '// 作 者: 朱煊(zx.asd) & Sipo '// 版权所有: RainbowSoft Studio '// 技术支持: rainbowsoft@163.com '// 程序名称: '// 程序版本: '// 单元名称: guestbook.asp '// 开始时间: 2007-01-03 '// 最后修改: '// 备 注: GuestBook '/////////////////////////////////////////////////////////////////////////////// %> <% Option Explicit %> <% On Error Resume Next %> <% Response.Charset="UTF-8" %> <% Response.Buffer=True %> <% Call System_Initialize() 'plugin node For Each sAction_Plugin_Guestbook_Begin in Action_Plugin_Guestbook_Begin If Not IsEmpty(sAction_Plugin_Guestbook_Begin) Then Call Execute(sAction_Plugin_Guestbook_Begin) Next Dim GuestBook Set GuestBook=New TGuestBook Dim s s=GetTemplate("TEMPLATE_GUESTBOOK") If s="" Then GuestBook.template="SINGLE" Else GuestBook.template="GUESTBOOK" End If If GuestBook.Export(Request.QueryString("page")) Then GuestBook.Build Response.Write GuestBook.html End If 'plugin node For Each sAction_Plugin_Guestbook_End in Action_Plugin_Guestbook_End If Not IsEmpty(sAction_Plugin_Guestbook_End) Then Call Execute(sAction_Plugin_Guestbook_End) Next Call System_Terminate() %><% If Err.Number<>0 then Call ShowError(0) End If %>