?? message.asp
字號:
<!--#include file="conn.asp"-->
<!--#include file="inc/const.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><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;
margin-right: 0px;
margin-bottom: 0px;
}
p{font-size:9pt};
td{font-size:9pt};
li{font-size:9pt};
select{font-size:9pt};
a {color:#5f5f5f;font-size: 9pt ;text-decoration:none; line-height:13.5pt}
a:hover {text-decoration:none; color:#000000;text-decoration: underline}
-->
</style>
</head>
<body bgcolor="#003366">
<%
Dim ID, Rs, SQL
Dim Topic, Content, Writer, Postime
If Not IsNumeric(Request("id")) And Request("id")<>"" then
Response.write"錯誤的系統參數!ID必須是數字"
Response.End
End If
ID = CLng(Request.Querystring("ID"))
If ID = "" And ID = 0 Then
Response.Write "<script>alert('請輸入正確的ID!');javascript:window.close();</script>"
End If
Set Rs = server.CreateObject("adodb.recordset")
SQL = "select * from NC_Message where ID = "& ID
Rs.Open SQL, conn, 1, 1
If Rs.bof And Rs.EOF Then
Response.Write "<script>alert('錯誤的系統參數!');javascript:window.close();</script>"
Else
Topic = Rs("title")
Content = Rs("Content")
Writer = Rs("Writer")
Postime = Rs("Postime")
End If
Rs.Close
Set Rs = Nothing
%>
<br><br><br><br>
<table width="400" align="center" border="8" cellspacing="2" cellpadding="0" bordercolor="ABADBA">
<tr>
<td background="images/lbg-3.gif">
<table width="100%" border="0" cellspacing="3" cellpadding="0">
<tr>
<td align="center" style="FONT-SIZE:9pt;COLOR:#ff6600;"><b><%=Topic%></b></td>
</tr>
</table>
</td>
</tr>
</table>
<BR style="OVERFLOW: hidden; LINE-HEIGHT: 3px">
<table width="400" height="200" align="center" border="8" cellspacing="2" cellpadding="5" bordercolor="D7D9E5">
<tr valign="top">
<td background="images/big-l-bg.gif"><BR style="OVERFLOW: hidden; LINE-HEIGHT: 5px">
<table width="100%" height="100%" align="center" border="0" cellspacing="2" cellpadding="3">
<tr valign="top">
<td><p><%=Content%></p>
<p align="right"><%=Writer%><BR>
<%=Postime%></p></td>
</tr>
<tr>
<td height="9" align="center">[<a href="javascript:window.close()">關閉本窗口</a>]</td>
</tr>
<tr>
<td height="9" align="center"中原軟件站------因為用心，所以專業</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -