Ver Mensaje Individual
  #2 (permalink)  
Antiguo 09/09/2002, 03:29
sdnsdlm
 
Fecha de Ingreso: abril-2002
Mensajes: 438
Antigüedad: 22 años
Puntos: 2
Re: Me voy a desesperar (DB)

Hola meruelo,

¿Sabes sql? Para insertar un registro en una BBDD estás:
- Abriendo una tabla entera (que si llega a ser muy grande será un proceso bastante lento)
- Buscar si existe el dato por el índice Información (el error que te da es que no existe un índice para esa tabla que se llame Informacion, así que tendrás primero que crearlo en Access, en el diseño de la tabla, o desde código)
- Finalmente insertar el registro vía recordset.

Mucho mejor si haces un insert normal y corriente en la BBDD y te olvidas de recordsets, simplemente:

...
Set base = wks.OpenDatabase("Disco2.mdb")
base.execute "insert into .... values ...."
...

Antes te has tenido que crear el índice sin duplicados en la tabla (ves a Access, diseño de tabla y modificas el valor "indexado" de la ficha general sobre el campo sobre el cual no quieres duplicados). Al sub le pones un tratamiento de errores para pillar el error que te lanza si tratas de duplicar el índice, deberás saber el número ... y ya está.

Saludos.






Saludos