Ver Mensaje Individual
  #3 (permalink)  
Antiguo 26/08/2006, 12:30
edysierra
 
Fecha de Ingreso: febrero-2005
Mensajes: 86
Antigüedad: 20 años, 3 meses
Puntos: 1
Te paso el codigo de la insercion...

Hola Metallic!.
Mira, te copio la parte del codigo que hace el insert

Set oConn = Server.CreateObject ("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\webspace\resadmin\elsitio\elsitio.com\db \datos.mdb;"

SQL="SELECT * FROM usuarios WHERE (Email='"&email&"');"
'Ejecutamos la consulta
set rs=oConn.Execute(SQL)
'si no nos devuelve vacío es que el mail ya está en uso
if not rs.EOF then
Response.Write("<B>La dirección de E-mail ya está registrada. </B>")
Response.Write("<BR><B>Por favor, escoja otra.</B>")
else
' es vacio, así que le insertamos en la bd
SQL="INSERT INTO usuarios " & _
"(Nombre, Apellido, FechaNac, Direccion, Ciudad, CP, Provincia, Pais, Telefono, Email, Actividad, Usuario, Promociones, Fecha)"
SQL=SQL & " VALUES ('"&nombre&"','"&apellido&"','"&fecha_nac&"','"&di reccion&"','"&ciudad&"','"&cod_post&"','"&provinci a&"','"&pais&"','"&telefono&"','"&email&"','"&acti vidad&"','"&nom_usuario&"','"&promo&"', #" & Month(Date) & "/" & Day(Date) & "/" & Year(Date) & "#);"
oConn.Execute(SQL)


Bueno, esta parte es la que corresponde a los datos que recogio del formulario. Esto se ingresa correctamente, pero lo que no puedo o no se hacer, es levantar el password generado y ponerlo en el campo correspondiente (Password) en el mismo momento que hago el resto.
Espero haber sido un poco más explícito.

Espero tu comentario y gracias!