validaaAARGGHHH!!!

[[manuel]]

He aqui la sentencia que revisa y luego decide....los campos son "name" y "passw"; los campos correspondientes en la tabla "gente" son "nick" y "password".....

' vemos si nick o pass existen

set con = server.createobject("adodb.connection")
con.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../db/usuarios.mdb")
set rc=server.createobject("adodb.recordset" )

sql = "SELECT password FROM gente WHERE nick ='" & name & "'"
rc.Open sql, Con

If not rc.eof then

If (Request.Form("passw")) = rc("password") Then
Response.Redirect"inscripcion.asp?falla=nick_ o_password_usados"
end if
end if

'-------------------------------
' si nick o pass no existen

sql="insert into gente (nick,password,nombres,apellidos,sexo,fechanac,est civil,pais,ciudad,direccion,telefono,celular,email ) values (" & "'" & nick & "'," & "'" & pass & "'," & "'" & nomb & "'," & "'" & apell & "'," & "'" & sex & "'," & "'" & nac & "'," & "'" & estcivil & "'," & "'" & country & "'," & "'" & ciudad1 & "'," & "'" & direcc & "'," & "'" & fono & "'," & "'" & mov & "'," & "'" & mail & "')"

con.execute sql

set rc=nothing
set con=nothing