⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 del.asp

📁 科研及设备管理系统是一个基于WEB的网络管理信息系统
💻 ASP
字号:
<!--#include file="../share/checklogin.asp" -->
<%
	dim pathlevel,cn
	
	pathlevel="../"
%>
<!--#include file="../database/conn.asp" -->
<%
	dim id,sid,item_id,sqltable
	id=request("id")
	sid=request("sid")
	sitem_id=request("item_id")
	
	if not isnumeric(id) then
		response.redirect"error.asp?err=2"
	end if
	if not isnumeric(sid) then
		response.redirect"error.asp?err=2"
	end if
	if not isnumeric(sitem_id) then
		response.redirect"error.asp?err=2"
	end if	
	
	if id=1 then
		if sid=1 then
			sqltable="resitem"
		end if
		if sid=2 then
			sqltable="study"
		end if
		if sid=3 then
			sqltable="alteritem"
		end if
		if sid=4 then
			sqltable="teach_harvest"
		end if
		if sid=5 then
			sqltable="foitem"
		end if
	end if
	if id=2 then
		if sid=1 then
			sqltable="equipment"
		end if
		if sid=2 then
			sqltable="eq_plan"
		end if
		if sid=3 then
			sqltable="scrap"
		end if
	end if
	if sitem_id>0 then
		sql="delete from "&sqltable&" where id="&sitem_id&""
		cn.execute sql
		cn.close
		set cn=nothing
	end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>删除完毕</title>
<link href="../css/c1.css" rel="stylesheet" type="text/css">
</head>

<body>
<!--#include file="top.asp" -->
<table width="500"  height=500 border="0" align=center cellspacing="0" cellpadding="0" class=table0>
	<tr>
		<td><div align="center" class="blackfont">操作完成,项目已删除,点击<a href="index.asp?id=<%=id%>&sid=<%=sid%>" class="redfont">这里</a>返回</div></td>
	</tr>
</table>
<!--#include file="../share/bottom.htm" -->
</body>
</html>
<%response.end%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -