?? listmsn.asp
字號:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="chk.asp"-->
<!--#include file="db_conn.asp"-->
<!--#include file="../my_libs/my_request.asp"-->
<!--#include file="../my_libs/my_lib.asp"-->
<%
dim id,rs,sql,arr(3),i
id=my_request("id",1)
if id="" then
wnourl("參數(shù)錯誤")
else
sql="select zm_uzname,zm_title,zm_msntime,zm_content from ssort_msn order by zm_msntime desc"
set rs=conn.execute (sql)
for i=0 to 3
arr(i)=rs(i)
next
rs.close
set rs=nothing
conn.execute ("update ssort_msn set zm_isnew=1 where id="&id)
conn.close
set conn=nothing
end if
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新建網(wǎng)頁 1</title>
<link rel="stylesheet" type="text/css" href="style_admin.css" />
</head>
<body>
<table width="100%">
<tr>
<td width="958" align="right" colspan="4" class="top_td">
<p align="left">詳細信息查看</td>
</tr>
<tr>
<td width="190" align="right" class="left_td">姓名：</td>
<td width="288"><%=arr(0)%></td>
<td width="240" class="left_td">
<p align="right">時間：</td>
<td width="240"><%=arr(2)%></td>
</tr>
<tr>
<td width="190" align="right" class="left_td">主題：</td>
<td colspan="3" width="780"><%=arr(1)%></td>
</tr>
<tr>
<td width="190" align="right" class="left_td">內(nèi)容：</td>
<td colspan="3" width="780"><%=arr(3)%></td>
</tr>
<tr>
<td colspan="4" align=center>
<input type="button" value="返回上頁" name="B3" onclick="window.history.go(-1);">
<input type="button" value="刪除" name="B4" onclick="window.location='delmsn.asp?id=<%=id%>'"></td>
</tr>
</table>
</body>
</html>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -