Avatar billede whattodo Nybegynder
26. juli 2005 - 09:32 Der er 4 kommentarer og
2 løsninger

Beregning af alder ud fra CPR-nummer

Jeg har tidligere her på siden fundet et script til beregning af alder ud fra CPR-nummer, som jeg benytter i Access. Beregningen fungerer fint for alle CPR-numre, som starter med 1, 2 eller 3. Problemet er nok, at mine CPR-numre ligger gemt som tal, hvorved "0" ikke regnes med når alderen beregnes, hvorved jeg får et forkert resultat på disse numre.

Har nogen haft samme problem, og kan nogen evt. hjælpe?
Avatar billede bennytordrup Nybegynder
26. juli 2005 - 09:34 #1
Omdan til en streng og test på, om længden af strengen er 6 tegn. Hvis ikke, foranstiller du et 0 og splitter op til dag, måned og år. Hvis du også har løbenummeret med, skal længden selvfølgelig være 10.
26. juli 2005 - 09:37 #2
Brug Format til at gennemtvinge foranstillet nul:

Format(CPR,"0000000000")



Btw, på denne adresse har jeg en funktion til at beregne alder ud fra CPR nr liggende:

http://www.makeiteasy.dk/eksempler/VBFunktioner.htm
Avatar billede whattodo Nybegynder
26. juli 2005 - 12:56 #3
Problemet har løst sig i mellemtiden, og I har sådan set begge ret. Tak for jeres svar.
Avatar billede whattodo Nybegynder
26. juli 2005 - 12:57 #4
Håber I begge synes det er okay, at jeg splitter pointene.
26. juli 2005 - 12:58 #5
det er helt fint - tak for point :o)
Avatar billede bennytordrup Nybegynder
26. juli 2005 - 13:03 #6
do
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
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

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

IT-JOB

Politiets Efterretningstjeneste

IT Sikkerhedsarkitekt i PET

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Sektionschef til Enterprise Arkitektur i Forsvaret på Østerbro

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Nye kolleger søges til IT Stab i Forsvaret