---
title: "syntaxfel....varför?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/38320-syntaxfel-varför"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "mikul"
published: "2002-02-24T19:42:29.000Z"
updated: "2002-02-24T20:20:53.000Z"
replies: 6
views: 254
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/38320-syntaxfel-varför"
---

# syntaxfel....varför?

## #1 — mikul, 2002-02-24T19:42Z

hej.
försöker skapa en funktion som skall kolla vilken dag det är.. om det är lördag fredag etc...

```
function checkday(Dag)
	Select Case Dag
		Case 1: Dag = "Söndagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
		Case 2: Dag = "Måndagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
		Case 3: Dag = "Tisdagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
		Case 4: Dag = "Onsdagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
		Case 5: Dag = "Torsdagen"& " den " & Day(intDatum) & "/" & Month(intDatum)
		Case 6: Dag = "Fredagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
		Case 7: Dag = "Lördagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
	End Select
	Dag = cstr(trim(Dag))
end function

response.write checkday(WeekDay(intDatum))
```

men jag får syntaxfel på första raden....
nån som har nån ide?

/ Mikul

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

## #2 — LarsG, 2002-02-24T19:48Z

Hur ser resten av koden ut? Har du funktionen inuti en loop eller i en annan funktion?

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

## #3 — @nders, 2002-02-24T19:59Z

Prova att byta variabelnamn på den variabel du skapar för att returnera. Den har nu samma namn som den variabel du kör select case på, det vet jag inte om det är så himla lyckat.

Mvh,

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

## #4 — mikul, 2002-02-24T20:07Z

Så här ser resten ut:

```
<%
if request("month") <> "" then 
manad = request("month")
else
manad = month(date)
if len(manad) = 1 then 
manad = "0"& manad
end if
end if
if request("ar") <> "" then
ar = request("ar")
else
ar = year(date)
end if

Datum = ar & "-" & manad & "-01"  
intDatum = Datum
intManad = Month(intDatum) 

	Do until intManad = Month(dateadd("m",1,Datum))
		If Day(intDatum) = Day(date) Then
			farg1 = "<font color=""red"">"
			farg2 = "</font>"
		Else
			farg1 = ""
			farg2 = ""
		End If

function checkDay(strDag)
		dag = strDag
		Select Case Dag
			Case 1: Dag = "Söndagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
			Case 2: Dag = "Måndagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
			Case 3: Dag = "Tisdagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
			Case 4: Dag = "Onsdagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
			Case 5: Dag = "Torsdagen"& " den " & Day(intDatum) & "/" & Month(intDatum)
			Case 6: Dag = "Fredagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
			Case 7: Dag = "Lördagen" & " den " & Day(intDatum) & "/" & Month(intDatum) 
		End Select
		strdag = cstr(trim(Dag))
		checkDay = strDag
	End function
		
		Response.Write checkday(WeekDay(intDatum)) &"<br>"
		intDatum = DateAdd("d", 1, intDatum)
		intManad = Month(intDatum)

		if response.isclientconnected then 
			response.flush
		else 
			response.end 
		end if
	Loop

%>
```

/ Mikul

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

## #5 — LarsG, 2002-02-24T20:11Z

Lägg koden för funktionen utanför din do loop. Det är bra att samla funktioner och sub antingen först eller sist i källkodsfilen.

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

## #6 — @nders, 2002-02-24T20:11Z

Du kan inte definiera funktioner i loopar.

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

## #7 — mikul, 2002-02-24T20:20Z

Tack så mycket...

tack så mycket...
nu har jag lärt mig nåt nytt...
tack båda två!
:stud :bire :birp :x 

/ Mikul

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/38320-syntaxfel-varför