📄 child.asp
字号:
<%
if instr(session("EAPurview"),"31")=0 then
response.redirect "../login.asp"
response.end
end if
%>
<!--#include file="../../Inc/DBConn1.asp" -->
<LINK href="../../CSS/style.css" rel="stylesheet" type="text/css"></LINK>
<%
if request("action")="del" then
conn.execute("delete from Sort3 where ChildID=" & request("ChildID"))
end if
%>
<%
set ChildRs=server.createobject("adodb.recordset")
ChildSql="select * from Sort3 where TypeID=" & request("TypeID") & " order by ChildID ASC"
ChildRs.open ChildSql,conn,1,1
%>
<CENTER>
<table width="100%" border="0" cellspacing="0" cellpadding="3" ID="Table1">
<TR height=30 bgcolor="#F78200">
<TD><b><font color="#FFFFFF">行类小类管理 —— <a href="AddChild.asp?SortID=<%=request("SortID")%>&TypeID=<%=request("TypeID")%>"><font color="#FFFFFF">添加行业小类</font></a> —— <a href="Type.asp?SortID=<%=request("SortID")%>"><font color="#FFFFFF">返回相关中类管理</font></a> —— <a href="Sort.asp"><font color="#FFFFFF">返回大类管理</font></a></font></b></td>
</tr>
<tr>
<td valign=top>
<TABLE border="0" width="100%" cellpadding="0" ID="Table2">
<TR height=23>
<%
j=1
while not ChildRs.eof
%>
<td width="25%" height="25" align="left"><p style="line-height:150%"><%=ChildRs("ChildName")%></a> 〖<a href='EditChild.asp?SortID=<%=request("SortID")%>&TypeID=<%=ChildRs("TypeID")%>&ChildID=<%=ChildRs("ChildID")%>'><font color=#ff0000>修改</font></a>│<a href='Child.asp?SortID=<%=request("SortID")%>&action=del&TypeID=<%=ChildRs("TypeID")%>&ChildID=<%=ChildRs("ChildID")%>' onclick="return confirm('确定要删除这个行业小类吗?')"><font color=#ff0000>删除</font></a>〗</td>
<%if j mod 2 = 0 then%></tr><tr><%end if%>
<%
ChildRs.movenext
j=j+1
wend
ChildRs.close
set ChildRs=nothing
%>
</TABLE>
</TD>
</TR>
</TABLE>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -