p_res.asp

来自「湘域源在线产品防伪查询系统 可以查系统已有的防伪码」· ASP 代码 · 共 21 行

<!-- #include file="Include/Chk.asp" -->
<!-- #include file="Include/Conn.asp" -->
<%
id=request("id")
page=request("page")
id=Replace(id," ","")
if id="" then
	Response.Write("<script>alert('您没有选择000!');history.back();</script>")
	Response.End()
end if
	set rs1=server.CreateObject("adodb.recordset")
		str="select * from zm_p where id="&id
		rs1.open str,conn,1,3
		
		rs1("c")=0

		rs1.update
		
		response.Write("<script>window.location.href='manage_type.asp';alert('栏目已修改成功！');</script>")
Response.Redirect("p_list.asp?page="&page)
%>