if session("admin_name")="" then response.end
set rs=server.createobject("adodb.recordset")
%>
if request("action")="del" then
sql="select * from company where id="&request("id")
rs.open sql,conn,3,3
if rs.eof then
response.redirect "deltype.asp"
else
rs.delete
rs.update
end if
response.write "商品类别删除成功"
response.write ""
response.write "返回"
rs.close
else
sql="select * from company"
rs.open sql,conn,3,3
if rs.eof then
response.write "没有商品分类"
else
do while not rs.eof%>
loop
end if
rs.close
end if
%>
