
17/07/2003, 03:41
|
| | Fecha de Ingreso: julio-2003
Mensajes: 3
Antigüedad: 21 años, 9 meses Puntos: 0 | |
Hola,
A ver si me podeis ayudar por que no me acabo de ver cómo solucionar el problema siguiente. Creo que tiene que ver con el comando Update.
Sobre una tienda virtual....cuando un cliente hace un pedido guardo los datos del pedido en una base. Para cada pedido hay un campo autonumérico que llamo RefCompra.
Lo que me interesa hacer es, después de cada pedido, recuperar la RefCompra.
Mi código es
constr2 = application("constr")'abrimos la base de datos
Set Conn2 = Server.CreateObject("ADODB.Connection")
Conn2.Open constr2
Set Rs2 = Server.CreateObject("ADODB.Recordset")
SQL2 = "SELECT * FROM pedidos"
Rs2.open SQL2,Conn2,3,3
Rs2.AddNew
Rs2("nombre")=nom
Rs2("apellido1")=ape1
Rs2("apellido2")=ape2
Rs2("RefProductp")=idc
Rs2("Importe")=precio
Rs2.Update
'aquí intento recuperar la Referencia de la Compra
referencia=Rs2("RefCompra")
Rs2.close
Conn2.close
Según he leido en diversos mensajes después de hacer Update, el campo el campo autonumérico se crea y no tendría que tener problemas para recuperarlo. Sin embargo, no me funciona. He pensado que tal vez el error tenga que ver con:
"Como ya hemos comentado para añadir nos olvidamos del codigo o ID porque el motor JET de access al definir un campo como AUTONUMERICO lo asigna solo al hacer un UPDATE."
Ya que yo accedo a la base de datos a través de DSN. ¿No funciona el Update cuando accedo a la base de datos a través de DSN? ¿Alguna posible solución?
Muchas gracias. |