Prisfald og arkivering

Du kan bruge en opdateringsforespørgsel og her sætte som kriterie, at prisen skal være større end 100.- datoen mindre end 010103 osv. osv.

Tag en kopi af din ordretabel og kald den ARKIVTABEL og slet alle poster, kør derefter denne:

DoCmd.RunSQL "INSERT INTO ARKIVTABEL SELECT ORDRETABELLEN.felt2,felt1,dato FROM ORDRETABELLEN Where ORDRETABEL.dato < #2003-01-01#"

Det første spørgsmål:
Lav en forespørgsel med et felt indeholdende denne feltkode:
Minus5Prc: Iif(stkpris>100;stkpris*0,95;stkpris)
Jeg har dog ikke testen den, så prøv den lige af.

Andet spørgsmål:
Der skal du bruge to forespørgsler. En opdateringsforespørgsel, som kopiere posterne over i en anden tabel, med en kriterie som beskriver poster ældre en 1 januar 2003. Den anden skal være en sletforespørgsel, som sletter poster med samme kriterie. Hvordan denne kriterie opbygges ved jeg ikke helt, da dato-felter ikke lige er det jeg arbejder mest med. men prøv noget med ordredato>'01-01-2003' eller er det ordredato>'%01-01-2003%'

Slet poster i ordretabellen med denne:

DoCmd.RunSQL "DELETE FROM ORDRETABEL Where ORDRETABEL.dato < #2003-01-01# "

jobba -> Datoer i SQL skal omsluttes af #

Ja det skal nok passe. Datofelter er som sagt, ikke det jeg bruger hver dag :)

Hej - Takker for forslagene. Jeg har lige afprøvet den første med at opdatere prisen, men får det ikke til at virke ?
Prøver nu den næste.

Opdatering af pris som et udtryk i en forespørgsel:

Minus5Prc: IIf([stkpris]>100;[stkpris]*0,95;[stkpris])

Til mugs - den fik jeg til at virke, men jeg skal have ændret stkprisen i tabellen, så det er nødt til at være en opdateringsforespørgsel.
Til din orientering så virker de andre forslag med dato SUPER tak

UPDATE Varer SET stkpris = stkpris*0.95 WHERE stkpris > 100

and that can also be done in a DoCmd.RunSQL

Tak for hjælpen - mugs og Terry havde de "rigtige" svar