📄 mss.asp
字号:
<%
'成为杀手
nickname=Session("hxf_u_nickname")
if nickname="" then Response.Redirect "../error.asp?id=440"
Set cn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
datestr=Application("hg_connstr")
cn.open datestr
sql="SELECT 身份,allvalue,攻防 FROM 用户 WHERE 姓名='" & nickname & "'"
Set Rs=cn.Execute(sql)
if rs("身份")="掌门" then Response.Redirect "../error.asp?id=509"
zddj=int(rs("allvalue")/1000)
if zddj>99 then zddj=99
if zddj<10 or rs("攻防")<5000000 then%>
<script language=vbscript>
MsgBox "战斗等级高于10级,攻击500万以上才能申请杀手!"
location.href = "shashou.asp"
</script>
<%else
sql="update 用户 set 门派='天网', 身份='杀手' where 姓名='" & nickname & "'"
cn.execute sql
session("mypai")="天网"
Session("mykind")="杀手"
cn.close
set cn=nothing%>
<script language=vbscript>
MsgBox "你成功加入了我们庞大的天网杀人组织,现在你的任务就是收人钱财,替人消灾!!"
location.href = "shashou.asp"
</script>
<%end if%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -