<%

if Hos_Name<>""then

'判断客户资料表中是否有重复资料

sql="select * from 客户资料表 where 医院名称="&Hos_Name&""
set rs=server.createobject("adodb.recordset")
rs.open sql,connstr,1,3



if rs.eof=true then '如果指针到达最后一行,没有找到记录就

sql="select * from 客户资料表" '添加新记录
set newrs=server.createobject("adodb.recordset")
newrs.open sql,connstr,1,3
newrs.addnew

newrs("医院名称")=Hos_Name
newrs("医院编号")=Hos_Num

newrs("医院类别")=Be_Sex
newrs("客户类别")=KH_Sex

newrs("省份")=Province
newrs("城市")=City
newrs("地址")=Address

newrs("邮政编码")=Postal

newrs("专科负责人")=Pro_admin
newrs("专科电话")=Pro_Phone

newrs("眼科负责人")=Eyes_admin
newrs("眼科电话")=Eyes_Phone

newrs("设备科负责人")=EQ_admin
newrs("设备科电话")=EQ_Phone

newrs("院长")=Admin
newrs("院长电话")=Admin_Phone

newrs.update
newrs.close

else '否则就修改此记录

rs("医院类别")=Be_Sex
rs("客户类别")=KH_Sex

rs("省份")=Province
rs("城市")=City
rs("地址")=Address

rs("邮政编码")=Postal

rs("专科负责人")=Pro_admin
rs("专科电话")=Pro_Phone

rs("眼科负责人")=Eyes_admin
rs("眼科电话")=Eyes_Phone

rs("设备科负责人")=EQ_admin
rs("设备科电话")=EQ_Phone

rs("院长")=Admin
rs("院长电话")=Admin_Phone

rs.update
rs.close

end if
end if
%>

我想大家应该已经明白我的意思了！
现在我的问题是这样的，当记录不重复的时候，添加新记录的操作是正常的

但是当记录重复的时候，SQL并不修改该重复记录
而是继续添加了一个新的记录

请问大家问题出在哪里呢？我改如何修改呢？
谢谢大家