<%id=request("id")
zid=request("zid")
lb= request("lb")
fzr = request("fzr")
ylb = request("ylb")
if jb<>"admin" then response.redirect "tb_dlxx.asp"
zlb = request("zlb")
px = request("px")
cz = request("cz")
sp = request("sp")%>
<%if id<>"" and cz="sc" then
exec="delete from yrwl_tb_type where id="+id
conn.execute exec
exec="update yrwl_tb_lt set lb='' where lb='"+ylb + "'"
conn.execute exec
response.redirect "bbs_type_zl.asp?zlb="+zlb+"&zid="+zid
end if
exec = "select * from yrwl_tb_type where lx like '"+zid+"-%' order by px"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,3,1
j=1
gs = rs.recordcount%>
序号
类别名称
是否审批
排序
处理
<%while not rs.eof
lb = rs("lb")
lx = rs("lx")
px = rs("px")
sp = rs("sp")
if isnull(sp) then sp = ""
fzr = rs("fzr")
id = rs("id")%>
<%=j%>
<%=lb%>
<%if sp="0" or sp="" then
response.write "不必登陆查看"
else
response.write "登陆查看"
end if%>