<%@language=vbscript%>
<%
where=request.ServerVariables("HTTP_REFERER")
if  where=""  then
response.Redirect "../default.asp"  
else
%>



<HTML><HEAD><TITLE>添加留言</TITLE><LINK href="./rdstyle.css" rel=stylesheet>
<SCRIPT>

function gbcount(message,total,used,remain)
{
	var max;
	max = total.value;
    if (message.value.length > max)
    {
    	message.value = message.value.substring(0,max);
        used.value = max;
        remain.value = 0;
        alert("留言不能超过500个字!");
    }
    else
    {
    	used.value = message.value.length;
        remain.value = max - used.value;
    }
}
</SCRIPT>

<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="MSHTML 5.00.2920.0" name=GENERATOR></HEAD>
<BODY >


<DIV align=center>
<TABLE bgColor=#efefef border=0 cellPadding=1 cellSpacing=1 width=600>
  <TBODY>
  <TR>
    <TD bgColor=#666666 height=30 width=600>
      <DIV align=center>添加留言 </DIV></TD></TR>
  <form name="form1" method="post" action="guestadd.asp">
  <TR>
    <TD bgColor=#000000 width=600>
      <DIV align=center><BR>
      <TABLE border=0 cellPadding=2 cellSpacing=0 width=600>
        <TBODY>
        <TR>
          <TD width=143>
            <DIV align=right>*Name:</DIV></TD>
          <TD width=360><INPUT name=youid> </TD></TR>
        <TR>
          <TD width=143>
            <DIV align=right>Gender：</DIV></TD>
          <TD width=360><SELECT name=sex> <OPTION selected 
              value=boy>男</OPTION> <OPTION value=girl>女</OPTION></SELECT> 
</TD></TR>
        <TR>
          <TD width=143>
            <DIV align=right>*E-mail：</DIV></TD>
          <TD width=360><INPUT name=email> </TD></TR>
        <TR>
          <TD width=143>
            <DIV align=right>Oicq：</DIV></TD>
          <TD width=360><INPUT name=oicq> </TD></TR>
        <TR>
          <TD width=143>
            <DIV align=right>Homepage：</DIV></TD>
          <TD width=360><INPUT name=homepage value=http://> </TD></TR>
        <TR>
          <TD vAlign=top width=143>
            <DIV align=right>*Message：</DIV></TD>
          <TD width=360><TEXTAREA cols=50 name=message onkeydown=gbcount(this.form.message,this.form.total,this.form.used,this.form.remain); onkeyup=gbcount(this.form.message,this.form.total,this.form.used,this.form.remain); rows=8></TEXTAREA> 
            <BR>最大字数： <INPUT maxLength=4 name=total size=4 value=500> 已用字数： 
            <INPUT maxLength=4 name=used size=4 value=0> 剩余字数： <INPUT 
            maxLength=4 name=remain size=4 value=500> </TD></TR></TBODY></TABLE>
      <P align=center>带星号的为必填项!</P>
      <P align=center><BR>
      <INPUT name=submitadd type=submit value=" 提交 "> 
      &nbsp;&nbsp;&nbsp; <INPUT name=submit2 type=reset value=" 清空 "> 
      </P><BR></DIV></TD></TR></FORM></TBODY></TABLE><BR>


<DIV align=center>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=600>
  <TBODY>
  <TR>
    <TD>
      <CENTER>
      <p align="center" class="9p">
<br>
红蜻蜓工作室版权所有<br>
<font face="Verdana, Tahoma, Times New Roman, 宋体, MS Sans Serif">Copyright &copy;
1999-<%=year(now)%> Reddragonfly & Studio All Rights Reserved.</font><br>
如有任何问题及建议请写信至<a href="mailto:webmaster@reddragonfly.org">
<font color="#CCCCCC" face="Verdana, Tahoma, Times New Roman, 宋体, MS Sans Serif">webmaster@reddragonfly.org</font></a> 
</p>
<p align="center" class="9p">
<script language="JavaScript">
var urodz = new Date("DEC 31, 1999");
var now = new Date();
var ile = now.getTime() - urodz.getTime();
var dni = Math.floor(ile / (1000 * 60 * 60 * 24)) + 1;
if (dni > 0)
   document.write("建站第 " + dni + " 天")
else
    document.write("建站第 " + dni + " 天");
</script>
</p>
</CENTER><BR></TD></TR></TBODY></TABLE>

</DIV>
</body>
</html>

<%end if%>
