Urgente! Campo=suma campos mismas caracteris
Hola por favor necesito saber como hago para que en un formulario al crear nuevo registro: me coloque el valor del campo igual a los campos del los registros anteriores con las mismas características
Ejemplo:
Id: xxx
Calidad: 1045
Diámetro: 1 pulgada
Cantidad:45
Existencia= (todos los registgros anteriores con calidad 1045 y diámetro 1 pulgada) + 45
por favor esto es urgente, les quedaré agradecido si me pueden ayudar
ferchot_2001
Ejemplo:
Id: xxx
Calidad: 1045
Diámetro: 1 pulgada
Cantidad:45
Existencia= (todos los registgros anteriores con calidad 1045 y diámetro 1 pulgada) + 45
por favor esto es urgente, les quedaré agradecido si me pueden ayudar
ferchot_2001
Respuesta de orande
1
Tienes que hacer una consulta a la base de datos para contar el numero de registros:
Dim rsAUX As ADODB.RecordSet
Set rsAUX = New ADODB.RecordSet
Set rsAUX.ActiveConnection = ?
rsAUX.Open "Select count(*) as numregs from tabla where (calidad = 1045 and diametro = 1)"
if Not (rsAUX.BOF And rsAUX.EOF) Then
existencia = rsAUX("numregs") + 45
Else
existencia = 45
end if
RsAUX. Close
No se si utilizas ADO o que, pero bueno, la idea más o menos es la misma en DAO.
Dim rsAUX As ADODB.RecordSet
Set rsAUX = New ADODB.RecordSet
Set rsAUX.ActiveConnection = ?
rsAUX.Open "Select count(*) as numregs from tabla where (calidad = 1045 and diametro = 1)"
if Not (rsAUX.BOF And rsAUX.EOF) Then
existencia = rsAUX("numregs") + 45
Else
existencia = 45
end if
RsAUX. Close
No se si utilizas ADO o que, pero bueno, la idea más o menos es la misma en DAO.
