4 svar · 220 visningar · startad av Icebreaker
Hur ska jag få detta att fungera?
Function convAge(DateOfBirth)
If isDate(DateOfBirth) Then
convAge = DateDiff("yyyy", DateOfBirth, Date) + (DateSerial(Year(Date), Month(DateOfBirth), Day(DateOfBirth)) > Date)
End If
End Function
<% Response.Write "Du är " & convAge(" <% =Server.HTMLEncode(rs("Ar")) %> - <% =Server.HTMLEncode(rs("Manad")) %> - <% =Server.HTMLEncode(rs("Dag")) %> ") & " år gammal." %>
Funktionen funkar bra...det är det andra som strular...
Skriver man exempel så här funkar det bra:
Response.Write "Du är " & convAge("1984-03-28") & " år gammal."
HTMLEncode använder du väl för att bli av med html-koder som folk lägger in i texten? Måste du verkligen HTMLEncoda det som ska in i din funktion? Det värsta som kan hända om någon lägger in html-koder där, är ju bara att din convAge-funktion inte kan beräkna rätt värde.
Jag gissar att ditt problem beror på att HTMLEncode byter ut lite texter till exempelvis & amp ; och liknande, och det förstår inte dina andra funktioner.
[r]Det var visst HTMLEncode på mitt inlägg här också :)
Okej, plockade bort HTMLEncode...
funkar inte iaf...
koden ser ut så här nu:
Response.Write "Du är " & convAge(" <% =rs("Ar") %> - <% =rs("Manad") %> - <% =rs("Dag") %> ") & " år gammal."
Jag tycker du har gjort det onödigt svårt för dig.
dim dteAge, strName
dteAge = rs("birthday")
strName= rs("name")
response.write strName & " är " & DateDiff("y", dteAge, date())/365.2375 & " år <br>"
Vill du tvunget ha det som en funktion finns här ett bra exempel:
http://www.webforum.nu/showthread.php?s=&postid=81313#post81313
mmm, ser juh ut att fungera =)
ska testa det sen...tack!