settop.asp
来自「这是一个图书管理系统,也许能给大家一些帮助」· ASP 代码 · 共 27 行
ASP
27 行
<!-- #include file="IsAdmin.asp" -->
<html>
<head>
<title>保存用户信息</title>
</head>
<body>
<%
'定义变量
Dim sql, vContId
'从参数中接收数据到变量中
vContId = CLng(Request("ContId"))
vFlag = CInt(Request("Flag"))
'Server对象的CreateObject方法建立Connection对象
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="driver={SQL Server};server=Ntserver;UID=sa;PWD=sa;Database=Discuss"
Conn.Open
sql = "UPDATE Content SET IsTop=" & vFlag & " WHERE ContId=" & vContId
Conn.Execute(sql)
%>
<Script language="javascript">
//打开此脚本的网页将被刷新
history.go(-1);
window.location.reload();
</Script>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?