📄 locktopic.asp

📁 电子商务网络购物系统

💻 ASP

字号:

<% Option Explicit %>
<!--#include file="conn.asp" -->
<%
Session.Timeout =  1000
Response.Buffer = True 
Dim intNoOfDays
Dim intForumID
intNoOfDays = CInt(Request.Form("days"))
intForumID = CInt(Request.Form("fid"))
strSQL = "UPDATE timestopic SET timestopic.Locked=1 "
If intForumID = 0 Then
	strSQL = strSQL & "WHERE timestopic.lastdtm < " & strDatabaseDateFunction & " - " & intNoOfDays  & ";"
Else
	strSQL = strSQL & "WHERE (timestopic.lastdtm < " & strDatabaseDateFunction & " - " & intNoOfDays  & ") AND (timestopic.bbsid=" & intForumID & ");"
End If
adoCon.Execute(strSQL)	
Set rsConn = Nothing
adoCon.Close
Set adoCon = Nothing
%>

<html>
<head>

<title>关闭论坛主题</title>   	
<link href="includes/style.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div align="center"> 
  <p class="text"><span class="heading">关闭论坛主题<br>
    </span><br />
    <a href="menu.asp" target="_self">返回到管理主菜单</a><br />
    <br />
    主题已关闭<br />
  </p>
</div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -