d_int_ok.asp

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

<!-- #include file="Include/conn.asp" -->
<!-- #include file="Include/Chk.asp" -->
<!-- #include file="Include/MD5.asp" -->
<%
        SQL="Select * from Zm_P where p='"&Trim(Request("p"))&"'"
	set rs=server.createobject("adodb.recordset")
	rs.open SQL,conn,1,3
	if not rs.eof then
		Response.Write "<script language='javascript'>alert('已存在相同防伪码,请重新输入!');history.back();</script>"
		Response.End()		
		end if
		rs.addnew
		rs("p")=request("p")
		rs.update
		
		rs.close
		
		response.Write("<script>window.location.href='d_int.asp';alert('防伪码添加成功！')</script>")
%>