?? show_message.asp
字號:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../include/config.asp" -->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style/style.css" rel="stylesheet" type="text/css">
</head>
<%
str = "select * from v_message where id = " & Request("id")
session("rs").open str,session("conn")
if not session("rs").eof then
%>
<body>
<table border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#eeeeee">
<tr bgcolor="#FFFFFF">
<td width="60"><font color="#0000FF">發送者</font></td>
<td><a href="../member/show_member.asp?id=<%= session("rs")("sender") %>"><%= trim(session("rs")("sender_name")) %></a> <a href="../enterprise/show_enter.asp?id=<%= session("rs")("enter_id") %>"><%= trim(session("rs")("enter_name")) %></a></td>
</tr>
<tr bgcolor="#FFFFFF">
<td><font color="#0000FF">發送時間</font></td>
<td><%= session("rs")("time") %></td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="2"><font color="#0000FF">內容</font><br> <%= session("rs")("message") %></td>
</tr>
<tr align="center" bgcolor="#FFFFFF">
<td colspan="2"> </td>
</tr>
<tr align="center" bgcolor="#FFFFFF">
<td colspan="2"> <input type="button" name="Submit" value="回復短信" onClick="window.open('write_message.asp?receiver=<%= session("rs")("sender") %>','_self');">
<input name="close" type="button" onClick="window.close();" value="關閉窗口"></td>
</tr>
</table>
<%
end if
session("rs").close
session("conn").execute "update message SET [read] = 1 WHERE id = " & Request("id"),,adCmdText + adExecuteNoRecords
%>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -