---
title: "Veckonummer"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/151985-veckonummer"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Fraggel"
published: "2006-10-02T20:11:36.000Z"
updated: "2006-10-03T03:14:43.000Z"
replies: 2
views: 422
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/151985-veckonummer"
---

# Veckonummer

## #1 — Fraggel, 2006-10-02T20:11Z

Jag vill beräkna fram veckonummer i ett ASP hack jag håller på med men hitter ingen direkt bra lösning för detta!
Dock så hittar jag följande VB kod.... 

MEN 

```
Function myWeekNbr(myDate)
   Dim iWeek 
   Dim iYear 
    If IsDate(myDate) Then
        iWeek = Format(myDate, "WW", vbMonday, vbFirstFourDays)
        
        'Hantera specialfallen med felaktig vecka 53
        If iWeek > 52 Then
            If Format(CDate(myDate) + 7, "ww", vbMonday, vbFirstFourDays) = 2 Then iWeek = 1
        End If
        
        'hantera årskifte
        If Mid(sDate, 6, 2) = "12" And iWeek = 1 Then
            iYear = CStr(CInt(Mid(myDate, 3, 2) + 1))
        Else
            iYear = Mid(myDate, 3, 2)
        End If        
        myWeekNbr = Right(iYear, 1) & Right(("00" & iWeek), 2)
  Else
    myWeekNbr = "000"
  End If
End Function
```

Någon som kan hjäpla mig med detta vad f a n gör "format"

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

## #2 — luna, 2006-10-02T20:38Z

Se följande tråd: <http://www.webforum.nu/showthread.php?p=1233489#post1233489>

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

## #3 — Fraggel, 2006-10-03T03:14Z

Tackar!

Jag titade på date part men missa denna function!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/151985-veckonummer