<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="mj_conn.asp"-->
<!--#include file="mj_function.asp"-->
<!--#include file="mj_session.asp"-->
<%
call iderror
Set rs = server.CreateObject("adodb.recordset")
sql = "select * from mj_photo_category where id = "&request.QueryString("ID")&""
rs.Open sql, conn, 2, 3
If rs.EOF Then
    Call close_rs
    Call close_conn
    Call infoback("不存在此数据！")
Else
    rs.Delete
    rs.Update
    Call close_rs
    sql = "delete from mj_photo where mj_photo_category = "&request.QueryString("ID")&""
    conn.Execute ( sql )
    Call close_conn
	Call infohref("删除成功！", "mj_photo_category.asp")
End If
%>