edit-clend.asp

来自「西亚电子购物系统」· ASP 代码 · 共 22 行

<!--#include file="../manage/check-4.asp"-->
<!--#include file="../conn/conn.asp" -->
<%
dim newTitle
dim id
Select case Request("action")
	case "step1"
		newTitle = Request.Form("newTitle")
		id = Request.Form("id")
		conn.execute("Update sia_category set clname = '"& newTitle &"' where clid = " & id)
		Response.write "<script>alert(""修改成功"");window.close();window.opener.location.reload();</script>"
		Response.End
	case "step2"
		newTitle = Request.Form("newTitle")
		id = Request.Form("id")
		conn.execute("Update sia_class set claname = '"& newTitle &"' where claid = " & id)
		Response.write "<script>alert(""修改成功"");window.close();window.opener.location.reload();</script>"
		Response.End
	End Select
%>