det virker ikke ....................
"Paladin" <paladin@mbox301.get2net.dk> skrev i en meddelelse
news:MPG.1524711affe83c8698968a@nyheder.get2net.dk...
> In article <3ab8d065$0$5730$4d4eb98e@news.dk.uu.net>, sjales@telefona.dk
> says...
> > Er der nogen der har et script til at beregene min lille nye søn alder
??(
> > modsat nedtælling..)
> > svar evt på mail
> >
> > søren
> >
> >
> >
> Jeg har lavet noget ligende bare hvor længe det er siden jeg holdt op med
> at ryge
> Her er det! brug copy og paste til at indsætte koden i eks. notepad og
> husk at gemme filen som etnavn.html
>
> <HTML>
> <HEAD>
> <TITLE>Jeg stoppede d. 18/3-01 kl 20:30</TITLE>
> </HEAD>
> <BODY>
> <SCRIPT LANGUAGE="VBScript">
>
> <!-- Skjul script-kode
>
> ' Dimentionering af variabler
> Dim dtmFraD ' Fra Dato
> Dim atimer ' Aktuelle antal timer
> Dim aminutter ' Aktuelle antal minutter
> Dim asekunder ' Aktuelle antal sekunder
>
> dtmFraD = #3/19/01 20:30:00# ' sætter Fra tidspunkt til d. 19 marts 2001
> kl. 20:30:00
>
> dtmTimer = now - dtmFraD ' regner timer ud til senere brug
> atimer= HOUR(dtmTimer) ' Udregner Aktuelle antal timer
> aminutter=minute(dtmtimer) ' Udregner Aktuelle antal minutter
> asekunder=second(dtmtimer) ' Udregner Aktuelle antal sekunder
>
> ' Nedenstående linier skriver Tekst Linien
> document.write("Nu har jeg ikke" & "<B> RØGET </B>" & " i " &
> DateDiff("d", dtmFraD, now) & " Dage")
> document.write(" og " & atimer & " Timer")
> document.write(" og " & aminutter & " minutter")
> document.write(" og " & asekunder & " sekunder")
> ' Slut på tekst linien
>
> ' Slut skjul script-Kode -->
>
> --
> Åhh hvor har jeg det GODT