08. april 2014 - 15:59Der er
4 kommentarer og 1 løsning
Dags dato = dag 1 i kvartal
Hej Eksperter,
jeg bruger nedenstående linier til at finde datoen på det næste kvartal. Men det skal den kun gøre hvis Request.Form("Indmeldelsesdag") ikke er den første dag i kvartalet (1/1, 1/4, 1/7 eller 1/10.
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Datoen = cDate(Request.Form("Indmeldelsesdag")) if DatePart("d",Datoen) = 1 and (DatePart("m",Datoen)=1 or DatePart("m",Datoen)=4 or DatePart("m",Datoen)=7 or DatePart("m",Datoen)=10) then ' hvad så hvis dato er start på kvartal sdato = Datoen else kvartal = DatePart("q",Datoen) sdato = DateSerial(Year(Datoen),1,1) sdato = DateAdd("q",kvartal,sDato) end if
bemærk, at if DatePart("d",Datoen) = 1 and (DatePart("m",Datoen)=1 or DatePart("m",Datoen)=4 or DatePart("m",Datoen)=7 or DatePart("m",Datoen)=10) then er en lang linje - skal den opdeles i flere, så indsæt _ if DatePart("d",Datoen) = 1 and _ (DatePart("m",Datoen)=1 or DatePart("m",Datoen)=4 or _ DatePart("m",Datoen)=7 or DatePart("m",Datoen)=10) then
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
