delmeal.asp

具有计划、任务、通告、公文、员工档案、等网络办公功能

<script>
// 
// 	        	力天2002网络办公系统
//          Copyright (c) 深圳市力天软件开发有限公司
//                   http://www.ebexpert.net
//
//  文件名       : meallist.asp
//  描述         : 定餐管理(删除)
//  版本         : 
//  作者         : sky
//  最新更新     : 04/26/2001
//  备注         :
</script>
<!--#include file="const.inc"-->
<%
if meal_Admin<>1 then
	Response.Write "对不起，您没有权限！"
	Response.End 
end if

 sql="delete from Adminmeal where mealid="& request("mealid") 
 conn.Execute sql 
 conn.execute "delete from submeal where lunch=" & request("mealid") & " or supper=" & request("mealid")
 conn.Close
 set conn=nothing 
 Response.Write "删除成功，请<a href='meallist.asp?channelid=3'>返回</a>"
%>