湘域源在线产品防伪查询系统 可以查系统已有的防伪码

				
				
				
								        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 "alert('已存在相同防伪码,请重新输入!');history.back();"
						Response.End()		
						end if
						rs.addnew
						rs("p")=request("p")
						rs.update
						
						rs.close
						
						response.Write("window.location.href='d_int.asp';alert('防伪码添加成功！')")
				%>