piaoshu.asp
来自「不错的ASP整站源代码。在IIS环境下运行都没有问题」· ASP 代码 · 共 40 行
ASP
40 行
<!--#include file="security.asp"-->
<!--#include file=conn.asp -->
<%
user_id=request("user_id")
Set rst = Server.CreateObject("ADODB.Recordset")
sql="select piaoshu from larchives where user_id=" & user_id
Set Rst=conn.Execute(sql)
renqi=rst("piaoshu")
if request("act")="change" then
renqi=Request.Form("ren")
user_id=Request.Form("user")
sql="Update larchives Set piaoshu="& renqi &" Where user_ID=" & user_id
conn.execute(sql)
response.redirect "admin.asp"
end if
%>
<html>
<head><title>会员管理</title>
<link rel="stylesheet" href="../inc/style.css">
</head>
<body>
<form action="" method=post>
<input type="hidden" name="act" value="change">
用户ID:<input type=text name=user value="<%=user_id%>" class="put">
得票数:<input type=text name=ren value="<%=renqi%>" class="put">
<input type=submit value=" 更新 " class="put1">
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?