Ola Galera, olha eu tenho um banco de dados feito no Access 2000. Eu fiz o processo para não deixar duplicar o registro no BD, mas quando eu estou cadastrando os dados no Browser e tem um usuario igual ele me dá um erro de página... O Codigo está aqui em baixo, por favor pode verificar para mim, ou se voce tiver um outro código mais facil eu agradeceria e muito ------------------------------------------------------------- <% Dim nome,endereco nome = replace(request.form("nome"), "'", "''") endereco = replace(request.form("endereco"), "'", "''") cidade = replace(request.form("cidade"), "'", "''") estado = replace(request.form("estado"), "'", "''") cep = replace(request.form("cep"), "'", "''") telefone = replace(request.form("telefone"), "'", "''") email = replace(request.form("email"), "'", "''") usuario = replace(request.form("usuario"), "'", "''") senha = replace(request.form("senha"), "'", "''") Set DB = Server.CreateObject("ADODB.Connection") cnpath="DBQ=" & server.mappath("dbportal.mdb") DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath Set RS = Server.CreateObject("ADODB.RecordSet") sql = "SELECT usuario FROM cadprefeitura" RS.Open sql,DB,3,3 if RS.EOF then inserir = "INSERT INTO cadprefeitura (nome,endereco,cidade,estado,cep,telefone,email,usuario,senha) " & _ "VALUES ('" & nome & "','" & endereco & "','" & cidade & "','" & estado & "','" & cep & "','" & telefone & "','" & email & "','" & usuario & "','" & senha & "')" DB.Execute(inserir) else response.write "NOME DO USUARIO já EXISTENTE" end if RS.Close Set RS = Nothing %>------------------------------------------------------------------ Me ajuda por favor, agradeço Odenir Anholeto