<!--#include file="admin_start.asp"-->
<%
dim id
dim ids
dim n_ids

id=request("id")
ids=request("ids")
ids=replace(ids," ","")
n_ids=""

if not MySys.check.isInteger(id) and request("action")="edit" then
MySys.error.info="请选择您要操作的项目！"
MySys.error.location="back"
MySys.error.err()
end if

select case request.form("object_grade_0")
case ">="
grade=request.form("object_grade_0")&"|"&int(request.form("object_grade_radio_1"))
case "<="
grade=request.form("object_grade_0")&"|"&int(request.form("object_grade_radio_1"))
case "="
grade=request.form("object_grade_0")&"|"&request.form("object_grade_checkbox_1")
end select

grade=grade+"|1"

select case request("action")
case "delete"

	if ids="" then
		MySys.error.info="请选择你要删除的上传文件类型！"
		MySys.error.location="back"
		MySys.error.err()
	end if		

	conn.execute("delete from sys_file_list where file_id in ("&ids&") ")
	
	MySys.error.info="删除上传文件类型成功！"
	MySys.error.location="back"
	MySys.error.suc()
	
case else

	if request("action")="add" then
	    sql="select * from sys_file_list "
	else
	    sql="select * from sys_file_list where file_id="&id&" "
	end if
	
	rs.open sql,conn,1,3
	
	'/////////////////////////////////////////////检测
	
	if request("action")="add" then
	    rs.addnew
		MySys.error.info="上传文件类型添加成功！"
	    MySys.error.location="admin/admin_safe_upload_list.asp"
	else
		MySys.error.info="上传文件类型编辑成功！"
	    MySys.error.location="back"
	end if

	if request("action")="edit" and rs.eof then
		MySys.error.info="您选择的上传文件类型不存在！"
		MySys.error.location="back"
		MySys.error.err()
	end if
	

	if request("file_lx")="" then 	
		MySys.error.info="请完整填写相关项目！"
		MySys.error.location="back"
		MySys.error.err()
	end if
	
	'/////普通项
	if request("file_lx")<>"" then rs("file_lx")=trim(request("file_lx"))
	if request("file_open")<>"" then rs("file_open")=int(request("file_open"))	
	if request("file_maxsize")<>"" then rs("file_maxsize")=request("file_maxsize")
	if request("file_minsize")<>"" then rs("file_minsize")=request("file_minsize")	
	if grade<>"|1" then rs("file_customer_grade")=grade
	rs.update
	rs.close

	MySys.error.suc()

	'/////////////////////////////////////////////
end select
%>
<!--#include file="admin_end.asp"-->
