Hogyan oldom meg ezt az access feladatot?

Csinálsz mondjuk egy Form-ot, bele egy gombot ez alapján:

[link]

Mikor a gomb kódjához érsz, a DoCmd-s részt átírod erre:

DoCmd.RunSQL "UPDATE Table1 SET [Disc] = 0 WHERE [Tip] = 'V' AND [Pret] < 2000;"

DoCmd.RunSQL "UPDATE Table1 SET [Disc] = 5 WHERE [Tip] = 'V' AND [Pret] > 2000;"

DoCmd.RunSQL "UPDATE Table1 SET [Disc] = 10 WHERE [Tip] = 'C' AND [Pret] < 2500;"

DoCmd.RunSQL "UPDATE Table1 SET [Disc] = 15 WHERE [Tip] = 'C' AND [Pret] > 2500 AND [Pret] < 5000;"

DoCmd.RunSQL "UPDATE Table1 SET [Disc] = 20 WHERE [Tip] = 'C' AND [Pret] > 7500;"

Másik lehetőség, ha csinálsz egy Update Query-t a Disc oszlopra, és ezt adod meg neki:

IIf([Tip]="V" And [Pret]<2000;0;IIf([Tip]="V" And [Pret]>2000;5;IIf([Tip]="C";IIf([Pret]<2500;10;IIf([Pret]>2500 And [Pret]<5000;15;IIf([Pret]>7500;20;[Disc])));[Disc])))

Harmadik lehetőség, ha a Disc oszlop kalkulált oszlop, akkor ezt:

IIf([Tip]="V" And [Pret]<2000;0;IIf([Tip]="V" And [Pret]>2000;5;IIf([Tip]="C";IIf([Pret]<2500;10;IIf([Pret]>2500 And [Pret]<5000;15;IIf([Pret]>7500;20;Null)));Null)))