📄 manactdel.asp

📁 此程序为网上下载
💻 ASP
字号:
<%@ LANGUAGE=VBScript.Encode codepage ="936" %>
<%Response.Expires=0
nickname=Session("hxf_u_nickname")
grade=Int(Session("hxf_u_grade"))
if nickname="" then Response.Redirect "manerr.asp?id=100"
If grade <> 12 Then
 qx = Split(Application("wsaxhxf_c_grade" & grade), "{]")
 If qx(19) <> "1" Then Response.Redirect "manerr.asp?id=260"
End If
id=Request.QueryString("id")
Set conn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
connstr=Application("wsaxhg_connstr")
conn.open connstr
sql="SELECT id,acttype,name,act FROM actlib WHERE id=" & id
rs.open sql,conn,1,1
Dim show(4)
show(1)=rs("id")
show(2)=rs("acttype")
show(3)=rs("name")
show(4)=rs("act")
rs.close
conn.close
set rs=nothing
set conn=nothing%><html>
<head>
<title>动作管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="readonly/style.css">
</head>
<body bgcolor="#FFFFFF" class=p150>
<div align="center">
<h1><font color="0099FF">【动作管理】</font></h1>
<font color="#FF0000">【删除动作】</font></div>
<hr noshade size="1" color=009900>
<b>［注意事项］</b><br>
　　真的要删除下面的动作吗？　<a href="manactdelok.asp?id=<%=id%>">是(Yes)</a>　<a href="javascript:history.go(-1)">否(No)</a><br>
<div align=center></div>
<hr noshade size="1" color=009900>
<table border="1" cellspacing="0" cellpadding="4" bordercolorlight="#999999" bordercolordark="#FFFFFF" align="center" bgcolor="E0E0E0">
<tr bgcolor="#3399FF"> 
<td><font color="#FFFFFF">ID</font></td>
<td><font color="#FFFFFF">类型</font></td>
<td><font color="#FFFFFF">名称</font></td>
<td><font color="#FFFFFF">内容</font></td>
</tr>
<tr> 
<td><%=show(1)%></td>
<td><%=show(2)%></td>
<td><%=show(3)%></td>
<td><%=show(4)%></td>
</tr>
</table>
<hr noshade size="1" color=009900>
<div align=center class=cp><%Response.Write "序列号：<font color=blue>" & Application("wsaxhxf_c_sn") & "</font>，授权给：<font color=blue>" & Application("wsaxhxf_c_user") & "</font><br><font color=999999>" & Application("wsaxhxf_c_copyright") & "</font>"%></div>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -