<% Response.Expires = -1 Response.AddHeader "Pragma","no-cache" Response.AddHeader "cache-control","no-cache, must-revalidate" if isbanip(Request.ServerVariables("REMOTE_ADDR"))=true or isbanip(Request.ServerVariables("HTTP_X_FORWARDED_FOR"))=true then Response.Redirect "err.asp?number=1" Response.End elseif StatusOpen=false then Response.Redirect "err.asp?number=2" Response.End elseif StatusWrite=false then Response.Redirect "err.asp?number=3" Response.End end if call addstat("leaveword") if WriteVcodeCount>0 then session("vcode")=getvcode(WriteVcodeCount) function getstatus(isopen) if isopen then getstatus="√" else getstatus="×" end if end function %> <%=HomeName%> 留言本 签写留言 onload="<%=framecheck%>if(tab && tab.selectedIndex==0 && form1 && form1.ivcode && form1.ivcode.value==''){form1.ivcode.focus();}">
<% if ShowTitle then if StatusGuestReply and isnumeric(request("follow")) and request("follow")<>"" then show_book_title 3,"回复留言" else show_book_title 3,"签写留言" end if end if %>
欢迎您留言。
"/> "/>
必填项目：

<%if WriteVcodeCount>0 then%>验证码*

<%end if%> 称　呼*" />

标　题*<%if Request.Form("ititle")="" and isnumeric(Request("follow")) and Request("follow")<>"" then response.write "Re:"%>"/>

内容： <%=getstatus(HTMLSupport)%>HTML标记　<%=getstatus(UBBSupport)%>UBB标记<%if HTMLSupport=false and UBBSupport=false and AllowNewLine=true then Response.Write "　" & getstatus(true) & "允许换行"%>
<%if UBBSupport then ShowUbbToolBar(false)%>
<%if StatusWhisper=true then%> 　 /><%if StatusEncryptWhisper=true then%>　<%=dised(Request.Form("chk_whisper")<>"1")%> />
　 "<%if Request.Form("chk_whisper")<>"1" or Request.Form("chk_encryptwhisper")<>"1" then Response.Write " disabled=""disabled"""%> />
<%end if%>
<%end if%>
联系方式：

　邮件 "/><%if MailReplyInform=true then%>
　 /><%end if%>

　QQ号 "/>

　MSN. "/>

　主页 "/>

/>

<%if StatusShowHead then%>
头像：
请选择头像：
<%dim defaultindex defaultindex=FormOrCookie("ihead")%>
<%end if%>
UBB帮助：