📄 hybudanconfirm.asp
字号:
<!-- #include file="include/adovbs.inc" -->
<!-- #include file="include/dataconn.asp" -->
<!-- #include file="include/checksession.asp" -->
<%
id=Request("id")
HyDanCount=request("HyDanCount")
pageno=trim(Request("pageno"))
HyNumber=trim(Request("HyNumber"))
findcontent=trim(request("findcontent"))
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<link rel="stylesheet" href="include/e1.css" type="text/css">
</HEAD>
<BODY>
-------------------------确认升级中...............<br>
<%
set rs=server.CreateObject("adodb.recordset")
sql = "update hyclub set HyLevel =" & HyDanCount & " where HyNumber ='" & HyNumber & "'"
rs.Open sql,conn
set rs=nothing
set rs=server.CreateObject("adodb.recordset")
sql = "update HyBuDan set IsConfirm = 1,HyConfirmTime='" & thistoday & "' where ID =" & id
rs.Open sql,conn
if HyDanCount>1 then
set rs=nothing
set rs=server.CreateObject("adodb.recordset")
sql = "update hyclub set IsWuliu =1 where HyNumber ='" & HyNumber & "'"
rs.Open sql,conn
set rs=nothing
end if
%>
<br>------------------------<font color=red>升级确认成功!</font><br>
<script language="javascript">
window.location.href="hyBuDanman.asp?pageno=<% =pageno%>&findcontent=<%=findcontent%>"
window.parent.frames(0).location.reload();
</script>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -