Ver Mensaje Individual
  #1 (permalink)  
Antiguo 01/06/2010, 06:57
Joseph
 
Fecha de Ingreso: febrero-2003
Mensajes: 233
Antigüedad: 22 años, 2 meses
Puntos: 4
Ayuda con comprobación de campo

estoy realizando el registro de los usuarios, y deseo chequear en la base de datos si el usuario existe o no... para poder informarle al usuario y no salga el error del navegador.

Hice esto que me parece esta bien, pero no lo asume.


Gracias de antemano


<%

Set oConn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("mibasededatos")&";"
sql = "select * from tabla"
rs.open sql, oConn, 3,3

usuario = Replace(Request.Form("usuario"), "'", "''")
clave = Replace(Request.Form("clave"), "'", "''")
email = Replace(Request.Form("email"), "'", "''")
pais = Replace(Request.Form("pais"), "'", "''")


if rs.fields("usuario") = usuario then

Response.Write "El usuario ya existe"

else

rs.AddNew
rs.Fields("usuario") = usuario
rs.Fields("clave") = clave
rs.Fields("email") = email
rs.Fields("pais") = pais
rs.Update

response.redirect "registro_completado.asp"


end if

rs.Close
oConn.Close
set rs=nothing
set oConn=nothing
%>