有关修改问题

修改的时候要提示修改成功信息，但是数据库中的主键是不能重复的，如果我修改主键的时候不小心修改为已存在的主键时，即将会有两个相同的主键，怎样提示修改错误呢？如下程序，数据库中有一表user，表中有字段user_name、user_id等字段，其中字段user_id是主键。可以修改user_id内容，但是不能有重复，如果修改过程有重复，怎样可以显示修改信息错误呢？请各位人士帮帮忙，在此先谢过！
<%@ LANGUAGE = VBScript %>
<!--#include file="conn.asp"-->
<%

        lid=request("id")
        set rsU=server.createobject("adodb.recordset")
            sqltext="select * from [user] where id=cint('"&lid&"')"
            rsU.open sqltext,conn,3,3
     
  If request.Form("action")="确认修改" then
        
        rsU("user_name")=request.form("user_name")
        rsU("user_id")=request.form("user_id")
        rsU("stage")=request.form("stage")
            rsU("type")=request.form("type")
        rsU("source")=request.form("source")
        rsU("contactor")=request.form("contactor")
            rsU("telephone")=request.form("telephone")
        rsU("address")=request.form("address")
        rsU("email")=request.form("email")
        rsU("network")=request.form("network")
        rsU.update
　  rsU.close
   set rsU=nothing
        response.write "<script language=JavaScript>{window.alert('修改信息成功！');opener.parent.right.location.href='UserInfo.asp';window.close();}</script>"        
        response.end  
      
End If
%>