<!--#include file="conn.asp"-->
<%
dim rs,sql,exec
dim strgsname,strgsadd,strgsperson,strgstel,strgsnet,strusername
strgsname=request.form("gsname")
strgsadd=request.form("gsadd")
strgsperson=request.form("gsperson")
strgstel=request.form("gstel")
strgsnet=request.form("gsnet")
strusername=session("username")
set rs=server.CreateObject(adodb.recordset)
sql="select 公司名称 from gongsi where 公司名称='"&strgsname&"'"
rs.open sql,conn,2.3
if rs.eof then
rs.addnew
rs("公司名称")=gsname
rs("公司地址")=gsadd
rs("公司负责人")=gsperson
rs("公司电话")=gstel
rs("公司网址")=gsnet
rs("用户姓名")=username
rs.update
else
response.write "<script language=javascript>alert('您输入的公司名称已经存在!')<script >"
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
%>

这个问题挺有意思，你试一下程序能够运行成功，就可以了，没有什么标准的东西！

if rs.eof then 最好改成
if rs.bof and rs.eof then
....
else
....
end if

同意楼上的.