Question

asp添加记录问题

asp添加记录时如何判断该记录已存在。并弹出提示框。
比如根据 GS_Name字段来判断？

<!-- #include file="conn.asp" -->
<%
dim GS_Name,E_Mail,HE_Name,Web,SFHE,FS_Mail,ZQ_Mail,SH_Mail
GS_Name=request("GS_Name")
E_Mail=request("E_Mail")
HE_Name=request("HE_Name")
Web=request("Web")
SFHE=request("SFHE")
FS_Mail=request("FS_Mail")
ZQ_Mail=request("ZQ_Mail")
SH_Mail=request("SH_Mail")
exec = "select * from material"

set rs = server.createobject("adodb.recordset")
rs.open exec,conn,3,3
rs.addnew
rs("GS_Name")=GS_Name
rs("E_Mail")=E_Mail
rs("HE_Name")=HE_Name
rs("Web")=Web
rs("SFHE")=SFHE
rs("FS_Mail")=FS_Mail
rs("ZQ_Mail")=ZQ_Mail
rs("SH_Mail")=SH_Mail
rs.update
rs.close
conn.close
set conn=nothing
%>
<script language="javascript">
if (confirm("添加成功,是否继续添加?"))
window.location.href="add.asp"
else
window.location.href="main.asp"
</script>

Answer 1

在查询语句加入查询条件，然后再根据查询结果来判断是否存在，下面以判断E_Mail字段是否存在为例：

exec = "select * from material where E_Mail='" & E_Mail & "'"
set rs = server.createobject("adodb.recordset")
rs.open exec,conn,3,3
if rs.bof and rs.eof then
rs.addnew
rs("GS_Name")=GS_Name
rs("E_Mail")=E_Mail
rs("HE_Name")=HE_Name
rs("Web")=Web
rs("SFHE")=SFHE
rs("FS_Mail")=FS_Mail
rs("ZQ_Mail")=ZQ_Mail
rs("SH_Mail")=SH_Mail
rs.update
%>
<script language="javascript">
if (confirm("添加成功,是否继续添加?"))
window.location.href="add.asp"
else
window.location.href="main.asp"
</script>
<%
else
%>
<script language="javascript">alert("邮件地址已存在！");</script>
<%
end if
rs.close
conn.close
set conn=nothing

Answer 2

首先你要确定哪个字段不能重复，在数据库里设置有索引无重复，或主键。当发现你要添加重复的数据数据库就会报错,在通过on error resume next 忽略

1.在外面操作,不要有频繁连接数据库的操作,最好一次性存储过程中处理.
2.在存储过程中尽量少用更新操作.

效率方面肯定是存储过程要好.

Answer 3

改成rs.open exec,conn,3,2
1,1表示修改

Answer 4

exec = "select * from material where E_Mail='" & E_Mail & "'"
set rs = server.createobject("adodb.recordset")
rs.open exec,conn,3,3
if rs.bof and rs.eof then
rs.addnew
rs("GS_Name")=GS_Name
rs("E_Mail")=E_Mail
rs("HE_Name")=HE_Name
rs("Web")=Web
rs("SFHE")=SFHE
rs("FS_Mail")=FS_Mail
rs("ZQ_Mail")=ZQ_Mail
rs("SH_Mail")=SH_Mail
rs.update
%>
<script language="javascript">
if (confirm("添加成功,是否继续添加?"))
window.location.href="add.asp"
else
window.location.href="main.asp"
</script>
<%
else
%>
<script language="javascript">alert("邮件地址已存在！");</script>
<%
end if
rs.close
conn.close
set conn=nothing