cnbbrmsg_write.asp

. 缓存处理技术

<!--#include file="top_Cnbbr.asp"-->
<!--#include file="chksession.asp"-->
<!--#include file="inc/mypage.asp"-->

<!--#include file="Cnbbr_UserCenter_Left.asp" -->
<!--#include file="cnbbrmsg_menu.asp"-->

<script language="javascript">
<!--
  function chkform(){
    var theform=document.form1;
    if(theform.ownerid.value==""){
	alert("收件人不能为空，请重新填写");
	theform.ownerid.focus();
	return false;
    }
    if(theform.msgtitle.value==""){
	alert("留言标题不能为空，请重新填写");
	theform.msgtitle.focus();
	return false;
    }
    if(theform.ask_content.value==""){
	alert("留言内容不能为空，请重新填写");
	theform.ask_content.focus();
	return false;
    }
  return true;
  }
//-->
</script>

<%
Response.Write Cnbbr_Head
  With Response
	.Write "<table width="""& Sys_BodyCenterWidth &""" border=""0"" cellspacing=""0"" cellpadding=""0""  align=""center"" class=""td"">" & Vbcrlf
	.Write "  <tr>" & Vbcrlf
	.Write "   <td width=""150"" align=""left"" valign=""top"" class=td>" & Vbcrlf
	 Disp_CnbbrCenterLeft
	.Write "   </td>" & Vbcrlf
	.Write "   <td align=""left"" valign=""top"" class=td>" & Vbcrlf

	Dim SiteMenu_Width,SiteMenu_Left,SiteMenu_Right
	SiteMenu_Width="98%"
	SiteMenu_Left="BBRhome.asp|[menu]|个人面板||[menu]||###|[menu]|站内短信||[menu]||cnBBRMsg_Write.asp|[menu]|撰写新的短信息"
	SiteMenu_Right=""
	Response.Write CnbbrSiteMenu(SiteMenu_Width,SiteMenu_Left,SiteMenu_Right)

	.Write "<table border=0 cellpadding=1 cellspacing=1 width=""98%"" align=center>" & Vbcrlf
	.Write " <tr class=td>" & Vbcrlf
	.Write "  <td align=center>"& Vbcrlf
	Cnbbr_MSGMenu 
	.Write "</td>" & Vbcrlf
	.Write " </tr>" & Vbcrlf
  End With
%>
	  <tr class=td>
	  <td align=center>
<table border="0" cellspacing="0" width=100% cellpadding="4" align="center">
<tr>
<td width="20%" rowspan="2" align="center">&nbsp;</td>
<td width="80%">&nbsp;</td>
</tr>
<tr>
<td align=center valign=top height=120>
<table cellpadding=0 cellspacing=0 width=100% align=center border=0>
<form name=form1 method=post action="save_msg.asp" OnSubmit="return chkform();">
<tr>
<td align=left>收 件 人：<input name=ownerid type=text value="<%=Request.QueryString("smsto")%>"></td>
</tr>
<tr>
<td align=left>留言标题：<input name=msgtitle type=text value="" style="width: 198px;"></td>
</tr>
<tr>
<td align=left valign=top>留言内容：<textarea name=ask_content rows=6 style="width: 198px;"></textarea></td>
</tr>
<tr>
<td align=left height=52>
  <input type="submit" name="finish" value="确认发送短信息">&nbsp;&nbsp;
  <input type="reset" name="reset" value="清除">
  <input type="hidden" name="aucid" value="<%=Request.QueryString("aucid")%>">
  <input type="hidden" name="Reply" value="<%=Request.QueryString("Reply")%>">
  <input type="hidden" name="ReplyMsgID" value="<%=Request.QueryString("ReplyMsgID")%>">
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
	  </td>
	  </tr>
	</table>
   </td>
  </tr>
</table>

<% Response.Write Cnbbr_Bottom %>