
<!-- #include file="../conn.asp" -->
<!-- #include file="admin.asp" -->
<%call ling()
Call Head
call saycardd("添加子分类")
    class1=request.form("class1")
        if class1="" then
        Call Error("名称不能为空！")
        end if

if len(class1)>50 then
  Call Error("名称过长！")
  end if

        pid=request.form("pid")
if pid="" or IsNumeric(pid)=False then
  Call Error("排序无效！")
  end if
	set rs=server.createobject("adodb.recordset")
	sql="select * from wjlist" 
	rs.open sql,conn,1,3
	rs.addnew
	rs("name")=class1
	rs("pid")=pid
	rs("type")=1
	rs.update
	rs.close
	set rs=nothing
	conn.close
	set conn=nothing
%>
图片类别栏目添加成功!
<br/>----------<br/>
<a href='picdl.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>[图片类别]</a><br/>
<a href="../index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[后台管理]</a>
<%response.write""
call head3()%>
