Avatar billede dawin_dk Nybegynder
24. september 2003 - 16:07 Der er 12 kommentarer og
1 løsning

funktion til helligdage

heya

min request er ganske simpel ... næsten da... jeg mangler en funktion som jeg kan give en dato og den så returnerer om det er en helligdag eller ej .. (bare danske helligdage) ... har ik kunnet finde noget indbygget ... så ... er der nogen der har sårn en liggende vil jeg blive taknemmelig
Avatar billede netro Nybegynder
24. september 2003 - 16:12 #1
Lav et array med datoer for alle helligdage på et år. Løb det så i gennem og tjek, om din dato matcher én af de angivne datoer.

Jeg kan ikke umiddelbart se andre muligheder.
Avatar billede netro Nybegynder
24. september 2003 - 16:16 #2
Alternativt kan du lægge datoerne i en tabel (afhængig af hvor mange årstal du vil inkludere).
http://paul.wad.homepage.dk/holidays_da.html
Avatar billede dawin_dk Nybegynder
24. september 2003 - 16:16 #3
det er jo bare ikke alle datoer der ligger på faste datoer .. f.eks. er der også nogen af dem der f.eks. er sidste torsdag i maj ....og sårn ... der er nogen af dem der flytter dato ..
Avatar billede netro Nybegynder
24. september 2003 - 16:18 #4
Ja, det ved jeg - men jeg ser ikke andre løsningerne end at nedskrive alle datoer i enten et array eller i en tabel.

Det ville ellers være smart, hvis VB havde en indbygget funktion for hvert land.
GetDanishHoliday("29-05-2003")

;o)
Avatar billede cesil Nybegynder
24. september 2003 - 16:19 #5
hvis du selv kan oversætte det her til asp, skulle det være løsningen. ;-)

http://www.blconsulting.dk/tipsbase.html#fridage
Avatar billede dawin_dk Nybegynder
24. september 2003 - 16:20 #6
den skulle bare have en isholiday .. serveren og dit script har i forvejen angivet hvilket regional-setting den vil bruge ....
Avatar billede netro Nybegynder
24. september 2003 - 16:22 #7
Jeg tænkte nu mere på, at den skulle returnere navnet på helligdagen og ikke bare en bolsk værdi.
Avatar billede dawin_dk Nybegynder
24. september 2003 - 16:22 #8
cesil: hehe.. oversæt det til vbscript/asp og lav så jeg kalder den med datoen som param og den returnerer true/false .. så får du point :)
Avatar billede netro Nybegynder
24. september 2003 - 16:28 #9
Avatar billede truelz Nybegynder
24. september 2003 - 23:53 #10
<%
aar=2003
'skal være mellem 1901 & 2199

m= array(0,1,4,4,0,2,5,0,3,6,1,4,6)
dg= array("Søndag","Mandag","Tirsdag","Onsdag","Torsdag","Fredag","Lørdag")

gyldental=(aar+1) mod 19
if gyldental=0 then gyldental=19

epakt= ((gyldental-1)*11)mod 30
if aar>1899 and aar<2200 then epakt=epakt-1
if aar>2199 and aar<2300 then epakt=epakt-2
if aar>2299 and aar<2400 then epakt=epakt-3
if aar>2399 and aar<2500 then epakt=epakt-2
if aar>2499 and aar<2600 then epakt=epakt-3
if aar>2599 and aar<2900 then epakt=epakt-4
epakt=epakt mod 30

DagTilFj=80
if gyldental=6 or gyldental=17 then DagTilFj=81
alder=(epakt+DagTilFj) mod 30
if alder<=13 then antaldg=13-alder
if alder>13 then antaldg=43-alder

fuldmaane=21+antaldg
if fuldmaane<=31 then
    dato=fuldmaane
    maaned=3
else
    dato=fuldmaane-31
    maaned=4
end if
'response.write"fuldmåne:" &dato&"/"&maaned&"<br>"

korrektion=(5+aar+aar\4-aar\100+aar\400) mod 7
if aar/4=int(aar/4) and (maaned=1 or maaned=2) then
    if aar/100<>int(aar/100) then korrektion=korrektion-1
    if aar/100 =int(aar/100) then korrektion=korrektion-1
end if
u=(dato+m(maaned)+korrektion)mod 7

Paaske=dato+7-u
if paaske>31 then
    paaske=paaske-31
    maaned=4
end if
'response.write " Påske " & aar &": "& paaske & "/" & maaned &"<br>"
str= paaske & "/" & maaned &"/"& aar

response.write cdate(str)-49 & " Fastelavn<br>"
response.write cdate(str)-7 & " Palmesøndag<br>"
response.write cdate(str)-3 & " Skærtorsdag<br>"
response.write cdate(str)-2 & " Langfredag<br>"
response.write cdate(str) & " Påskedag<br>"
response.write cdate(str)+1 & " 2.Påskedag<br>"
response.write cdate(str)+26 & " St.Bededag<br>"
response.write cdate(str)+39 & " Kr.Himmelfartsdag<br>"
response.write cdate(str)+49 & " Pinsedag<br>"
response.write cdate(str)+50 & " 2.Pinsedag<br>"

%>

Her er et asp-script der udleder de danske helligdage.
Jeg har ikke tid til at lave scriptet om til dit ønske, men der er da lidt at gå ud fra. :)
Avatar billede dawin_dk Nybegynder
27. september 2003 - 17:06 #11
laver en helt anden løsning istedet ...
Avatar billede kimlarsen1978 Nybegynder
12. december 2005 - 13:20 #12
Hejsa - interessant script
Truelz: Kan du ikke komme med nogle kommentarer ind ved dine parametre og forklare lidt step by step.

Mange tak
Avatar billede truelz Nybegynder
12. december 2005 - 20:56 #13
Årh...
Nu er det jo efterhånden temmelig længe siden, så jeg tror næsten lige så godt du selv kan prøve at kigge det igennem og forstå det den vej. Har heller ikke så meget tid for tiden. Men ellers opret et nyt spm eller spørg google, den har sikkert svar :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester