📄 remess.asp

📁 人事管理系统毕业论文和代码希望大家喜欢
💻 ASP
字号:
<% 
username=Session.Contents("UserName")
rename=request("user")

'叛断Session变量是否超时
if isempty(session("user_id")) then
   response.redirect "timeout.htm"
end if

'叛断此用户是否已经注册
if session("user_id")=1 then response.redirect "../notreg.htm"

 %>

<html>
<head>
<title>发送短消息</title>
<meta NAME="GENERATOR" Content="Microsoft FrontPage 4.0">
<style type="text/css">
td{font-size:9pt;}
A:link {COLOR: #000000; TEXT-DECORATION: none; font-size: 9pt}
A:active {COLOR: #000000; TEXT-DECORATION: none; font-size: 9pt}
A:visited {COLOR: #000000; TEXT-DECORATION: none; font-size: 9pt}
.song9 {  font-family: 宋体; font-size: 9pt}
</style>

</head>
<script language="javascript">
<!--
   function saysfocus( )
    {
	   //top.main1.scroll(0, 65000);
           //setTimeout('scrollWindow()', 200);
            document.inputform.message.focus();
           //parent.userlist.location.reload();	
	}
-->
</script>

<body bgcolor=#FFF3E8 topMargin="4" MARGINWIDTH="5" MARGINHEIGHT="4">
<%
if request("message")<>"" then '把request("submit")改成了request("message") /by c.t. 14:46 19991020
    if trim(request("message"))<>"" then
       from=request("myself")
       towhom=request("to")
       message=request("message")
       mymessage=from&"&&"&towhom&"&&"&message
       Application.Lock
       application("message")=Application("message")&mymessage&"||"
       Application.UnLock
       Response.write "<p align=center>"&from&",你的信息发送成功</p>"
       %>
      <script language="javascript">
      <!--
      window.self.close();
      -->
      </script> 
    <%else
       Response.Write  "<p align=center><font color=red>发信内容不能为空</font>"
     end if
 else
 %>

<p align=center>发送短消息</p>
<form action=usermess.asp method=post name=inputform >
<div align="center">
  <center>
  <table border="1" width="60%" bordercolorlight="#000000" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" height="124">
    <tr>
      <td width="29%" height="43" nowrap><p align="center">接收对象</td></p>
      <td width="71%" height="43">
<input  name=to value=<%=reName%> size="40">
<input  type=hidden name=myself value=<%=UserName%> size="20">   
     </td>  
    </tr>  
  </center>  
    <tr>  
      <td width="29%" height="43">  
        <p align="center">信息</p>  
      </td>  
  <center>  
      <td width="71%" height="43"><input type=text name=message size=40 maxlength=100></td>  
    </tr>  
    <tr>  
      <td width="100%" height="32" colspan="2">  
        <p align="center"> <input type="submit" name=submit1 value="发送"> <input type="reset" value="取消" name="B2">  
      </td> 
    </tr> 
    </center> 
    </form>
</table>    
<script language="javascript">  
      <!--  
      saysfocus();  
      -->  
      </script>  
</body>  
</html>  
<%end if%>
⌨️ 快捷键说明

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