30/06/2008, 12:10
|
| | | Fecha de Ingreso: mayo-2004 Ubicación: Ocotlan
Mensajes: 27
Antigüedad: 20 años, 11 meses Puntos: 0 | |
| Problema Con Una Consulta
With rsExis
.OpenRecordset ("SELECT * FROM EXISTENCIAS WHERE PRODUCTO = """) & ART1.Text & """"
'.Edit
AUX = .Fields("EXISTENCIA")
AUX = AUX + Val(CANT1.Text)
.Fields("EXISTENCIA") = AUX
.Update
End With
CON ESTA CONSULTA KIERO TOMAR DE LA TABLA EXISTENCIAS UN PRODUCTO, TOMAR EL VALOR Q TIENE E INCREMENTAR LAS ENTRADAS DE ESE PRODUCTO, NO ME ACUTALIZA DE ESA MANERA, ME ELIMINA EL VALOR ANTERIOR Y COLOCA LAS NUEVAS ENTRADAS COMO UN TOTAL.
PROBE USANDO UNA AUXILIAR Y NADA MAS NO QUEDA, EN QUE ESTOY MAL, ME PUEDEN AYUDAR GRACIAS |