<% 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帮助: