savesortdel.asp

来自「人民医院眼科全站」· ASP 代码 · 共 39 行

<!-- #include file="../include/bkconn.asp" -->
<!--#include file="checkUser.asp"-->
<%
dim sql
intID=Request("id")
sql="select * from productSort where fatherID="&intID
set rs=server.createObject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof then
	sql="select * from product where productSort="&intID
	set rs2=server.createObject("adodb.recordset")
	rs2.open sql,conn,1,1
	if rs2.eof then
		sql="delete from productSort where id="&intID
		'response.write sql
		conn.Execute ( sql )
%>
		<script language=Javascript>
		<!--
		alert("删除成功！");
		this.document.location="sort.asp?id=<%=Request("fatherID")%>";
		-->
		</script>
<%else%>
			<script language=Javascript>
	<!--
	alert("该目录下有资料,请先删除资料");
	window.history.go(-1);
	-->
	</script>
<%end if%>
<%else%>
	<script language=Javascript>
	<!--
	alert("该目录下有子目录,请先删除子目录");
	window.history.go(-1);
	-->
	</script>
<%end if%>