Två siffror i veckonummer

3 svar · 255 visningar · startad av Hakanrode 24 okt. 2004

HakanrodeMedlem sedan jan. 200273 inlägg

Frågan24 okt. 2004 20:23#1

Jag använder veckonummer i ett ordernummer, ordernummret räknar upp när veckan i det senaste ordernummret är densamma. Kortfattat så vill jag åstadkomma en ny nummerserie för varje vecka.

Allting fungerar jättebra ända tills vecka 1, då min jämförelse går i stöpet pga att DatePart-funktionen returnerar veckonummret med en siffra istället för två.

Ex. 200452003(Rätt), en vecka senare:20051003(Fel).


SET RSordernr = Connect.execute("SELECT MAX(Ordernr) AS Max FROM adress")

  max = RSordernr("Max")

 if (CLng(left(max, 4)) = (CLng(DatePart("yyyy", Date(), 2))) AND CLng(mid(max, 5, 2))= CLng(DatePart("ww", Date(), 2))) then
   ordernummer = max + 1
 else
   ordernummer = DatePart("yyyy", Date(), 2) & DatePart("ww", Date(), 2) & "001"
 end if

Finns det något datum som alltid returnerar två siffror eller finns det något annat sätt att smidigt lösa detta?

MVH Håkan

MatsJMedlem sedan apr. 2004459 inlägg

24 okt. 2004 20:32#2

Byt ut:

DatePart("ww", Date(), 2)

... mot:

Right("0" & DatePart("ww", Date(), 2), 2)

PeeerMedlem sedan mars 20025 907 inlägg

24 okt. 2004 20:33#3

if (CLng(left(max, 4)) = (CLng(DatePart("yyyy", Date(), 2))) AND CLng(mid(max, 5, 2))= CLng(right("0" & DatePart("ww", Date(), 2),2)) then

/r ehh.. eller så var jag på fel ställe och petade. Godnatt. :)

HakanrodeMedlem sedan jan. 200273 inlägg

24 okt. 2004 20:40#4

Klockrent MatsJ, Och så snabbt!

Tackar och bockar!