Ver Mensaje Individual
  #5 (permalink)  
Antiguo 22/03/2002, 21:22
[manuel]
 
Fecha de Ingreso: marzo-2002
Mensajes: 5
Antigüedad: 23 años, 2 meses
Puntos: 0
Re: validaaAARGGHHH!!!

algunas personas me han dicho que no entendieron completamente lo que estoy haciendo.... así que aquí va el codigo de nuevo...
'--------------------------------------------------------------
'campos del formulario

name=request("name")
passw=request("passw")
'--------------------------------------------------------------
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 nick from gente where nick='" & name & "'"
rc.Open sql, Con
if rc.eof then
'--------------------------------------------------------------
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 & "')"
'--------------------------------------------------------------
else
'--------------------------------------------------------------
Response.Redirect"inscripcion.asp?falla=nick_ o_password_usados"
end if
'--------------------------------------------------------------
con.execute sql
'--------------------------------------------------------------
set rc=nothing
set con=nothing

response.redirect"ok.asp"

Comunicador Grafico 09-4759729