guestinfo.asp

晴和教务管理系统

<!--#include file="../inc/top.asp"-->
<!--#include file="../inc/function.asp"-->
<%
dim action
action=request.QueryString("action")
select case action
case ""
%>
<div align="center">
<table width="760" align="center" border="0" cellspacing="0" cellpadding="0" class="table-zuoyou" bordercolor="#CCCCCC">
<tr> 
<td width="180" valign="top" bordercolor="#FFFFFF" bgcolor="#FFFFFF" class="table-you">
<!--#include file="../loginout.asp"-->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="35" bgcolor="f1f1f1" background="/jw/images/menu_09.gif" valign="bottom">
<p align="right">模 式&nbsp;&nbsp;&nbsp;&nbsp; </td>
</tr>
<tr> 
<td> 
<table width="100%" border="0" cellpadding="0" cellspacing="0" align="center">
<tr> 
<td align="center"> 
　当前模式：<font color="#008000">自由发表模式<br>
</font><b><font color="#FF0000"><a href="index.asp"><font color="#FF0000">查看教学建议</font></a></font></b></td>
</tr>
<tr> 
<td height="1"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<td width="580" valign="top" align="center" bordercolor="#FFFFFF" bgcolor="#FFFFFF"> 
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<TR>
<td class="table-shangxia" bgcolor="#ffffff" height="35"><img src="/jw/images/menu_06.gif" width="41" height="33" align="absmiddle"> 
<a href="/jw/index.asp">教学系统</a> &gt;&gt; <a href="index.asp">教学建议</a> &gt;&gt; 提交建议</td></tr>
</table>
<table border="0" cellspacing="2" cellpadding="1" align="center" width="500">
<form name="guestinfo" method="post" action="guestinfo.asp?action=save">
<tr> 
<td align="justify" valign="top">
<p align="left">主　题：</td>
<td style="padding-left:10px" align="justify" valign="top"> 
<p align="left"> 
<input class="wenbenkuang" name="Topic" type="text" id="Topic">
<font color="#FF0000">*</font></td>
</tr>
<tr> 
<td align="justify" valign="top">
<p align="left">姓　名：</td>
<td style="padding-left:10px" align="justify" valign="top"> 
<p align="left"> 
<input class="wenbenkuang" name="UserName" type="text" id="UserName">
<font color="#FF0000">*</font></td>
</tr>
<tr> 
<td align="justify" valign="top">
<p align="left">e-mail：</td>
<td style="padding-left:10px" align="justify" valign="top"> 
<p align="left"> 
<input class="wenbenkuang" name="Email" type="text" id="Email" size="50">
<font color="#FF0000">*</font></td>
</tr>
<tr> 
<td align="justify" valign="top">
<p align="left">电　话：</td>
<td style="padding-left:10px" align="justify" valign="top"> 
<p align="left"> 
<input class="wenbenkuang" name="Tel" type="text" id="Tel">
</td>
</tr>
<tr> 
<td align="justify" valign="top">
<p align="left">内　容：</td>
<td style="padding-left:10px" align="justify" valign="top">
<p align="left">
<textarea class="wenbenkuang" name="Body" cols="50" rows="8" id="Body"></textarea>
<font color="#FF0000">*</font></td>
</tr>
<tr> 
<td align="justify" valign="top">
<p align="left"></td>
<td height="30" style="padding-left:10px" align="justify" valign="top">
<p align="left">
<input class="go-wenbenkuang" name="submit" value=提交信息 type=submit onClick="return checkup();">
[请注意适当使用<font color="#FF0000">Enter</font>键来换行]
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
</div>
<%
case "save"
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from Jw_Guestbook",conn,1,3
rs.addnew
rs("Topic")=trim(request("Topic"))
rs("UserName")=request("UserName")
rs("Body")=htmlencode(trim(request("Body")))
rs("Email")=trim(request("Email"))
rs("Tel")=trim(request("Tel"))
rs("PostTime")=now()
rs("PostIP")=Request.ServerVariables("remote_addr")
rs.update
rs.close
set rs=nothing
response.write "<br><br><center><font color=red>您的教学建议已成功提交，感谢您的参与！<br><br><a href=index.asp>查看以往教学建议</a></font></center><br><br>"
end select
%>
<SCRIPT LANGUAGE="JavaScript">
function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';
  }
  return (str == checkstr);
}

function checkup()
{
   if(checkspace(document.guestinfo.Topic.value)) {
	document.guestinfo.Topic.focus();
    alert("您没有填写主题！");
	return false;
  }
   if(checkspace(document.guestinfo.UserName.value)) {
	document.guestinfo.UserName.focus();
    alert("请填写您的姓名！");
	return false;
  }
     if(checkspace(document.guestinfo.Body.value)) {
	document.guestinfo.Body.focus();
    alert("请填写建议内容！");
	return false;
  }
  
  if(document.guestinfo.Email.value.length!=0)
  {
    if (document.guestinfo.Email.value.charAt(0)=="." ||        
         document.guestinfo.Email.value.charAt(0)=="@"||       
         document.guestinfo.Email.value.indexOf('@', 0) == -1 || 
         document.guestinfo.Email.value.indexOf('.', 0) == -1 || 
         document.guestinfo.Email.value.lastIndexOf("@")==document.guestinfo.Email.value.length-1 || 
         document.guestinfo.Email.value.lastIndexOf(".")==document.guestinfo.Email.value.length-1)
     {
      alert("Email地址格式不正确！");
      document.guestinfo.Email.focus();
      return false;
      }
   }
 else
  {
   alert("Email不能为空！");
   document.guestinfo.Email.focus();
   return false;
   }

}
</script> 
<!--#include file="../inc/end.asp"-->