⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 bottom.asp

📁 这是我个人用ASP制作 的一个动态网页,也是我的主页,谢谢大家的使用~~~`
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<%
if request.Form("Submit")<>"" then
  color=request.Form("select1")
  color1=request.Form("select2")
  face=request.Form("select3")
  names=session("name")
  name1=request.Form("name")
  message=request.Form("message")
  set rs=server.CreateObject("adodb.recordset")
  rs.open "select adddate from temporary where name='"&names&"'",conn,1,3
    if not rs.eof and not rs.bof then
      rs("adddate")=now()
      rs.update
      rs.close
      chatmessage="<font color="&color1&">"&names&_
      "</font><span class='style2'>(" &face& ")</span>对<font color="&color1&">" &name1&_
      "</font> 说:<font color="&color&">"&message&"</font>"
      if Application("message")="" then
	     Application("message")=chatmessage
      else
	     Application("message")=Application("message")+"|"+chatmessage
      end if
	else%>
	<script language="javascript">
     alert("您已经10分钟没说话了,欢迎下次光临!!");
     parent.location.href="login.asp";
   </script>
	<%
	end if
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>聊天信息录入处</title>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
}
.style3 {
	font-family: "华文新魏";
	font-size: 17px;
	color: #0000CC;
}
-->
</style>
</head>
<script language="javascript">
function alertStr(form1){
a=form1.message.value;
c="|";
b=a.indexOf(c)
if (b>=0)
{alert("发表信息中不要加入“|”符号,谢谢!");form1.message.focus();return false;}
if (form1.message.value=="")
{alert("说句话嘛,不说一个字就要发表不行呦!");form1.message.focus();return false;}
}
</script>
<script language="javascript">
function exitchat(){
parent.location.href="exit.asp";
}
</script>
<body bgcolor="#FFFFCC">
<form name="form1" method="post" action="">
 <table width="963" height="65" border="0">
   <tr>
     <td width="953" height="35"><span class="style3">对:</span>        <input name="name" type="text" id="name" value="<%if request.QueryString("C_username")="" then%>大家<%else%><%=request.QueryString("C_username")%><%end if%>" size="17">
        <span class="style3">说</span>:        
        <input name="message" type="text" id="message" size="70">
        <input type="submit" name="Submit" value="我要发言" onclick="return alertStr(form1)">
        <input name="Submit2" type="reset" value="清除发言">     </td>
   </tr>
   <tr>
     <td height="30"><span class="style3">字体颜色:
       </span>       <select name="select1" id="select1">
	     <option style="background:#FF00FF " value="#FF00FF" selected>紫红</option>
         <option style="background:#0000CC " value="#0000CC">蓝</option>
	     <option style="background:#FF0000 " value="#FF0000">红</option>
		 <option style="background:#00CC00 " value="#00CC00">绿</option>
		 <option style="background:#FFCC66 " value="#FFCC66">鹅黄</option>
		 <option style="background:#CCCCCC " value="#CCCCCC">灰</option>
		 <option style="background:#006600 " value="#006600">暗绿</option>
		 <option style="background:#0099CC " value="#0099CC">普蓝</option>
		 <option style="background:#FF99FF " value="#FF99FF">浅紫</option>
		 <option style="background:#CC0066 " value="#CC0066">老红</option>
		 <option style="background:#FF0099 " value="#FF0099">粉红</option>
		 <option style="background:#33CC00 " value="#33CC00">深绿</option>
       </select>
       <span class="style3">昵称颜色:</span>       <select name="select2">
	     <option style="background:#FFCC00 " value="#FFCC00" selected>黄</option>
	     <option style="background:#0000CC " value="#0000CC">蓝</option>
	     <option style="background:#00FF00 " value="#00FF00">绿</option>
	     <option style="background:#FF00FF " value="#FF00FF">紫红</option>
	     <option style="background:#FF0099 " value="#FF0099">粉红</option>
	     <option style="background:#33CC00 " value="#33CC00">深绿</option>
       </select>
       <span class="style3">表情:</span>       <select name="select3">
	   <option >羞涩的</option>
	   <option >可怜的</option>
	   <option >无奈的</option>
	   <option >大笑的</option>
	   <option >神秘的</option>
	   <option >嘟嘴的</option>
	   <option >幸灾乐祸的</option>
	   <option >无辜的</option>
	   <option >脸红的</option>
	   <option >温柔的</option>
	   <option >微笑的</option>
	   <option >生气的</option>
	   <option >热泪盈眶的的</option>
	   <option >无精打采的</option>
	   <option >遗憾的</option>
	   <option >诧异的</option>
	   <option >瞪眼</option>
       </select>
       <input type="button" name="Submit3" value="退出聊天室" onclick="exitchat()">
      </td>
   </tr>
 </table>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -