菜鸟问题，很急，谢谢大家!

[sea76]

table中有字段code，内容全是手机号码。
我想在程序的文本框中输入一个手机号码，提交到table中。如果和code下已有的号码有相同的，会弹出提示号码已存在，如果没有相同的，什么提示也没有。这段代码怎么写？谢谢

[lbd8848]

<%
set rs=oconn.execute("select * from table where code='" & request("code") & "'")
if not rs.eof then
response.write "<script>号码已存在</script>"
end if
%>

[say1no2]

提交到数据库之前，做一个查询，看看数据库中有没有重复的号码！

set rs=conn.execute("select * from tablename where code='"&code&"'")
if not rs.eof then
response.write "号码已存在"
end if

[xiantao123]

思路应该是楼上的。

[say1no2]

提交到数据库之前，做一个查询，看看数据库中有没有重复的号码！

set rs=conn.execute("select * from tablename where code='"&code&"'")
if not rs.eof then
response.write "号码已存在"
end if

[xieyj]

Dim rs
Set rs = Server.CreateObject("Adodb.RecordSet")
rs.open "select code from table where code='"&request("code")&"'",conn,1,3
If Not rs.eof Then
response.write "已经存在！"
End If
rs.close
Set rs = nothing

[ygghost]

<%
code=request.form("code")
set rs=server.createobject("adodb.recordset")
sql="select * from table where code='"&code&"'"
rs.Open sql,application("cn"),3,1
if not rs.eof then
response.write "<script language=JavaScript>{window.alert('号码存在');window.location.href='*.asp';}</script>"
response.end
end if
%>

[swich]

<%
set rs=conn.execute("select * from table where code='" & request("code") & "'")
if not rs.eof then
response.write "<script>已存在</script>"
end if
%>

[shleo]

这么多了
…………

[jfly301]

楼上的思路都差不多，应该是这样

[xxu333]

<%
set rs=oconn.execute("select * from table where code='" & request("code") & "'")
if not rs.eof then
response.write "<script>alert('号码已存在');history.go(-1)</script>"
end if
%>