?? 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 + -