---
title: "Funktions problem"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/47226-funktions-problem"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Icebreaker"
published: "2002-07-04T22:30:40.000Z"
updated: "2002-07-04T22:52:40.000Z"
replies: 4
views: 230
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/47226-funktions-problem"
---

# Funktions problem

## #1 — Icebreaker, 2002-07-04T22:30Z

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."

Permalänk: https://www.webforum.nu/p/47226

## #2 — UlfT, 2002-07-04T22:36Z

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å :)

Permalänk: https://www.webforum.nu/p/713340

## #3 — Icebreaker, 2002-07-04T22:42Z

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."

Permalänk: https://www.webforum.nu/p/713345

## #4 — LAMP, 2002-07-04T22:44Z

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>

Permalänk: https://www.webforum.nu/p/713349

## #5 — Icebreaker, 2002-07-04T22:52Z

mmm, ser juh ut att fungera =)
ska testa det sen...tack!

Permalänk: https://www.webforum.nu/p/713353

---

Tråden på webben: https://www.webforum.nu/amne/asp/47226-funktions-problem