
01/06/2010, 06:57
|
| | 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
%> |